Changeset 5723


Ignore:
Timestamp:
2015-09-10T13:50:21+02:00 (5 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.