From edbe5607bfc67931b15e1feddcc5249364822107 Mon Sep 17 00:00:00 2001 From: Quentin Rodier <quentin.rodier@meteo.fr> Date: Wed, 13 Dec 2023 15:57:54 +0100 Subject: [PATCH] Quentin 13/12/2023: add check consistency for LLES_CS_MASK with LCONDSAMP --- src/MNH/read_exsegn.f90 | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/src/MNH/read_exsegn.f90 b/src/MNH/read_exsegn.f90 index 8fed63820..71f83b078 100644 --- a/src/MNH/read_exsegn.f90 +++ b/src/MNH/read_exsegn.f90 @@ -2994,6 +2994,14 @@ IF (CLES_NORM_TYPE=='EKMA' .AND. .NOT. LCORIO) THEN CLES_NORM_TYPE='NONE' END IF ! +IF (LLES_CS_MASK .AND. .NOT. LCONDSAMP) THEN + WRITE(ILUOUT,FMT=*) 'YOU WANT TO USE CONDITIONAL SAMPLING LES DIAG' + WRITE(ILUOUT,FMT=*) 'BUT THE CONDITIONAL SAMPLING IS NOT ACTIVATED' + WRITE(ILUOUT,FMT=*) 'USE NAM_CONDSAMP LCONDSAMP=T' + CALL PRINT_MSG(NVERB_FATAL,'GEN','READ_EXSEG_n','WITH LLES_CS_MASK=T YOU MUST USE LCONDSAMP=T') +END IF +! +! !* 4.7 Check the coherence with LNUMDIFF ! IF (L1D .AND. (LNUMDIFU .OR. LNUMDIFTH .OR. LNUMDIFSV) ) THEN -- GitLab