libsim  Versione 7.1.9

◆ next()

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

increment list iterator

Definizione alla linea 257 del file list_abstractforchar.F03.

258 
259 element = associated(this%currLink)
260 end function element
261 
264 logical function seek(this, index)
265 class(list) :: this
266 integer :: index
267 
268 if (index == this%index) then
Index method.

Generated with Doxygen.