Changeset 13351 for NEMO/branches/2020/dev_r13312_AGRIF-03-04_jchanut_vinterp_tstep/src/NST/agrif_top_interp.F90

Timestamp:

2020-07-28T17:20:03+02:00 (4 years ago)

Author:

jchanut

Message:

#2222, fixes mistakes when removing key_vertical - rename flag in namelist to prevent further mistakes - vertical refinement works fine in VORTEX

File:

• NEMO/branches/2020/dev_r13312_AGRIF-03-04_jchanut_vinterp_tstep/src/NST/agrif_top_interp.F90 (modified) (1 diff)

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

@@ -43 +43 @@
       Agrif_SpecialValue    = 0._wp
       Agrif_UseSpecialValue = .TRUE.
-      l_vremap = ln_vremap
+      l_vremap = ln_vert_remap
       !
       CALL Agrif_Bc_variable( trn_id, procname=interptrn )
+      !
       Agrif_UseSpecialValue = .FALSE.
-      l_vremap = .FALSE.
+      l_vremap              = .FALSE.
       !
    END SUBROUTINE Agrif_trc