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 1814 for branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/trcrst_pisces.F90 – NEMO

Ignore:
Timestamp:
2010-03-25T12:26:36+01:00 (14 years ago)
Author:
cetlod
Message:

Correction of bug when restoring passive tracers on closed seas. The
date was badly re-initialized in PISCES when restarting

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/trcrst_pisces.F90

    r1808 r1814  
    263263#if defined key_dtatrc 
    264264      ! Restore close seas values to initial data 
    265       nmonth = 1 
    266       nday   = 1 
    267       CALL trc_dta( nittrc000)  
     265      CALL trc_dta( nittrc000 )  
    268266      DO jn = 1, jptra 
    269267         IF( lutini(jn) ) THEN 
Note: See TracChangeset for help on using the changeset viewer.