BendMlBpeTokenizer.peek: def of bend-ml-bpe-tokenizer@0.1.3.0
Import: import bend-ml-bpe-tokenizer@0.1.3.0/main.bend as BendMlBpeTokenizer
Lines 40-50 of bend-ml-bpe-tokenizer@0.1.3.0/main.bend: https://jend.leeeet.dev/read.txt?path=bend-ml-bpe-tokenizer@0.1.3.0/main.bend&start_line=40&end_line=50

import Base

# does xs start with exactly the pair (a, b)?
def peek(+a: Tk, +b: Tk, xs: List<&2, Tk>) -> Bool:
  match xs:
    case Nil{}:
      False{}
    case Con{+x, t}:
      match t:
        case Nil{}:
          False{}
        case Con{+y, u}:
          Bool.and(Tk.eq(x, a), Tk.eq(y, b))

Uses (5):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool.and
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=bend-ml-bpe-tokenizer@0.1.3.0/main.bend&name=Tk
  https://jend.leeeet.dev/definition.txt?path=bend-ml-bpe-tokenizer@0.1.3.0/main.bend&name=Tk.eq