Schnorr.verify_r: def of bend-collections@1.0.0.0
Import: import bend-collections@1.0.0.0/src/crypto/secp256k1/schnorr.bend as Schnorr
Lines 52-54 of bend-collections@1.0.0.0/src/crypto/secp256k1/schnorr.bend: https://jend.leeeet.dev/read.txt?path=bend-collections@1.0.0.0/src/crypto/secp256k1/schnorr.bend&start_line=52&end_line=54

import Base
import bend-collections@1.0.0.0/src/crypto/secp256k1/point.bend as P

# R = [s] G - [e] P must be finite, with even y and x(R) = r
def verify_r(+r: List<&2, Nat>, +rr: P.Point) -> Bool:
  verify_aff(r, P.is_inf(rr), P.to_affine(rr))

Uses (7):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/crypto/secp256k1/point.bend&name=Point
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/crypto/secp256k1/point.bend&name=is_inf
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/crypto/secp256k1/point.bend&name=to_affine
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/crypto/secp256k1/schnorr.bend&name=verify_aff