libsim Versione 7.2.1

◆ rewind()

subroutine rewind ( class(list), intent(inout) this)
private

reset list iterator to start

Definizione alla linea 245 del file list_abstract.F03.

246 if (this%element())then
247 if(c_e(this%index))this%index=this%index-1
248 else
249 this%index=imiss
250 end if
251
252end if

Generated with Doxygen.