libsim  Versione6.3.0

◆ delete()

logical function list_abstract::delete ( class(list this,
integer, optional  index 
)
private

delete values from list return .true.

if succes

Definizione alla linea 356 del file list_abstract.F03.

356 this%currLink => prevlink
357 
358 if (associated(this%firstLink))then
359  this%index=max(this%index-1,1)
360 else
361  this%index=imiss ! index to current
362 endif
363 
364 end subroutine deleteitem
365 end function delete
366 
367 end module list_abstract
368 
abstract class to use lists in fortran 2003.
Distruttori per le 2 classi.

Generated with Doxygen.