From 6ee6df60ca69743bab195fc4b04a891e91bdaeaf Mon Sep 17 00:00:00 2001 From: Ted Mansell Date: Mon, 25 Sep 2023 12:33:46 -0500 Subject: [PATCH] module_mp_nssl_2mom.F90: removed unneeded lines --- physics/module_mp_nssl_2mom.F90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/physics/module_mp_nssl_2mom.F90 b/physics/module_mp_nssl_2mom.F90 index a373ddaf9..a40a62f02 100644 --- a/physics/module_mp_nssl_2mom.F90 +++ b/physics/module_mp_nssl_2mom.F90 @@ -21238,7 +21238,6 @@ subroutine nssl_2mom_gs & pqwvi(mgs) = & & -Min(0.0, qrcev(mgs)) & & -Min(0.0, qhcev(mgs)) & - & -Min(0.0, qfcev(mgs)) & & -Min(0.0, qhlcev(mgs)) & & -Min(0.0, qscev(mgs)) & ! > +il5(mgs)*(-qhsbv(mgs) - qhlsbv(mgs) ) & @@ -21249,7 +21248,6 @@ subroutine nssl_2mom_gs & pqwvd(mgs) = & & -Max(0.0, qrcev(mgs)) & & -Max(0.0, qhcev(mgs)) & - & -Max(0.0, qfcev(mgs)) & & -Max(0.0, qhlcev(mgs)) & & -Max(0.0, qscev(mgs)) & & +il5(mgs)*(-qiint(mgs) &