From 31613cd1ff80223ba7bb2aa51be508a540348df3 Mon Sep 17 00:00:00 2001 From: "Fuchs, Niels" <niels.fuchs@uni-hamburg.de> Date: Fri, 3 May 2024 09:08:39 +0000 Subject: [PATCH] adjust layer dynamics for core initializiation runs --- mo_layer_dynamics.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mo_layer_dynamics.f90 b/mo_layer_dynamics.f90 index 6602370..27d1c53 100644 --- a/mo_layer_dynamics.f90 +++ b/mo_layer_dynamics.f90 @@ -185,7 +185,7 @@ CONTAINS !! !! @par Revision History !! Pasted by Philipp Griewank, IMPRS (2011-05-10) - !! Edited by Niels Fuchs, UHH (2024-05-03), changed thick_0 to thick(k) in middle layers to work better with ice core initialization + !! Edited by Niels Fuchs, UHH (2024-05-03), changed thick_0 to thick(k) in middle layers to work better with ice core initialization, since middle layer thickness can vary SUBROUTINE top_melt (Nlayer,N_active,N_middle,N_top,thick_0,m,S_abs,H_abs,thick,N_bgc,bgc_abs) -- GitLab