is_key_kt Function

public function is_key_kt(this, k) result(r)

Arguments

Type IntentOptional Attributes Name
class(amap_t), intent(in) :: this
type(key_t), intent(in) :: k

Return Value logical


Contents

Source Code

is_key_kt

Source Code

    function is_key_kt(this, k) result(r)
        class(amap_t), intent(in) :: this
        type(key_t), intent(in) :: k
        logical :: r
        r = this%find(k) > 0
    end function is_key_kt