Admission.lease.joined: def of bend-kit-http@0.38.2.0
Import: import bend-kit-http@0.38.2.0/admission.bend as Admission
Lines 49-54 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=49&end_line=54

import Base
import bend-kit-resources@0.1.0.0/resources.bend as Res

def lease.joined(combined: Res.Combine, pool: Res.Pool) -> Taken:
  match combined:
    case Res.Joined{grant}:
      Admitted{Lease{pool, grant}}
    case Res.Apart{first, second}:
      Lost{}

Uses (4):
  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=Taken
  https://jend.leeeet.dev/definition.txt?path=bend-kit-resources@0.1.0.0/resources.bend&name=Combine
  https://jend.leeeet.dev/definition.txt?path=bend-kit-resources@0.1.0.0/resources.bend&name=Pool