Changeset 5240 for LMDZ6/trunk


Ignore:
Timestamp:
Oct 17, 2024, 11:33:43 AM (2 months ago)
Author:
Laurent Fairhead
Message:

For convergence purposes
AB

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/lmdz_lscp_condensation.F90

    r5238 r5240  
    115115
    116116    pdf_std   = ratqs(i) * qtot(i)
    117     pdf_k     = -SQRT( LOG( 1. + (pdf_std / qtot(i))**2. ) )
     117    pdf_k     = -SQRT( LOG( 1. + (pdf_std / qtot(i))**2 ) )
    118118    pdf_delta = LOG( qtot(i) / ( gamma_cond(i) * qsat(i) ) )
    119119    pdf_a     = pdf_delta / ( pdf_k * SQRT(2.) )
Note: See TracChangeset for help on using the changeset viewer.