Exhaust.br.win: def of cswap-bend-cli@0.1.0.0
Import: import cswap-bend-cli@0.1.0.0/policy/exhaust.bend as Exhaust
Lines 116-123 of cswap-bend-cli@0.1.0.0/policy/exhaust.bend: https://jend.leeeet.dev/read.txt?path=cswap-bend-cli@0.1.0.0/policy/exhaust.bend&start_line=116&end_line=123

import Base
import cswap-bend-cli@0.1.0.0/policy/types.bend as T

def br.win(+ws: List<&2, T.Win>, +acc: Br) -> Br:
  match ws:
    case Nil{}:
      acc
    case Con{w, t}:
      match w:
        case T.Win{p, r}:
          br.win(t, br.if(Nat.is_ge(p, T.full()), acc, r))

Uses (6):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.is_ge
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/policy/exhaust.bend&name=Br
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/policy/exhaust.bend&name=br.if
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/policy/types.bend&name=Win
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/policy/types.bend&name=full