diff --git a/src/collision/collision_check.f90 b/src/collision/collision_check.f90
index 772d4a1a7..2fda012bd 100644
--- a/src/collision/collision_check.f90
+++ b/src/collision/collision_check.f90
@@ -10,6 +10,7 @@
 
 submodule (collision) s_collision_check
    use swiftest
+   use symba, only : symba_pl, symba_tp
 contains
 
    pure elemental subroutine collision_check_one(xr, yr, zr, vxr, vyr, vzr, Gmtot, rlim, dt, lvdotr, lcollision, lclosest)
@@ -94,7 +95,7 @@ module subroutine collision_check_plpl(self, system, param, t, dt, irec, lany_co
             lmask(:) = (self%status(1:nenc) == ACTIVE)
             select type(pl)
             class is (symba_pl)
-               lmask(:) = lmask(:).and. (pl%levelg(self%index1(1:nenc)) >= irec))
+               lmask(:) = lmask(:).and. (pl%levelg(self%index1(1:nenc)) >= irec)
             end select
             if (.not.any(lmask(:))) return