diff --git a/src/symba/symba_step.f90 b/src/symba/symba_step.f90 index 29011331d..183105b35 100644 --- a/src/symba/symba_step.f90 +++ b/src/symba/symba_step.f90 @@ -38,6 +38,7 @@ module subroutine symba_step_system(self, param, t, dt) lencounter = pl%encounter_check(param, self, dt, 0) .or. tp%encounter_check(param, self, dt, 0) if (lencounter) then call self%interp(param, t, dt) + call self%encounter_history%dump(param) else self%irec = -1 call helio_step_system(self, param, t, dt)