Changeset 7958 for branches/UKMO/dev_r5518_medusa_chg_trc_bio_medusa/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_mod.F90
- Timestamp:
- 2017-04-24T13:30:28+02:00 (7 years ago)
- 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 94 94 !! Oxygen production and consumption (and non-consumption) 95 95 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 96 101 97 102 !! Benthic fluxes … … 251 256 foxy_prod(jpi,jpj), foxy_cons(jpi,jpj), & 252 257 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), & 253 261 f_sbenin_n(jpi,jpj),f_sbenin_fe(jpi,jpj), & 254 262 f_sbenin_c(jpi,jpj), &
Note: See TracChangeset
for help on using the changeset viewer.