Revert #302 (#317)

NOAA-GFDL · Jan 26, 2024 · 9ca1468 · 9ca1468
1 parent e3fc72b
commit 9ca1468
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/model/fv_mapz.F90 b/model/fv_mapz.F90
@@ -2044,7 +2044,6 @@ subroutine cs_profile(qs, a4, delp, km, i1, i2, iv, kord)
  grat = delp(i,km-1) / delp(i,km)
  q(i,km) = ( 3.*(a4(1,i,k-1)+d4(i)*a4(1,i,k)) - grat*qs(i) - q(i,k-1) )/bet
  q(i,km+1) = qs(i)
- gam(i,km) = d4(i) / bet
  enddo
 
  else ! all others