Update dev/emc from gsd/develop 2020/06/30 (ufs-community#30)

* Bugfix in tools/fv_diagnostics.F90: correct dimensions of delz in several routines
LarissaReames-NOAA · Jul 2, 2020 · 3c72ea7 · 3c72ea7
1 parent 61a6c1d
commit 3c72ea7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tools/fv_diagnostics.F90 b/tools/fv_diagnostics.F90
@@ -5572,7 +5572,7 @@ subroutine max_vorticity(is, ie, js, je, ng, km, zvir, sphum, delz, q, hydrostat
  real, intent(in):: grav, zvir, z_bot, z_top
  real, intent(in), dimension(is-ng:ie+ng,js-ng:je+ng,km):: pt
  real, intent(in), dimension(is:ie,js:je,km):: vort
- real, intent(in):: delz(is-ng:ie+ng,js-ng:je+ng,km)
+ real, intent(in):: delz(is:ie,js:je,km)
  real, intent(in):: q(is-ng:ie+ng,js-ng:je+ng,km,*)
  real, intent(in):: phis(is-ng:ie+ng,js-ng:je+ng)
  real, intent(in):: peln(is:ie,km+1,js:je)
@@ -5630,7 +5630,7 @@ subroutine max_uh(is, ie, js, je, ng, km, zvir, sphum, uphmax,uphmin, &
  real, intent(in):: grav, zvir, z_bot, z_top
  real, intent(in), dimension(is-ng:ie+ng,js-ng:je+ng,km):: pt, w
  real, intent(in), dimension(is:ie,js:je,km):: vort
- real, intent(in):: delz(is-ng:ie+ng,js-ng:je+ng,km)
+ real, intent(in):: delz(is:ie,js:je,km)
  real, intent(in):: q(is-ng:ie+ng,js-ng:je+ng,km,*)
  real, intent(in):: phis(is-ng:ie+ng,js-ng:je+ng)
  real, intent(in):: peln(is:ie,km+1,js:je)