Changeset 9544 for branches/2017

Timestamp:

2018-05-03T18:28:51+02:00 (6 years ago)

Author:

cetlod

Message:

No need to initialize solar penetration for Offline since qsr is read in file

Location:

branches/2017/dev_merge_2017/NEMOGCM

Files:

• CONFIG/ORCA2_OFF_PISCES/EXP00/namelist_cfg (modified) (1 diff)
• CONFIG/ORCA2_OFF_TRC/EXP00/namelist_cfg (modified) (1 diff)
• NEMO/OFF_SRC/nemogcm.F90 (modified) (2 diffs)

branches/2017/dev_merge_2017/NEMOGCM/CONFIG/ORCA2_OFF_PISCES/EXP00/namelist_cfg

@@ -133 +133 @@
 &namtra_qsr    !   penetrative solar radiation                          (ln_traqsr =T)
 !-----------------------------------------------------------------------
-   !                       !  type of penetration                        (default: NO selection)
-   ln_qsr_2bd  = .true.      !  2BD light penetration (two bands)
 /
 !-----------------------------------------------------------------------

branches/2017/dev_merge_2017/NEMOGCM/CONFIG/ORCA2_OFF_TRC/EXP00/namelist_cfg

@@ -133 +133 @@
 &namtra_qsr    !   penetrative solar radiation                          (ln_traqsr =T)
 !-----------------------------------------------------------------------
-   !                       !  type of penetration                        (default: NO selection)
-   ln_qsr_2bd  = .true.      !  2BD light penetration (two bands)
 /
 !-----------------------------------------------------------------------

branches/2017/dev_merge_2017/NEMOGCM/NEMO/OFF_SRC/nemogcm.F90

@@ -30 +30 @@
    USE ldftra         ! lateral diffusivity setting    (ldf_tra_init routine)
    USE ldfslp         ! slopes of neutral surfaces     (ldf_slp_init routine)
-   USE traqsr         ! solar radiation penetration    (tra_qsr_init routine)
    USE trabbl         ! bottom boundary layer          (tra_bbl_init routine)
    USE traldf         ! lateral physics                (tra_ldf_init routine)
@@ -281 +280 @@
                            CALL tra_ldf_init    ! lateral mixing
       IF( l_ldfslp     )   CALL ldf_slp_init    ! slope of lateral mixing
-                           CALL tra_qsr_init    ! penetrative solar radiation qsr
       IF( ln_trabbl    )   CALL tra_bbl_init    ! advective (and/or diffusive) bottom boundary layer scheme