libsim Versione 7.2.0
|
◆ forward()
reset list iterator to end Definizione alla linea 246 del file list_abstractforchar.F03. 247
248function currentpoli(this)
249class(list) :: this
250character(len=listcharmaxlen) :: Currentpoli
251currentpoli = this%currLink%getValue()
252end function currentpoli
253
|