Merge pull request ufs-community#3 from NOAA-SWPC/hotfix/satadj_typo

addressing typo that prevented compilation
WChen-NOAA · Jun 22, 2022 · 1836576 · 1836576
2 parents a57a62b + 5884a92
commit 1836576
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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