From 5884a928b8eac51e47a36b9137a564bca7fe0e25 Mon Sep 17 00:00:00 2001 From: Adam Kubaryk Date: Wed, 22 Jun 2022 17:44:35 +0000 Subject: [PATCH] addressing typo that prevented compilation --- physics/fv_sat_adj.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/physics/fv_sat_adj.F90 b/physics/fv_sat_adj.F90 index dc9b52595..0c4df0c5d 100644 --- a/physics/fv_sat_adj.F90 +++ b/physics/fv_sat_adj.F90 @@ -305,7 +305,7 @@ subroutine fv_sat_adj_run(mdt, zvir, is, ie, isd, ied, kmp, km, kmdelz, js, je, integer :: k, j, i #ifdef MULTI_GASES - real(kind=kind_dyn) :: qvip(isd_ied, jsd:jed, 1:ngas) + real(kind=kind_dyn) :: qvip(isd:ied, jsd:jed, 1:ngas) #endif ! Initialize the CCPP error handling variables