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 5086 for branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/NEMO/TOP_SRC/TRP/trcdmp.F90 – NEMO

Ignore:
Timestamp:
2015-02-17T10:06:39+01:00 (9 years ago)
Author:
timgraham
Message:

Merged head of trunk into branch in preparation for putting code back onto the trunk
In working copy ran the command:
svn merge svn+sshtimgraham@…/ipsl/forge/projets/nemo/svn/trunk

Also recompiled NEMO_book.pdf with merged input files

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/NEMO/TOP_SRC/TRP/trcdmp.F90

    r4740 r5086  
    2323   USE prtctl_trc      ! Print control for debbuging 
    2424   USE trdtra 
    25    USE trdmod_oce 
     25   USE trd_oce 
    2626   USE iom 
    2727 
     
    7676      !! ** Action  : - update the tracer trends tra with the newtonian  
    7777      !!                damping trends. 
    78       !!              - save the trends ('key_trdmld_trc') 
     78      !!              - save the trends ('key_trdmxl_trc') 
    7979      !!---------------------------------------------------------------------- 
    8080      !! 
     
    152152            IF( l_trdtrc ) THEN 
    153153               ztrtrd(:,:,:) = tra(:,:,:,jn) -  ztrtrd(:,:,:) 
    154                CALL trd_tra( kt, 'TRC', jn, jptra_trd_dmp, ztrtrd ) 
     154               CALL trd_tra( kt, 'TRC', jn, jptra_dmp, ztrtrd ) 
    155155            END IF 
    156156            !                                                       ! =========== 
Note: See TracChangeset for help on using the changeset viewer.