|
◆ 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.
143 end subroutine prepend
146 logical function insert(this, value, index)
148 character(len=*) :: value
149 integer, optional :: index
150 class(link), pointer :: newLink,nextlink
152 newlink => link( value)
154 if ( present( index)) then
155 insert = this%seek( index)
156 if (.not. insert) return
|