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