libsim  Versione 7.1.7

◆ append()

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

add class(*) to end of list

Definizione alla linea 141 del file list_abstractforchar.F03.

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

Generated with Doxygen.