Add missing halo update for visc%Kv_slow

NOAA-GFDL · Apr 19, 2018 · 78656bb · 78656bb
1 parent 9d6cb46
commit 78656bb
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/parameterizations/vertical/MOM_diabatic_driver.F90 b/src/parameterizations/vertical/MOM_diabatic_driver.F90
@@ -1372,6 +1372,9 @@ subroutine diabatic(u, v, h, tv, Hml, fluxes, visc, ADp, CDp, dt, Time_end, G, G
   ! visc%Kv_shear is not in the group pass because it has larger vertical extent.
   if (associated(visc%Kv_shear)) &
     call pass_var(visc%Kv_shear, G%Domain, To_All+Omit_Corners, halo=1)
+  if (associated(visc%Kv_slow)) &
+    call pass_var(visc%Kv_slow, G%Domain, To_All+Omit_Corners, halo=1)
+
   call cpu_clock_end(id_clock_pass)
 
   if (.not. CS%useALEalgorithm) then