Changeset 13332 for NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/src/TOP/oce_trc.F90

Timestamp:

2020-07-22T16:04:36+02:00 (4 years ago)

Author:

cetlod

Message:

r4.0-HEAD_r12713_clem_dan_fixcpl : bugfix in the heat content trend when activating bio-model light penetration, see ticket #2499

File:

• NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/src/TOP/oce_trc.F90 (modified) (1 diff)

NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/src/TOP/oce_trc.F90

@@ -65 +65 @@
    USE traqsr  , ONLY :   rn_abs     =>    rn_abs     !: fraction absorbed in the very near surface
    USE traqsr  , ONLY :   rn_si0     =>    rn_si0     !: very near surface depth of extinction
+   USE traqsr  , ONLY :   nksr       =>    nksr       !: levels below which the light cannot penetrate (depth larger than 391 m)
+   USE traqsr  , ONLY :   rkrgb      =>    rkrgb      !: tabulated attenuation coefficients for RGB absorption
    USE traqsr  , ONLY :   ln_qsr_bio =>    ln_qsr_bio !: flag to use or not the biological fluxes for light
    USE sbcrnf  , ONLY :   rnfmsk     =>    rnfmsk     !: mixed adv scheme in runoffs vicinity (hori.)