Changeset 5506 for LMDZ6/trunk


Ignore:
Timestamp:
Jan 23, 2025, 6:35:56 PM (12 hours ago)
Author:
evignon
Message:

petite correction pour le bilan d'eau en cas de neige soufflee du au changement de convention des flux

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r5505 r5506  
    54945494      !--compute ratio of what q+ql should be with conservation to what it is
    54955495      IF (ok_bs) THEN
    5496         corrqql=(qql1(i)+(evap(i)+snowerosion(i)-rain_fall(i)-snow_fall(i)-bs_fall(i))*pdtphys)/qql2(i)
     5496        corrqql=(qql1(i)+(evap(i)-snowerosion(i)-rain_fall(i)-snow_fall(i)-bs_fall(i))*pdtphys)/qql2(i)
    54975497      ELSE
    54985498        corrqql=(qql1(i)+(evap(i)-rain_fall(i)-snow_fall(i))*pdtphys)/qql2(i)
Note: See TracChangeset for help on using the changeset viewer.