From c1524a9801241d9ba20453536ddc705a7bd55e76 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?S=C3=A9bastien=20Riette?= <sebastien.riette@meteo.fr> Date: Tue, 30 May 2023 12:10:18 +0200 Subject: [PATCH] Comments for default values --- src/common/micro/modd_nebn.F90 | 5 +++++ src/common/micro/modd_param_icen.F90 | 5 +++++ src/common/micro/modd_param_lima.F90 | 5 +++++ src/common/turb/modd_param_mfshalln.F90 | 5 +++++ src/common/turb/modd_turbn.F90 | 5 +++++ 5 files changed, 25 insertions(+) diff --git a/src/common/micro/modd_nebn.F90 b/src/common/micro/modd_nebn.F90 index 459b4cfbd..51cebc560 100644 --- a/src/common/micro/modd_nebn.F90 +++ b/src/common/micro/modd_nebn.F90 @@ -165,6 +165,11 @@ IF(PRESENT(KPRINT )) IPRINT =KPRINT ! ----------------- ! IF(LLDEFAULTVAL) THEN + !NOTES ON GENERAL DEFAULTS AND MODEL-SPECIFIC DEFAULTS : + !- General default values *MUST* remain unchanged. + !- To change the default value for a given application, + ! an "IF(HPROGRAM=='...')" condition must be used. + !Freezing between 0 and -20. Other possibilities are 0/-40 or -5/-25 XTMAXMIX = 273.16 XTMINMIX = 253.16 diff --git a/src/common/micro/modd_param_icen.F90 b/src/common/micro/modd_param_icen.F90 index 78100cba2..af4d288bf 100644 --- a/src/common/micro/modd_param_icen.F90 +++ b/src/common/micro/modd_param_icen.F90 @@ -297,6 +297,11 @@ IF(PRESENT(KPRINT )) IPRINT =KPRINT ! ----------------- ! IF(LLDEFAULTVAL) THEN + !NOTES ON GENERAL DEFAULTS AND MODEL-SPECIFIC DEFAULTS : + !- General default values *MUST* remain unchanged. + !- To change the default value for a given application, + ! an "IF(HPROGRAM=='...')" condition must be used. + LWARM=.TRUE. LSEDIC=.TRUE. LDEPOSC=.FALSE. diff --git a/src/common/micro/modd_param_lima.F90 b/src/common/micro/modd_param_lima.F90 index b1f61e2ee..04b5ff4ae 100644 --- a/src/common/micro/modd_param_lima.F90 +++ b/src/common/micro/modd_param_lima.F90 @@ -625,6 +625,11 @@ IF(PRESENT(KPRINT )) IPRINT =KPRINT ! ----------------- ! IF(LLDEFAULTVAL) THEN + !NOTES ON GENERAL DEFAULTS AND MODEL-SPECIFIC DEFAULTS : + !- General default values *MUST* remain unchanged. + !- To change the default value for a given application, + ! an "IF(HPROGRAM=='...')" condition must be used. + LNUCL=.TRUE. LSEDI=.TRUE. LHHONI = .FALSE. diff --git a/src/common/turb/modd_param_mfshalln.F90 b/src/common/turb/modd_param_mfshalln.F90 index d946794f8..664812c58 100644 --- a/src/common/turb/modd_param_mfshalln.F90 +++ b/src/common/turb/modd_param_mfshalln.F90 @@ -248,6 +248,11 @@ IF(PRESENT(KPRINT )) IPRINT =KPRINT ! ----------------- ! IF(LLDEFAULTVAL) THEN + !NOTES ON GENERAL DEFAULTS AND MODEL-SPECIFIC DEFAULTS : + !- General default values *MUST* remain unchanged. + !- To change the default value for a given application, + ! an "IF(HPROGRAM=='...')" condition must be used. + XIMPL_MF=1. CMF_UPDRAFT='EDKF' CMF_CLOUD='DIRE' diff --git a/src/common/turb/modd_turbn.F90 b/src/common/turb/modd_turbn.F90 index 581456767..13756ffc7 100644 --- a/src/common/turb/modd_turbn.F90 +++ b/src/common/turb/modd_turbn.F90 @@ -297,6 +297,11 @@ IF(PRESENT(KPRINT )) IPRINT =KPRINT ! ----------------- ! IF(LLDEFAULTVAL) THEN + !NOTES ON GENERAL DEFAULTS AND MODEL-SPECIFIC DEFAULTS : + !- General default values *MUST* remain unchanged. + !- To change the default value for a given application, + ! an "IF(HPROGRAM=='...')" condition must be used. + XIMPL = 1. XTKEMIN = 0.01 XCED = XUNDEF -- GitLab