libsim
Versione 7.1.7
list_abstractforchar
append
countelements
currentindex
currentpoli
delete
display
element
forward
insert
next
prepend
prev
rewind
seek
◆
prev()
subroutine list_abstractforchar::prev
(
class(
list
)
this
)
private
increment list iterator
Definizione alla linea
272
del file
list_abstractforchar.F03
.
273
if
(
index
< (this%index) .or. .not. c_e(this%index))
then
274
call
this%rewind()
275
end if
276
277
do
while
(this%element())
278
if
(
index
== this%index)
then
279
seek =.true.
280
return
281
end if
282
call
this%next()
283
end do
284
index
Index method.
Definition:
array_utilities_pre.F90:78
Generated with
Doxygen
.