Changeset 13337 for NEMO/branches/2020/dev_r13312_AGRIF-03-04_jchanut_vinterp_tstep/src/NST/agrif_oce.F90

Timestamp:

2020-07-24T16:01:24+02:00 (4 years ago)

Author:

jchanut

Message:

#2222, start suppressing key_vertical (add ln_vremap namelist flag)

File:

• NEMO/branches/2020/dev_r13312_AGRIF-03-04_jchanut_vinterp_tstep/src/NST/agrif_oce.F90 (modified) (2 diffs)

NEMO/branches/2020/dev_r13312_AGRIF-03-04_jchanut_vinterp_tstep/src/NST/agrif_oce.F90

@@ -23 +23 @@
    LOGICAL , PUBLIC ::   ln_spc_dyn    = .FALSE.   !: use zeros (.false.) or not (.true.) in
                                                    !: bdys dynamical fields interpolation
-   REAL(wp), PUBLIC ::   rn_sponge_tra = 2800.     !: sponge coeff. for tracers
-   REAL(wp), PUBLIC ::   rn_sponge_dyn = 2800.     !: sponge coeff. for dynamics
+   LOGICAL , PUBLIC ::   ln_vremap     = .FALSE.   !: use vertical remapping
+   REAL(wp), PUBLIC ::   rn_sponge_tra = 0.002     !: sponge coeff. for tracers
+   REAL(wp), PUBLIC ::   rn_sponge_dyn = 0.002     !: sponge coeff. for dynamics
    REAL(wp), PUBLIC ::   rn_trelax_tra = 0.01      !: time relaxation parameter for tracers
    REAL(wp), PUBLIC ::   rn_trelax_dyn = 0.01      !: time relaxation parameter for momentum
@@ -76 +77 @@
    REAL, PUBLIC :: sign_north
    LOGICAL, PUBLIC :: l_ini_child = .FALSE.
-# if defined key_vertical
-   LOGICAL, PUBLIC :: l_vremap    = .TRUE.
-# else
    LOGICAL, PUBLIC :: l_vremap    = .FALSE.
-# endif
 !$AGRIF_END_DO_NOT_TREAT