diff --git a/src/common/turb/mode_turb_ver_thermo_flux.F90 b/src/common/turb/mode_turb_ver_thermo_flux.F90 index 2d6b76bd316ab893e48033da9c1fc9639f72f278..5ec51b29a2f6b8ed9a20aa074ffe98af48a4f15c 100644 --- a/src/common/turb/mode_turb_ver_thermo_flux.F90 +++ b/src/common/turb/mode_turb_ver_thermo_flux.F90 @@ -237,7 +237,6 @@ USE MODD_METRICS_n, ONLY: XDXX, XDYY, XDZX, XDZY, XDZZ USE MODD_PARAMETERS, ONLY: JPVEXT_TURB, JPHEXT USE MODD_TURB_n, ONLY: TURB_t USE MODD_LES -USE MODD_DIM_n, ONLY: NIMAX_ll, NJMAX_ll USE MODD_OCEANH, ONLY: XSSTFL USE MODD_TURB_n, ONLY: TURB_t ! @@ -393,7 +392,6 @@ INTEGER :: IIE,IJE ! Upper bounds of the physical ! REAL :: ZTIME1, ZTIME2 REAL :: ZDELTAX -REAL, DIMENSION(D%NIT,D%NJT) :: ZDIST ! distance ! from the center of the cooling REAL :: ZFLPROV INTEGER :: JKM ! vertical index loop