Skip to content
This repository was archived by the owner on Aug 28, 2024. It is now read-only.

Commit

Permalink
Added a xh2xb call before saving collisional position vectors
Browse files Browse the repository at this point in the history
  • Loading branch information
daminton committed Aug 16, 2021
1 parent 3b7603f commit 4e951ab
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions src/symba/symba_collision.f90
Original file line number Diff line number Diff line change
Expand Up @@ -451,6 +451,7 @@ module function symba_collision_check_encounter(self, system, param, t, dt, irec
end do
end if

if (any(lcollision(1:nenc))) call pl%xh2xb(system%cb) ! Update the central body barycenteric position vector to get us out of DH and into bary
do k = 1, nenc
if (lcollision(k)) self%status(k) = COLLISION
self%t(k) = t
Expand Down

0 comments on commit 4e951ab

Please sign in to comment.