From 69a102d14f2a4d7fe2cf73e58396acf661776538 Mon Sep 17 00:00:00 2001 From: daminton Date: Thu, 23 Feb 2017 12:52:43 +0000 Subject: [PATCH] Fixed initial conditions of soften equation --- src/io/io_input.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/io/io_input.f90 b/src/io/io_input.f90 index 0686c771..5b69fb4d 100644 --- a/src/io/io_input.f90 +++ b/src/io/io_input.f90 @@ -84,7 +84,7 @@ subroutine io_input(infile,user) user%testtally = .false. user%killatmaxcrater = .false. user%doporosity = .false. - user%soften_factor = 18.5_DP + user%soften_factor = 37.0_DP user%soften_slope = 1.8_DP user%ejecta_truncation = 10.0_DP