def one_lt
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/spec/crypto/secp256k1/field.bend as FS
import bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/fieldops.bend as FO
110def one_lt(+one: Nat, +h1: {one == 1n : Nat}) -> {Nat.is_lt(1n, FS.prime(one)) == True{} : Bool}:
111 FO.small_lt_p(one, h1, 1n, {==})
Uses (5)
Used by (6)
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/paff:g_r
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/paff:g_v
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/penc:one_r
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/penc:one_v
- bend-collections-laws-crypto@1.0.0.0/proofs/crypto/secp256k1/pmul:pinf_r
- …