libsim Versione 7.2.1

◆ append()

subroutine append ( class(list), intent(inout)  this,
class(*), intent(in)  value 
)
private

add class(*) to end of list

Definizione alla linea 151 del file list_abstract.F03.

152end if
153end subroutine prepend
154
156logical function insert(this, value, index)
157class(list),intent(inout) :: this
158class(*) :: value
159integer :: index ! removed optional because of inconsistent behavior
160class(link), pointer :: newLink,nextlink
161
162newlink => link(value)
163
164!if (present(index)) then
165 insert = this%seek(index)
166 if (.not. insert) return
167!else
168! insert=.true.
169!end if
170
Index method.

Generated with Doxygen.