Skip to content

Commit e87d807

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 3c76780 commit e87d807

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
@@ -566,6 +566,10 @@ subroutine li_advection_thickness_tracers(&
566566
enddo
567567
endif
568568

569+
! Update halos after advection.
570+
call mpas_timer_start("halo updates")
571+
call mpas_dmpar_field_halo_exch(domain, 'layerThickness')
572+
call mpas_timer_stop("halo updates")
569573

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

0 commit comments

Comments
 (0)