libsim Versione 7.2.4
|
◆ dbadata_getc()
return character value
Definizione alla linea 964 del file dballe_class.F03. 965
966call this%rewind()
967do while(this%element())
968 print *,"index:",this%currentindex()," value:"
969 element=this%current()
970 call element%display()
971 call this%next()
972end do
973end subroutine displaydbaana
|