diff --git a/src/symba/symba_collision.f90 b/src/symba/symba_collision.f90 index fd4eae517..798d1698d 100644 --- a/src/symba/symba_collision.f90 +++ b/src/symba/symba_collision.f90 @@ -915,6 +915,7 @@ subroutine symba_collision_mergeaddsub(system, param, family, id_frag, Ip_frag, end if call plnew%set_mu(cb) + call plnew%set_rhill(cb) !Copy over or set integration parameters for new bodies plnew%lcollision(1:nfrag) = .false. plnew%ldiscard(1:nfrag) = .false.