Curve.bits_go: def of bend-collections@1.0.0.0
Import: import bend-collections@1.0.0.0/spec/crypto/secp256k1/curve.bend as Curve
Lines 130-135 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=130&end_line=135

import Base

# bits i - 1, ..., 0 of k, most significant first (k is looked at first,
# so that on an unknown k nothing is unfolded)
def bits_go(i: Nat, +k: Nat) -> List<&2, Nat>:
  match i:
    case 0n: Nil{}
    case 1n+ +j: bit(j, k) <> bits_go(j, k)

Uses (3):
  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=bit