def high_u

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/width.bend:225

import Base
import bend-collections-laws-math@1.0.0.0/spec/lib/common.bend as C

225def high_u(+k: Nat, +r: Nat, +q: Nat, +hr: {C.fits(k, r) == True{} : Bool}) -> {C.high(k, Nat.add(r, C.shift(k, q))) == q : Nat}:
226  high_uniq(k, r, q, lt_of_fits(k, r, hr))