From f5807f2e53fc58c9b31de8617776e54961826198 Mon Sep 17 00:00:00 2001 From: David A Minton Date: Tue, 19 Oct 2021 10:13:41 -0400 Subject: [PATCH] Fixed bug in which the wrong value was printed to the dump files for the escaped angular momentum --- src/io/io.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/io/io.f90 b/src/io/io.f90 index b64fde43d..28ef8d143 100644 --- a/src/io/io.f90 +++ b/src/io/io.f90 @@ -1000,7 +1000,7 @@ module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) call io_param_writer_one("LTOT_ORIG", param%Ltot_orig(:), unit) call io_param_writer_one("LORBIT_ORIG", param%Lorbit_orig(:), unit) call io_param_writer_one("LSPIN_ORIG", param%Lspin_orig(:), unit) - call io_param_writer_one("LESCAPE", param%Lspin_orig(:), unit) + call io_param_writer_one("LESCAPE", param%Lescape(:), unit) call io_param_writer_one("GMESCAPE",param%GMescape, unit) call io_param_writer_one("ECOLLISIONS",param%Ecollisions, unit) call io_param_writer_one("EUNTRACKED",param%Euntracked, unit)