diff --git a/src/symba/symba_io.f90 b/src/symba/symba_io.f90 index 06472aae9..1c0981232 100644 --- a/src/symba/symba_io.f90 +++ b/src/symba/symba_io.f90 @@ -278,7 +278,7 @@ module subroutine symba_io_read_particle(system, param) lmatch = .false. read(LUN, err = 667, iomsg = errmsg, end = 333) id - if (idx == cb%id) then + if (id == cb%id) then read(LUN, err = 667, iomsg = errmsg) cb%info lmatch = .true. else