law PublicKey.correct

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

import Base
import bend-collections-laws-crypto@1.0.0.0/src/crypto/secp256k1.bend as K
import bend-collections-laws-crypto@1.0.0.0/spec/crypto/secp256k1/ecdsa.bend as ES

20# the SEC 1 public key (33 bytes compressed, 65 uncompressed) of [d] G
21law PublicKey.correct:
22  for +one: Nat
23  for +h1: {one == 1n : Nat}
24  for +sk: List<&2, U32>
25  for c: Bool
26  {K.public_key(sk, c) == ES.public_key(one, sk, c) : Maybe<&2, List<&2, U32>>}