From b47db8d105cd3dbb65dfe342287f234fb476cf15 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?S=C3=A9bastien=20Riette?= <sebastien.riette@meteo.fr> Date: Fri, 16 Jun 2023 17:35:35 +0200 Subject: [PATCH] S. Riette 16 Jun 2023: add CMICRO='NONE' option in suparar --- src/arome/ext/suparar.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/arome/ext/suparar.F90 b/src/arome/ext/suparar.F90 index 799230107..1a7911d4f 100644 --- a/src/arome/ext/suparar.F90 +++ b/src/arome/ext/suparar.F90 @@ -230,7 +230,7 @@ YDPARAR%CTURB=CTURB IF (.NOT.LMSE.AND..NOT.LRAYFM.AND..NOT.LRAYFM15) THEN NSWB_MNH=1 ENDIF -IF ( CMICRO /= 'ICE3' .AND. CMICRO /= 'ICE4' .AND. CMICRO /= 'LIMA') THEN +IF ( CMICRO /= 'ICE3' .AND. CMICRO /= 'ICE4' .AND. CMICRO /= 'LIMA' .AND. CMICRO /= 'NONE') THEN CALL ABOR1("AROME Microphysics (CMICRO) must be ICE3, ICE4 or LIMA") ENDIF IF ( (CMICRO == 'ICE4') .AND. .NOT.YH%LACTIVE ) THEN -- GitLab