Revert "Calculate layerThickness after calving in RK loop"

This reverts commit 5e23b98.
MALI-Dev · Nov 6, 2023 · 8604210 · 8604210
1 parent 5e23b98
commit 8604210
Showing 1 changed file with 0 additions and 2 deletions.
diff --git a/components/mpas-albany-landice/src/mode_forward/mpas_li_time_integration_fe_rk.F b/components/mpas-albany-landice/src/mode_forward/mpas_li_time_integration_fe_rk.F
@@ -403,8 +403,6 @@ subroutine li_time_integrator_forwardeuler_rungekutta(domain, err)
             call mpas_pool_get_array(thermalPool, 'temperature', temperature)
             call mpas_pool_get_array(thermalPool, 'waterFrac', waterFrac)
 
-            ! get layerThickness after calving
-            call li_calculate_layerThickness(meshPool, thickness, layerThickness)
             layerThicknessTmp(:,:) = layerThickness(:,:)
             layerThickness(:,:) = rkSSPweights(rkStage) * layerThicknessPrev(:,:) + &
                                      (1.0_RKIND - rkSSPweights(rkStage)) * layerThickness(:,:)