Fix bottom depth deepening in global_ocean init mode

A bug was introduced in E3SM-Project#6310 that made the ocean shallower rather than deeper than the minimum allowed depth. This merge fixes that bug.
xylar · May 31, 2024 · 9b4046c · 9b4046c
1 parent ef925d1
commit 9b4046c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/components/mpas-ocean/src/mode_init/mpas_ocn_init_global_ocean.F b/components/mpas-ocean/src/mode_init/mpas_ocn_init_global_ocean.F
@@ -894,7 +894,7 @@ subroutine ocn_init_setup_global_ocean_create_model_topo(domain, iErr)!{{{
              if (isOcean) then
                 ! Enforce minimum depth
                 bottomDepth(iCell) = max(bottomDepthObserved(iCell), config_global_ocean_minimum_depth)
-                bottomDepth(iCell) = min(bottomDepth(iCell), refBottomDepth(minimum_levels))
+                bottomDepth(iCell) = max(bottomDepth(iCell), refBottomDepth(minimum_levels))
 
                 maxLevelCell(iCell) = -1
                 do k = 1, nVertLevels