Skip to content
Snippets Groups Projects
Commit edbe5607 authored by RODIER Quentin's avatar RODIER Quentin
Browse files

Quentin 13/12/2023: add check consistency for LLES_CS_MASK with LCONDSAMP

parent 6e6d4696
No related branches found
No related tags found
No related merge requests found
......@@ -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
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment