Changeset 6077 for LMDZ6/trunk/libf/phylmd/lmdz_lscp_main.f90

Timestamp:

Feb 16, 2026, 2:44:02 PM (6 days ago)

Author:

evignon

Message:

changemeent condition (simplification) appel nouvelle param de phase

File:

• LMDZ6/trunk/libf/phylmd/lmdz_lscp_main.f90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/lmdz_lscp_main.f90

@@ -746 +746 @@
                ! only in stratiform clouds in the mixed phase regime (Raillard et al. 2025)
                ! it overwrites temperature-dependent phase partitioning except for convective boundary layer clouds
-               pticefracturb(:) = (fraca(:, k) < min_frac_th_cld) .AND. (Tbef(:) .GT. temp_nowater) .AND. (Tbef(:) .LT. RTT)
+               pticefracturb(:) = (fraca(:, k) < min_frac_th_cld) 
                DO i = 1, klon
                   qincloud(i) = zqn(i)
@@ -768 +768 @@
                ! hence we assume that no snow falls in thermals.
                ! we activate only in the mixed phase regime not to distrub the cirrus param at very cold T
-               pticefracturb(:) = (Tbef(:) .GT. temp_nowater) .AND. (Tbef(:) .LT. RTT)
+               pticefracturb(:) = .TRUE.
                !Thermals
                DO i = 1, klon