diff --git a/model/dyn_core.F90 b/model/dyn_core.F90
index 763654714..de9d7b7da 100644
--- a/model/dyn_core.F90
+++ b/model/dyn_core.F90
@@ -366,8 +366,8 @@ subroutine dyn_core(npx, npy, npz, ng, sphum, nq, bdt, n_split, zvir, cp, akap,
           endif
 !$OMP parallel do default(none) shared(is,ie,js,je,npz,diss_est)
           do k=1,npz
-            do j=js,je
-              do i=is,ie
+            do j=jsd,jed
+              do i=isd,ied
                 diss_est(i,j,k) = 0.
               enddo
             enddo