From 69d3b802a8b2779cf5df4d7b38a7ac34cd8a0352 Mon Sep 17 00:00:00 2001
From: VIE Benoit <vie@sxphynh>
Date: Tue, 14 Nov 2023 19:08:23 +0100
Subject: [PATCH] limit rain self collection until checks for concentrations
are added to the time-splitting loop
---
src/PHYEX/micro/mode_lima_tendencies.f90 | 2 ++
1 file changed, 2 insertions(+)
diff --git a/src/PHYEX/micro/mode_lima_tendencies.f90 b/src/PHYEX/micro/mode_lima_tendencies.f90
index eb06801c4..c28fb2b22 100644
--- a/src/PHYEX/micro/mode_lima_tendencies.f90
+++ b/src/PHYEX/micro/mode_lima_tendencies.f90
@@ -576,6 +576,8 @@ IF ((.NOT. LKHKO) .AND. NMOM_R.GE.2) THEN
P_CR_SCBU )
!
P_CR_SCBU(:) = P_CR_SCBU(:) * ZPF1D(:)
+ ! process limited until checks on concentrations are added to the time-splitting loop
+ P_CR_SCBU(:) = MAX(P_CR_SCBU(:),-0.5*PCRT(:)/PTSTEP)
!
PA_CR(:) = PA_CR(:) + P_CR_SCBU(:)
END IF
--
GitLab