fix ccpp_control crashed problem

climbfuji · Sep 21, 2019 · 1a024b7 · 1a024b7
1 parent 957ff82
commit 1a024b7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/physics/GFS_MP_generic.F90 b/physics/GFS_MP_generic.F90
@@ -304,7 +304,7 @@ subroutine GFS_MP_generic_post_run(im, ix, levs, kdt, nrcm, ncld, nncl, ntcw, nt
             if (total_precip > rainmin) then
               srflag(i) = (ice(i)+csnow)/total_precip
             endif
-          else
+          else if (imp_physics == imp_physics_gfdl .or. imp_physics == imp_physics_thompson ) then
             total_precip = snow0(i)+ice0(i)+graupel0(i)+rain0(i)+rainc(i)
             if (total_precip > rainmin) then
               srflag(i) = (snow0(i)+ice0(i)+graupel0(i)+csnow)/total_precip