def bb_pos

bend-collections-laws-crypto@1.0.0.0 · proofs/crypto/secp256k1/negate.bend:32

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

32def bb_pos(+one: Nat, +h1: {one == 1n : Nat}) -> {Nat.is_le(1n, C.shift(8n, one)) == True{} : Bool}:
33  %Equal.sym(Nat, one, 1n, h1) : {Nat.is_le(1n, C.shift(8n, _)) == True{} : Bool}
34  {==}