libsim  Versione 7.1.9

◆ countelements()

integer function list_abstract::countelements ( class(list), intent(inout)  this)
private

count values in list

Definizione alla linea 134 del file list_abstract.F03.

135 class(list),intent(inout) :: this
136 class(*) :: value
137 class(link), pointer :: newLink
138 
139 newlink => link(value)
140 this%currLink => newlink
141 
142 if (.not. associated(this%firstLink)) then
143  this%firstLink => newlink
144  this%lastLink => newlink
145  this%index=1
146 else

Generated with Doxygen.