Skip to content

Commit

Permalink
Change auto-conversion temperature threshold
Browse files Browse the repository at this point in the history
  • Loading branch information
nbren12 committed Mar 9, 2021
1 parent 2b5aab2 commit f038d35
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion FV3/gfsphysics/physics/gfdl_cloud_microphys.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1275,7 +1275,7 @@ subroutine warm_rain (dt, ktop, kbot, dp, dz, tz, qv, ql, qr, qi, qs, qg, &

do k = ktop, kbot
qc0 = fac_rc * ccn (k)
if (tz (k) > t_wfr + dt_fr) then
if (tz (k) > t_wfr) then
dl (k) = min (max (1.e-6, dl (k)), 0.5 * ql (k))
! --------------------------------------------------------------------
! as in klein's gfdl am2 stratiform scheme (with subgrid variations)
Expand Down

0 comments on commit f038d35

Please sign in to comment.