~/jendhub

def is_seg_t

bend-osdev-acpi@0.1.1.0 · PROOF.bend:2039

import bend-osdev-acpi@0.1.1.0/PROOF.bend as PROOF
import Base
import bend-osdev-acpi@0.1.1.0/aml_name.bend as N

2039def is_seg_t(+k: N.AmlLeadKind, +e: {N.AmlLead.is_seg(k) == True{} : Bool}) -> {N.AmlLSeg{} == k : N.AmlLeadKind}:
2040  match k:
2041    case N.AmlLSeg{}:
2042      {==}
2043    case N.AmlLRoot{}:
2044      Empty.absurd({N.AmlLSeg{} == N.AmlLRoot{} : N.AmlLeadKind}, ft_absurd(e))
2045    case N.AmlLParent{}:
2046      Empty.absurd({N.AmlLSeg{} == N.AmlLParent{} : N.AmlLeadKind}, ft_absurd(e))
2047    case N.AmlLDual{}:
2048      Empty.absurd({N.AmlLSeg{} == N.AmlLDual{} : N.AmlLeadKind}, ft_absurd(e))
2049    case N.AmlLMulti{}:
2050      Empty.absurd({N.AmlLSeg{} == N.AmlLMulti{} : N.AmlLeadKind}, ft_absurd(e))
2051    case N.AmlLNull{}:
2052      Empty.absurd({N.AmlLSeg{} == N.AmlLNull{} : N.AmlLeadKind}, ft_absurd(e))
2053    case N.AmlLOther{}:
2054      Empty.absurd({N.AmlLSeg{} == N.AmlLOther{} : N.AmlLeadKind}, ft_absurd(e))

Uses (5)

Used by (1)