From 5765a0791aa109c8a6d1015cd634d6aa3370a2b0 Mon Sep 17 00:00:00 2001 From: Quentin Rodier <quentin.rodier@meteo.fr> Date: Thu, 26 Oct 2023 17:43:06 +0200 Subject: [PATCH] Quentin 26/10/2023: bugfix merge ELEC, set default value of LSAVE_MICRO to FALSE --- src/PHYEX/micro/rain_ice.f90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/PHYEX/micro/rain_ice.f90 b/src/PHYEX/micro/rain_ice.f90 index 1bbd44d10..0eebb9cc0 100644 --- a/src/PHYEX/micro/rain_ice.f90 +++ b/src/PHYEX/micro/rain_ice.f90 @@ -530,6 +530,8 @@ ENDIF IF (OELEC) THEN LSAVE_MICRO = .TRUE. ZMICRO_TEND(:,:,:) = 0. +ELSE + LSAVE_MICRO = .FALSE. END IF ! !This part is put in another routine to separate pack/unpack operations from computations -- GitLab