From ac5366c623b36c9b27f40d4ab3d3cdd91eded787 Mon Sep 17 00:00:00 2001
From: Nicholas Szapiro <149816583+NickSzapiro-NOAA@users.noreply.github.com>
Date: Thu, 31 Jul 2025 17:11:37 -0400
Subject: [PATCH] Add vicen, vsnon to zap_small_areas

---
 columnphysics/icepack_itd.F90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/columnphysics/icepack_itd.F90 b/columnphysics/icepack_itd.F90
index b1dd015df..312dfb576 100644
--- a/columnphysics/icepack_itd.F90
+++ b/columnphysics/icepack_itd.F90
@@ -1097,8 +1097,8 @@ subroutine zap_small_areas (dt,                      &
             call icepack_warnings_setabort(.true.,__FILE__,__LINE__)
             call icepack_warnings_add(subname//' Zap ice: negative ice area')
             return
-         elseif (abs(aicen(n)) /= c0 .and. &
-                 abs(aicen(n)) <= puny) then
+         elseif (abs(aicen(n)) <= puny .and. &
+                 (abs(aicen(n)) /= c0 .or. abs(vicen(n)) /= c0 .or. abs(vsnon(n)) /= c0)) then
 
       !-----------------------------------------------------------------
       ! Account for tracers important for conservation