t_io Function

private function t_io(this) result(t_do_io)

Type Bound

gdata_io_t

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t), intent(in) :: this

Return Value logical


Source Code

    function t_io(this) result(t_do_io)
        ! Returns if any gdata read/write is happening
        ! Output: t_do_io - true if gdata shall be read/written
        class(gdata_io_t), intent(in) :: this
        logical :: t_do_io

        t_do_io = this%entry_size() > 0
    end function t_io