~/jendhub

def uq.hc

bend-osdev-algo@0.1.0.0 · proof_u32.bend:299

import bend-osdev-algo@0.1.0.0/proof_u32.bend as ProofU32
import Base

299def uq.hc(+y: Nat, +x: Nat, h: {Nat.is_le(uq.bv(False{}, y), uq.bv(True{}, x)) == True{} : Bool}) -> {Nat.is_le(y, x) == True{} : Bool}:
300  %uq.fin_le_ft(Nat.cmp(y, x)) : {_ == True{} : Bool}
301  uq.le_bits(y, x, False{}, True{}, h)

Uses (7)

Used by (1)