From fa302242f5c0ae86b0ae55ecbfa05303cb328657 Mon Sep 17 00:00:00 2001 From: VIE Benoit <vie@sxphynh> Date: Tue, 14 Nov 2023 19:10:37 +0100 Subject: [PATCH] Allow rain evaporation when NMOM_R=1 --- src/PHYEX/micro/mode_lima_tendencies.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/PHYEX/micro/mode_lima_tendencies.f90 b/src/PHYEX/micro/mode_lima_tendencies.f90 index c28fb2b22..5fc16d817 100644 --- a/src/PHYEX/micro/mode_lima_tendencies.f90 +++ b/src/PHYEX/micro/mode_lima_tendencies.f90 @@ -582,7 +582,7 @@ IF ((.NOT. LKHKO) .AND. NMOM_R.GE.2) THEN PA_CR(:) = PA_CR(:) + P_CR_SCBU(:) END IF ! -IF (NMOM_R.GE.2) THEN +IF (NMOM_R.GE.1) THEN CALL LIMA_RAIN_EVAPORATION (PTSTEP, LDCOMPUTE, & ! depends on PF > CF PRHODREF, ZT, ZLV, ZLVFACT, ZEVSAT, ZRVSAT, & PRVT, ZRCT/ZPF1D, ZRRT/ZPF1D, PCRT/ZPF1D, ZLBDR, & -- GitLab