From f9af5d7c7bcd34b5f9dbb9d9b20a382d2d643f04 Mon Sep 17 00:00:00 2001 From: David A Minton Date: Mon, 16 Aug 2021 18:15:50 -0400 Subject: [PATCH] Added coordinate transform step before resolving collisions to get all the coordinates consistenent between barycentric and heliocentric before starting the fragment code --- src/symba/symba_collision.f90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/symba/symba_collision.f90 b/src/symba/symba_collision.f90 index 80a9550bb..2e4d50b58 100644 --- a/src/symba/symba_collision.f90 +++ b/src/symba/symba_collision.f90 @@ -1083,6 +1083,8 @@ module subroutine symba_collision_resolve_plplenc(self, system, param, t) if (plplcollision_list%nenc == 0) return ! No collisions to resolve write(*, *) "Collision between massive bodies detected at time t = ", t + call pl%vb2vh(system%cb) + call pl%h2b(system%cb) if (param%lfragmentation) then call plplcollision_list%resolve_fragmentations(system, param) else