def not01
import bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/sel.bend as Selimport Base
import bend-collections-laws-crypto@1.0.0.0/proofs/lib/logic.bend as Lg
120def not01(+c: Nat, +h: {Nat.is_lt(2n+c, 2n) == True{} : Bool}) -> Empty:
121 Lg.false_true(Equal.trans(Bool, False{}, Nat.is_lt(2n+c, 2n), True{}, Equal.sym(Bool, Nat.is_lt(2n+c, 2n), False{}, lt2(c)), h))
Uses (8)
Used by (7)
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/pmul:step_r
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/penc:pick_r
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/penc:pick_v
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/pmul:step_v
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/pschn:ev_q
- …