Skip to content

Commit

Permalink
Fix bottom depth deepening in global_ocean init mode
Browse files Browse the repository at this point in the history
A bug was introduced in #6310 that made the ocean shallower
rather than deeper than the minimum allowed depth.  This
merge fixes that bug.
  • Loading branch information
xylar committed May 31, 2024
1 parent ef925d1 commit 9b4046c
Showing 1 changed file with 1 addition and 1 deletion.
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down

0 comments on commit 9b4046c

Please sign in to comment.