Changeset 9410

Timestamp:

2018-03-16T19:58:41+01:00 (7 years ago)

Author:

clem

Message:

avoid crash when -O0 optimization and ln_icediachk activated

File:

• branches/2017/dev_CNRS_2017/NEMOGCM/NEMO/LIM_SRC_3/icestp.F90 (modified) (1 diff)

branches/2017/dev_CNRS_2017/NEMOGCM/NEMO/LIM_SRC_3/icestp.F90

@@ -416 +416 @@
       diag_fc_bo(:,:) = 0._wp ; diag_fc_su(:,:) = 0._wp
 
+      ! for control checks
+      diag_trp_vi(:,:) = 0._wp
+      diag_trp_vs(:,:) = 0._wp
+      diag_trp_ei(:,:) = 0._wp
+      diag_trp_es(:,:) = 0._wp
+      diag_trp_sv(:,:) = 0._wp
+
       tau_icebfr(:,:)   = 0._wp   ! landfast ice param only (clem: important to keep the init here)
       cnd_ice   (:,:,:) = 0._wp   ! initialisation of the effective conductivity at the top of ice/snow (Jules coupling)