libsim Versione 7.2.1

◆ rewind()

subroutine rewind ( class(list) this)
private

reset list iterator to start

Definizione alla linea 235 del file list_abstractforchar.F03.

236 if (this%element())then
237 if(c_e(this%index))this%index=this%index-1
238 else
239 this%index=imiss
240 end if
241
242end if

Generated with Doxygen.