Skip to content

Commit 8fe44f0

Browse files
committed
Update layerThickness halos after advection
Update layerThickness halos after advection. This reduces the error in a test with 500 m/yr face-melt, so it seems to be necessary, but it does not solve the issue entirely.
1 parent fb51715 commit 8fe44f0

File tree

1 file changed

+4
-0
lines changed

1 file changed

+4
-0
lines changed

components/mpas-albany-landice/src/mode_forward/mpas_li_advection.F

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -560,6 +560,10 @@ subroutine li_advection_thickness_tracers(&
560560
enddo
561561
endif
562562

563+
! Update halos after advection.
564+
call mpas_timer_start("halo updates")
565+
call mpas_dmpar_field_halo_exch(domain, 'layerThickness')
566+
call mpas_timer_stop("halo updates")
563567

564568
! Calculate dynamicThickening (layerThickness is updated by advection at this point, while thickness is still old)
565569
dynamicThickening = (sum(layerThickness, 1) - thickness) / dt * scyr ! units of m/yr

0 commit comments

Comments
 (0)