Skip to content

Commit 63f894d

Browse files
committed
Merge branch 'darincomeau/ocn/change-ais-ice-removal' (PR #6794)
Change range of solid ice runoff removal from 60S to 57S Extends the northern range of solid ice runoff from Antarctica from 60S to 57S when the ocean's namelist option config_remove_ais_ice_runoff = .true.. The new solid ice runoff mapping with increased smoothing for the SOwISC12to30E3r3 mesh in PR #6759 has a small amount of runoff north of 60S, which needs to be removed when Antarctic solid ice runoff is intended to be removed. [BFB] for all tested configuration
2 parents 6165581 + 38a4351 commit 63f894d

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

components/mpas-ocean/driver/ocn_comp_mct.F

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -2181,7 +2181,7 @@ subroutine ocn_import_mct(x2o_o, errorCode)!{{{
21812181
call shr_sys_abort ('Error: incoming rofi_F is negative')
21822182
end if
21832183
if (config_remove_ais_ice_runoff) then
2184-
if (latCell(i) < -1.04719666667_RKIND) then ! 60S in radians
2184+
if (latCell(i) < -0.99483767345_RKIND) then ! 57S in radians
21852185
removedIceRunoffFlux(i) = iceRunoffFlux(i)
21862186
iceRunoffFlux(i) = 0.0_RKIND
21872187
removedIceRunoffFluxThisProc = removedIceRunoffFluxThisProc + removedIceRunoffFlux(i)
@@ -3714,7 +3714,7 @@ subroutine ocn_import_moab(Eclock, errorCode)!{{{
37143714
call shr_sys_abort ('Error: incoming rofi_F is negative')
37153715
end if
37163716
if (config_remove_ais_ice_runoff) then
3717-
if (latCell(i) < -1.04719666667_RKIND) then ! 60S in radians
3717+
if (latCell(i) < -0.99483767345_RKIND) then ! 57S in radians
37183718
removedIceRunoffFlux(i) = iceRunoffFlux(i)
37193719
iceRunoffFlux(i) = 0.0_RKIND
37203720
removedIceRunoffFluxThisProc = removedIceRunoffFluxThisProc + removedIceRunoffFlux(i)

0 commit comments

Comments
 (0)