Map.seek.go: def of Base
Import: import Base
Lines 2822-2838 of Base/base.bend: https://jend.leeeet.dev/read.txt?path=Base/base.bend&start_line=2822&end_line=2838

import Base

def Map.seek.go(-a: Quant, -V: Kind(a), node: Map<a, V>, kb: String & Bool) ->
  Map<a, V> & String & Maybe<&2, String>:
  match node kb:
    case MNode{p, MTip{}, hi} Tuple{key, False{}}:
      (MNode{p, MTip{}, hi}, key, None{})
    case MNode{p, MLeaf{+k, v}, hi} Tuple{key, False{}}:
      (MNode{p, MLeaf{k, v}, hi}, key, Some{k})
    case MNode{p, MNode{+q, c, d}, hi} Tuple{key, False{}}:
      Map.lo(a, V, String & Maybe<&2, String>, p, hi, Map.seek.go(a, V, MNode{q, c, d}, Map.bit(key, q)))
    case MNode{p, lo, MTip{}} Tuple{key, True{}}:
      (MNode{p, lo, MTip{}}, key, None{})
    case MNode{p, lo, MLeaf{+k, v}} Tuple{key, True{}}:
      (MNode{p, lo, MLeaf{k, v}}, key, Some{k})
    case MNode{p, lo, MNode{+q, c, d}} Tuple{key, True{}}:
      Map.hi(a, V, String & Maybe<&2, String>, p, lo, Map.seek.go(a, V, MNode{q, c, d}, Map.bit(key, q)))
    case m Tuple{key, b}:
      (m, key, None{})

Uses (9):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Map
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Map.bit
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Map.hi
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Map.lo
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Maybe
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Pair
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Sigma
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String