From 5624f371ae22a1f7bda62bd3c2702ed4da9df476 Mon Sep 17 00:00:00 2001 From: David A Minton Date: Wed, 14 Dec 2022 17:30:36 -0500 Subject: [PATCH] Made sure not to try to dump the encounter or collision history file if they don't exist because those features are not enabled. --- src/io/io.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/io/io.f90 b/src/io/io.f90 index 54f99e42b..79b72bb77 100644 --- a/src/io/io.f90 +++ b/src/io/io.f90 @@ -267,8 +267,8 @@ module subroutine io_dump_system(self, param) ! Dump the encounter history if necessary select type(param) class is (symba_parameters) - call param%encounter_history%dump(param) - call param%collision_history%dump(param) + if (param%lenc_save_trajectory .or. param%lenc_save_closest) call param%encounter_history%dump(param) + if (param%lfragmentation) call param%collision_history%dump(param) end select ! Dump the system history to file