|
◆ prepend()
subroutine list_abstract::prepend |
( |
class(list), intent(inout) |
this, |
|
|
class(*) |
value |
|
) |
| |
|
private |
add class(*) to beginning of list
Definizione alla linea 187 del file list_abstract.F03.
188 this%lastLink => newlink
190 this%index=this%index+1
193 this%currLink => newlink
198 integer function currentindex(this)
199 class(list), intent(in) :: this
200 currentindex=this%index
201 end function currentindex
204 subroutine rewind(this)
205 class(list), intent(inout) :: this
|