From d4d8a36fd16a4fd8610b361a73561b506c373a8f Mon Sep 17 00:00:00 2001 From: TillRasmussen Date: Mon, 1 Jan 2024 16:43:15 +0000 Subject: [PATCH] forgotten --- cicecore/cicedyn/dynamics/ice_transport_remap.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/cicecore/cicedyn/dynamics/ice_transport_remap.F90 b/cicecore/cicedyn/dynamics/ice_transport_remap.F90 index 2d74761cf..7aa38a281 100644 --- a/cicecore/cicedyn/dynamics/ice_transport_remap.F90 +++ b/cicecore/cicedyn/dynamics/ice_transport_remap.F90 @@ -1426,7 +1426,7 @@ subroutine limited_gradient (nx_block, ny_block, & puny , & ! gxtmp, gytmp ! temporary term for x- and y- limited gradient - character(len=*), parameter :: subname = '(limited_gradient_cn_2d)' + character(len=*), parameter :: subname = '(limited_gradient)' call icepack_query_parameters(puny_out=puny) call icepack_warnings_flush(nu_diag)