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 9163 for branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_update.F90 – NEMO

Ignore:
Timestamp:
2017-12-22T13:26:37+01:00 (6 years ago)
Author:
frrh
Message:

Add code from Julien Palmieri's Met Office GMED ticket 338.
This incorporates code from branches/NERC/dev_r5518_GO6_package_trdtrc
revisions 8454:9020 inclusive.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_update.F90

    r8521 r9163  
    7575      USE lib_mpp,           ONLY: ctl_stop 
    7676      USE par_kind,          ONLY: wp 
    77       USE par_medusa,        ONLY: jp_medusa,                                & 
     77      USE par_medusa,        ONLY: jp_medusa, jp_msa0, jp_msa1,              & 
    7878                                   jpalk, jpchd, jpchn, jpdet, jpdic,        & 
    7979                                   jpdin, jpdtc, jpfer, jpoxy, jppds,        & 
    … …  
    8383                                   jpoxy_lc, jppds_lc, jpphd_lc, jpphn_lc,   & 
    8484                                   jpsil_lc, jpzme_lc, jpzmi_lc 
    85       USE par_oce,           ONLY: jpi, jpim1, jpj, jpjm1 
     85      USE par_oce,           ONLY: jpi, jpim1, jpj, jpjm1, jpk 
    8686      USE par_trc,           ONLY: jptra 
    8787      USE sms_medusa,        ONLY: friver_dep,                               & 
Note: See TracChangeset for help on using the changeset viewer.