|
◆ append()
subroutine list_abstract::append |
( |
class(list) |
this, |
|
|
class(*) |
value |
|
) |
| |
|
private |
add class(*) to end of list
Definizione alla linea 151 del file list_abstract.F03.
153 end subroutine prepend
156 logical function insert(this, value, index)
159 integer, optional :: index
160 class(link), pointer :: newLink,nextlink
162 newlink => link( value)
164 if ( present( index)) then
165 insert = this%seek( index)
166 if (.not. insert) return
|