From 5be9befa6682650f58055366b649beb7eb9381b9 Mon Sep 17 00:00:00 2001 From: David A Minton Date: Mon, 18 Jul 2022 13:09:32 -0400 Subject: [PATCH] Reduced the size of the regolith buffer to prevent underflow. --- src/util/util_init_list.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/util/util_init_list.f90 b/src/util/util_init_list.f90 index 672f9c11..46249dc0 100644 --- a/src/util/util_init_list.f90 +++ b/src/util/util_init_list.f90 @@ -73,7 +73,7 @@ subroutine util_init_list(regolayer,initstat) if (allocstat == 0) then initstat = .true. nullify(regolayer%next) - regolayer%regodata%thickness = VBIG ! This generates a buffer layer that the model should never reach if the run is structured properly + regolayer%regodata%thickness = VBIG / 1e6_DP ! This generates a buffer layer that the model should never reach if the run is structured properly regolayer%regodata%comp = 0.0_DP regolayer%regodata%meltfrac = 0.0_DP regolayer%regodata%porosity = 0.0_DP