diff --git a/src/symba/symba_step.f90 b/src/symba/symba_step.f90 index ae8645fba..368548832 100644 --- a/src/symba/symba_step.f90 +++ b/src/symba/symba_step.f90 @@ -29,12 +29,11 @@ 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) - param%lfirstkick = .true. else self%irec = -1 call helio_step_system(self, param, t, dt) - param%lfirstkick = pl%lfirst end if + param%lfirstkick = pl%lfirst end select end select end select