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 6174 for branches/NERC – NEMO

Changeset 6174 for branches/NERC


Ignore:
Timestamp:
2015-12-28T20:41:21+01:00 (8 years ago)
Author:
jpalmier
Message:

JPALM --28-12-2015-- cleaning2 - MEDUSA

File:
1 edited

Legend:

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

    r6173 r6174  
    105105            !..... 
    106106            !!--------------------------------------------------------------------       
    107             CALL ju2ymds( fjulday + (2*rdttra(1)) / rday, iyear, imonth, iday, 
    108 zsec ) 
     107            CALL ju2ymds( fjulday + (2*rdttra(1)) / rday, iyear, imonth, iday, zsec ) 
    109108            WRITE(clkt, '(i4.4,2i2.2)') iyear, imonth, iday 
    110109         ELSE 
Note: See TracChangeset for help on using the changeset viewer.