~/jendhub

def wb.lts

bend-osdev-word64@0.1.1.0 · PROOF_bits.bend:137

import bend-osdev-word64@0.1.1.0/PROOF_bits.bend as PROOFBits
import Base
import bend-osdev-word64@0.1.1.0/proof_value.bend as P

137def wb.lts(x: Nat, y: Nat) -> {Nat.is_lt(x, 1n+y) == Nat.is_le(x, y) : Bool}:
138  Equal.sym(Bool, Nat.is_le(1n+x, 1n+y), Nat.is_lt(x, 1n+y), P.wn.le_succ(x, 1n+y))

Uses (6)

Used by (1)