Admission.counts: def of bend-kit-http@0.38.2.0
Import: import bend-kit-http@0.38.2.0/admission.bend as Admission
Lines 88-91 of bend-kit-http@0.38.2.0/admission.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-http@0.38.2.0/admission.bend&start_line=88&end_line=91

import Base

def counts(ledger: Ledger) -> Counts & Ledger:
  Ledger{Lease{+cp, cg}, Lease{+ap, ag}, Lease{+bp, bg}, +marks} = ledger
  Marks{ch, ah, bh, cr, ar, br} = marks
  (Counts{count(cp), count(ap), count(bp), ch, ah, bh, cr, ar, br}, Ledger{Lease{cp, cg}, Lease{ap, ag}, Lease{bp, bg}, marks})

Uses (7):
  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=bend-kit-http@0.38.2.0/admission.bend&name=Counts
  https://jend.leeeet.dev/definition.txt?path=bend-kit-http@0.38.2.0/admission.bend&name=Lease
  https://jend.leeeet.dev/definition.txt?path=bend-kit-http@0.38.2.0/admission.bend&name=Ledger
  https://jend.leeeet.dev/definition.txt?path=bend-kit-http@0.38.2.0/admission.bend&name=Marks
  https://jend.leeeet.dev/definition.txt?path=bend-kit-http@0.38.2.0/admission.bend&name=count