Admission.refused: def of bend-kit-http@0.38.2.0
Import: import bend-kit-http@0.38.2.0/admission.bend as Admission
Lines 103-110 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=103&end_line=110

import Base

def refused(kind: U32, marks: Marks) -> Marks:
  match kind marks:
    case 0 Marks{ch, ah, bh, cr, ar, br}:
      Marks{ch, ah, bh, 1n+cr, ar, br}
    case 1 Marks{ch, ah, bh, cr, ar, br}:
      Marks{ch, ah, bh, cr, 1n+ar, br}
    case _ Marks{ch, ah, bh, cr, ar, br}:
      Marks{ch, ah, bh, cr, ar, 1n+br}

Uses (6):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.Con
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.Nil
  https://jend.leeeet.dev/definition.txt?path=bend-kit-http@0.38.2.0/admission.bend&name=Marks