Changeset 5161 for LMDZ6/branches


Ignore:
Timestamp:
Aug 19, 2024, 5:14:19 PM (4 weeks ago)
Author:
aborella
Message:

Added a dependence of lscp PDF variance to clear sky area

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/branches/cirrus/libf/phylmd/lmdz_lscp_condensation.F90

    r5041 r5161  
    617617        !--pdf_e1 and pdf_e2 will be reused below
    618618
    619         pdf_e1 = beta_pdf_lscp * cell_area(i)**( 1. / 4. ) &
     619        !--Coefficient for standard deviation:
     620        !--  tuning coef * (clear sky area**0.25) * (function of temperature)
     621        pdf_e1 = beta_pdf_lscp &
     622               * ( ( 1. - cldfra(i) ) * cell_area(i) )**( 1. / 4. ) &
    620623               * MAX( temp(i) - temp_thresh_pdf_lscp, 0. )
    621624        IF ( rhl_clr .GT. rhlmid_pdf_lscp ) THEN
     
    725728        !--pdf_e1 and pdf_e2 will be reused below
    726729
    727         pdf_e1 = beta_pdf_lscp * cell_area(i)**( 1. / 4. ) &
     730        !--Coefficient for standard deviation:
     731        !--  tuning coef * (clear sky area**0.25) * (function of temperature)
     732        pdf_e1 = beta_pdf_lscp &
     733               * ( ( 1. - dcf_con(i) - cldfra(i) ) * cell_area(i) )**( 1. / 4. ) &
    728734               * MAX( temp(i) - temp_thresh_pdf_lscp, 0. )
    729735        IF ( rhl_clr .GT. rhlmid_pdf_lscp ) THEN
Note: See TracChangeset for help on using the changeset viewer.