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