Quentin 16/10/2023: PHYEX fix name of CTURBLEN, was HM21 instead of ADAP

src/common/turb/modd_turbn.F90

@@ -415,9 +415,9 @@ ENDIF
 !
 IF(LLCHECK) THEN
   CALL CHECK_NAM_VAL_CHAR(KLUOUT, 'CTURBDIM', CTURBDIM, '1DIM', '3DIM')
-  CALL CHECK_NAM_VAL_CHAR(KLUOUT, 'CTURBLEN', CTURBLEN, 'DELT', 'BL89', 'RM17', 'DEAR', 'BLKR', 'ADAP')
+  CALL CHECK_NAM_VAL_CHAR(KLUOUT, 'CTURBLEN', CTURBLEN, 'DELT', 'BL89', 'RM17', 'DEAR', 'BLKR', 'HM21')
   CALL CHECK_NAM_VAL_CHAR(KLUOUT, 'CTOM', CTOM, 'NONE', 'TM06')
-  CALL CHECK_NAM_VAL_CHAR(KLUOUT, 'CTURBLEN_CLOUD', CTURBLEN_CLOUD, 'DELT', 'BL89', 'RM17', 'DEAR', 'BLKR', 'ADAP')
+  CALL CHECK_NAM_VAL_CHAR(KLUOUT, 'CTURBLEN_CLOUD', CTURBLEN_CLOUD, 'DELT', 'BL89', 'RM17', 'DEAR', 'BLKR', 'HM21')
 
 ENDIF
 !

src/common/turb/mode_ini_turb.F90

@@ -82,7 +82,7 @@ IF(XCED == XUNDEF) THEN
   !       Schmidt-Schumann      (1989) = 0.845
   !       Cheng-Canuto-Howard   (2002) = 0.845
   !       Rodier, Masson, Couvreux, Paci (2017) = 0.34
-  IF(CTURBLEN=='RM17' .OR. CTURBLEN=='ADAP') THEN
+  IF(CTURBLEN=='RM17' .OR. CTURBLEN=='HM21') THEN
     XCED=0.34
   ELSE
     IF(HPROGRAM=='AROME') THEN