diff --git a/src/symba/symba_step.f90 b/src/symba/symba_step.f90
index 68071a8ab..accb9659b 100644
--- a/src/symba/symba_step.f90
+++ b/src/symba/symba_step.f90
@@ -72,7 +72,7 @@ module subroutine symba_step_interp_system(self, param, t, dt)
       ! Internals
       real(DP)                                  :: dth   !! Half step size
 
-      select type(pl => selfpl)
+      select type(pl => self%pl)
       class is (symba_pl)
       select type(tp => self%tp)
       class is (symba_tp)