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 6305 – NEMO

Changeset 6305


Ignore:
Timestamp:
2016-02-11T17:48:22+01:00 (8 years ago)
Author:
jcastill
Message:

Fix small bug: the restart file time stamp was not the ending time of the run

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/UKMO/restart_datestamp/NEMOGCM/NEMO/OPA_SRC/IOM/restart.F90

    r5538 r6305  
    8585         IF( nitrst <= nitend .AND. nitrst > 0 ) THEN  
    8686            IF ( ln_rstdate ) THEN 
    87                CALL ju2ymds( fjulday + rdttra(1) / rday, iyear, imonth, iday, zsec )            
     87               CALL ju2ymds( fjulday + ((kt-nit000)*rdttra(1)) / rday, iyear, imonth, iday, zsec )            
    8888               WRITE(clkt, '(i4.4,2i2.2)') iyear, imonth, iday 
    8989            ELSE 
Note: See TracChangeset for help on using the changeset viewer.