Changeset 15249 for NEMO/trunk/src/SWE/nemogcm.F90

Timestamp:

2021-09-13T11:59:09+02:00 (3 years ago)

Author:

hadcv

Message:

#2721: Fix SETTE debug failures

File:

• NEMO/trunk/src/SWE/nemogcm.F90 (modified) (2 diffs)

NEMO/trunk/src/SWE/nemogcm.F90

@@ -25 +25 @@
    USE isf_oce , ONLY : ln_isf           ! ice shelf
    USE trd_oce , ONLY : l_trddyn         ! dynamical trend logical
+   USE dia25h  , ONLY : ln_dia25h        ! 25h mean output
 #if defined key_RK3
    USE stprk3         ! NEMO time-stepping               (stp_RK3   routine)
@@ -338 +339 @@
       !                                      ! Diagnostics
       IF( ln_diacfl    )   CALL dia_cfl_init    ! Initialise CFL diagnostics
-      !                                         ! Trends diag: switched off
-                           l_trddyn = .FALSE.        ! No trend diagnostics
+
+                           l_trddyn  = .FALSE.  ! No trend diagnostics
+                           ln_dia25h = .FALSE.  ! No 25h mean diagnostics (zdf_phy not used)- used in diawri
 
       IF(lwp) WRITE(numout,cform_aaa)           ! Flag AAAAAAA