Changeset 5161 for LMDZ6/branches/cirrus

Timestamp:

Aug 19, 2024, 5:14:19 PM (4 months ago)

Author:

aborella

Message:

Added a dependence of lscp PDF variance to clear sky area

File:

• LMDZ6/branches/cirrus/libf/phylmd/lmdz_lscp_condensation.F90 (modified) (2 diffs)

LMDZ6/branches/cirrus/libf/phylmd/lmdz_lscp_condensation.F90

@@ -617 +617 @@
         !--pdf_e1 and pdf_e2 will be reused below
 
-        pdf_e1 = beta_pdf_lscp * cell_area(i)**( 1. / 4. ) &
+        !--Coefficient for standard deviation:
+        !--  tuning coef * (clear sky area**0.25) * (function of temperature)
+        pdf_e1 = beta_pdf_lscp &
+               * ( ( 1. - cldfra(i) ) * cell_area(i) )**( 1. / 4. ) &
                * MAX( temp(i) - temp_thresh_pdf_lscp, 0. )
         IF ( rhl_clr .GT. rhlmid_pdf_lscp ) THEN
@@ -725 +728 @@
         !--pdf_e1 and pdf_e2 will be reused below
 
-        pdf_e1 = beta_pdf_lscp * cell_area(i)**( 1. / 4. ) &
+        !--Coefficient for standard deviation:
+        !--  tuning coef * (clear sky area**0.25) * (function of temperature)
+        pdf_e1 = beta_pdf_lscp &
+               * ( ( 1. - dcf_con(i) - cldfra(i) ) * cell_area(i) )**( 1. / 4. ) &
                * MAX( temp(i) - temp_thresh_pdf_lscp, 0. )
         IF ( rhl_clr .GT. rhlmid_pdf_lscp ) THEN