Changeset 1445 for trunk/NEMO/TOP_SRC/oce_trc.F90

Timestamp:

2009-05-13T16:35:02+02:00 (15 years ago)

Author:

cetlod

Message:

add the use of bio-optical retroaction on dynamics when coupling with PISCES, see ticket:428

File:

• trunk/NEMO/TOP_SRC/oce_trc.F90 (modified) (1 diff)

trunk/NEMO/TOP_SRC/oce_trc.F90

@@ -180 +180 @@
    USE sbc_oce , ONLY :   emps       =>    emps       !: evaporation minus precipitation (kg m-2 s-2)
    USE sbc_oce , ONLY :   fr_i       =>    fr_i       !: ice fraction (between 0 to 1)
-   USE traqsr  , ONLY :   xsi1       =>    xsi1       !: first depth of extinction
-   USE traqsr  , ONLY :   ln_qsr_sms =>    ln_qsr_sms !: flag to use or not the biological fluxes for light
+   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 :   rn_si2     =>    rn_si2     !: deepest depth of extinction (blue &  0.01 mg.m-3)     (RGB)
+   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.) 
    USE sbcrnf  , ONLY :   rnfmsk_z   =>    rnfmsk_z   !: mixed adv scheme in runoffs vicinity (vert.)