From f038d356cbf439cabaf66174173174e44897463c Mon Sep 17 00:00:00 2001 From: "Noah D. Brenowitz" Date: Mon, 8 Mar 2021 17:46:47 -0800 Subject: [PATCH] Change auto-conversion temperature threshold --- FV3/gfsphysics/physics/gfdl_cloud_microphys.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/FV3/gfsphysics/physics/gfdl_cloud_microphys.F90 b/FV3/gfsphysics/physics/gfdl_cloud_microphys.F90 index f92854ca3..9bb567ce9 100644 --- a/FV3/gfsphysics/physics/gfdl_cloud_microphys.F90 +++ b/FV3/gfsphysics/physics/gfdl_cloud_microphys.F90 @@ -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)