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)