From 88d3b63e437827a634fe6c14df18a8e595991814 Mon Sep 17 00:00:00 2001 From: David A Minton Date: Fri, 10 Dec 2021 16:43:04 -0500 Subject: [PATCH] Set the firstkick flag in SyMBA to be equal to pl%lfirst if a Helio step is performed --- src/symba/symba_step.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/src/symba/symba_step.f90 b/src/symba/symba_step.f90 index f10850e7f..25616b3d7 100644 --- a/src/symba/symba_step.f90 +++ b/src/symba/symba_step.f90 @@ -33,6 +33,7 @@ module subroutine symba_step_system(self, param, t, dt) else self%irec = -1 call helio_step_system(self, param, t, dt) + param%lfirstkick = pl%lfirst end if end select end select