libsim Versione 7.2.1

◆ append()

subroutine append ( class(list) this,
character(len=*) value )
private

add class(*) to end of list

Definizione alla linea 141 del file list_abstractforchar.F03.

142end if
143end subroutine prepend
144
146logical function insert(this, value, index)
147class(list) :: this
148character(len=*) :: value
149integer,optional :: index
150class(link), pointer :: newLink,nextlink
151
152newlink => link(value)
153
154if (present(index)) then
155 insert = this%seek(index)
156 if (.not. insert) return
157else
158 insert=.true.
159end if
160
Index method.

Generated with Doxygen.