diff --git a/src/symba/symba_encounter_check.f90 b/src/symba/symba_encounter_check.f90
index fc38cce69..4e71bf648 100644
--- a/src/symba/symba_encounter_check.f90
+++ b/src/symba/symba_encounter_check.f90
@@ -19,7 +19,7 @@ module function symba_encounter_check_pl(self, system, dt, irec) result(lencount
 
       associate(pl => self, npl => self%nbody)
          lencounter = .false.
-         do concurrent(j = 1:npl, pl%lmtiny(j))
+         do concurrent(j = 1:npl, .not.pl%lmtiny(j))
             do i = 1, npl
                rcrit = (pl%rhill(i) + pl%rhill(j)) * RHSCALE * (RSHELL**(irec))
                r2crit = r2crit**2