def u32.mv_le

bend-osdev-algo@0.1.0.0 · PROOF.bend:932

import Base

932# a hypothesis about U32's order, as one about Nat's
933def u32.mv_le(+a: U32, +b: U32, -v: Bool, h: {U32.is_le(a, b) == v : Bool}) -> {Nat.is_le(U32.to_nat(a), U32.to_nat(b)) == v : Bool}:
934  %u32.cmp_nat(a, b) : {Cmp.is_le(_) == v : Bool}
935  h