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 7958 for branches/UKMO/dev_r5518_medusa_chg_trc_bio_medusa/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_mod.F90 – NEMO

Ignore:
Timestamp:
2017-04-24T13:30:28+02:00 (7 years ago)
Author:
marc
Message:

Pulled air-sea gas exchange and river inputs from trcbio_medusa.F90 into air_sea.F90

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_medusa_chg_trc_bio_medusa/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_mod.F90

    r7938 r7958  
    9494   !! Oxygen production and consumption (and non-consumption) 
    9595   REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: foxy_prod,foxy_cons,foxy_anox 
     96 
     97   !! Add DMS in MEDUSA for UKESM1 model 
     98   REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: dms_surf 
     99   !! AXY (13/03/15): add in other DMS calculations 
     100   REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: dms_andr,dms_simo,dms_aran,dms_hall 
    96101 
    97102   !! Benthic fluxes 
     
    251256               foxy_prod(jpi,jpj), foxy_cons(jpi,jpj),                & 
    252257               foxy_anox(jpi,jpj),                                    & 
     258               dms_surf(jpi,jpj),                                     & 
     259               dms_andr(jpi,jpj),dms_simo(jpi,jpj),                   & 
     260               dms_aran(jpi,jpj),dms_hall(jpi,jpj),                   & 
    253261               f_sbenin_n(jpi,jpj),f_sbenin_fe(jpi,jpj),              & 
    254262               f_sbenin_c(jpi,jpj),                                   & 
Note: See TracChangeset for help on using the changeset viewer.