libsim  Versione 7.1.6

◆ next()

subroutine list_abstract::next ( class(list this)
private

increment list iterator

Definizione alla linea 267 del file list_abstract.F03.

268 
269 element = associated(this%currLink)
270 end function element
271 
274 logical function seek(this, index)
275 class(list) :: this
276 integer :: index
277 
278 if (index == this%index) then
Index method.

Generated with Doxygen.