libsim
Versione 7.2.4
list_abstract
append
countelements
currentindex
currentpoli
delete
display
element
forward
insert
next
prepend
prev
rewind
seek
◆
next()
subroutine list_abstract::next
(
class(
list
), intent(inout)
this
)
private
increment list iterator
Definizione alla linea
279
del file
list_abstract.F03
.
280
if
(
index
== this%index)
then
281
seek =.true.
282
return
283
end if
284
285
if
(
index
< (this%index) .or. .not. c_e(this%index))
then
286
call
this%rewind()
287
end if
288
289
do
while
(this%element())
290
if
(
index
== this%index)
then
index
Index method.
Definition:
array_utilities_pre.F90:90
Generated with
Doxygen
.