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 5723 for branches/NERC/dev_r5107_NOC_MEDUSA/NEMOGCM/NEMO/TOP_SRC/trcwri.F90 – NEMO

Ignore:
Timestamp:
2015-09-10T13:50:21+02:00 (9 years ago)
Author:
jpalmier
Message:

JPALM -- 10-09-2015 -- forgot to add call trc_wri_medusa in trcwri.F90

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/NERC/dev_r5107_NOC_MEDUSA/NEMOGCM/NEMO/TOP_SRC/trcwri.F90

    r5715 r5723  
    2121   USE trcwri_c14b 
    2222   USE trcwri_my_trc 
     23   USE trcwri_medusa 
    2324 
    2425   IMPLICIT NONE 
     
    5758      ! --------------------------------------- 
    5859      IF( lk_pisces  )   CALL trc_wri_pisces     ! PISCES  
     60      IF( lk_medusa  )   CALL trc_wri_medusa     ! MESDUSA 
     61      !!! JPALM 
     62      !!! don't forget to add idtra  
    5963      IF( lk_cfc     )   CALL trc_wri_cfc        ! surface fluxes of CFC 
    6064      IF( lk_c14b    )   CALL trc_wri_c14b       ! surface fluxes of C14 
Note: See TracChangeset for help on using the changeset viewer.