Curve.run: def of bend-collections@1.0.0.0
Import: import bend-collections@1.0.0.0/spec/crypto/secp256k1/curve.bend as Curve
Lines 50-55 of bend-collections@1.0.0.0/spec/crypto/secp256k1/curve.bend: https://jend.leeeet.dev/read.txt?path=bend-collections@1.0.0.0/spec/crypto/secp256k1/curve.bend&start_line=50&end_line=55

import Base

# (the first register is looked at first; the result is run_go's)
def run(+p: Nat, prog: List<&2, SOp>, regs: List<&2, Nat>) -> List<&2, Nat>:
  match regs:
    case Nil{}: run_go(p, prog, Nil{})
    case 0n <> t: run_go(p, prog, 0n <> t)
    case (1n+k) <> t: run_go(p, prog, (1n+k) <> t)

Uses (4):
  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/spec/crypto/secp256k1/curve.bend&name=SOp
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/spec/crypto/secp256k1/curve.bend&name=run_go