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

Ignore:
Timestamp:
2018-01-18T11:14:03+01:00 (6 years ago)
Author:
frrh
Message:

Commit JP's Met Office GMED ticket 371 for trapping or notifying of
peculiar values of MEDUSA fields arising from transient temperature
spikes in the ocean.

Committed using:
svn merge: 9177:9249 ​svn+ssh://forge.ipsl.jussieu.fr/ipsl/forge/projets/nemo/svn/branches/NERC/dev_r5518_GO6_Carb_Fail_from_GO6_9163

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r8521 r9257  
    167167      fslownflux(:,:) = 0.0  
    168168      fslowcflux(:,:) = 0.0  
     169      !! 
     170      !! JPALM -- 21-09-2017 -- needed to debug air-sea carb 
     171      f_xco2a(:,:)  = 0.0 
     172      f_pco2w(:,:)  = 0.0 
     173      f_ph(:,:)     = 0.0 
     174      f_kw660(:,:)  = 0.0 
     175      ztmp(:,:)  = 0.0 
     176      zsal(:,:)  = 0.0 
     177      zalk(:,:)  = 0.0 
     178      zdic(:,:)  = 0.0 
     179      zsil(:,:)  = 0.0 
     180      zpho(:,:)  = 0.0 
     181      f_co2flux(:,:)  = 0.0  
     182      f_pco2atm(:,:)  = 0.0 
     183      f_h2co3(:,:)    = 0.0 
     184      f_hco3(:,:)     = 0.0 
     185      f_co3(:,:)      = 0.0 
     186      f_omarg(:,:)    = 0.0 
     187      f_omcal(:,:)    = 0.0 
    169188      !! 
    170189      !! AXY (08/08/17): zero slow detritus fluxes 
Note: See TracChangeset for help on using the changeset viewer.