def refused

bend-kit-http@0.38.2.0 · admission.bend:103

import Base

103def refused(kind: U32, marks: Marks) -> Marks:
104  match kind marks:
105    case 0 Marks{ch, ah, bh, cr, ar, br}:
106      Marks{ch, ah, bh, 1n+cr, ar, br}
107    case 1 Marks{ch, ah, bh, cr, ar, br}:
108      Marks{ch, ah, bh, cr, 1n+ar, br}
109    case _ Marks{ch, ah, bh, cr, ar, br}:
110      Marks{ch, ah, bh, cr, ar, 1n+br}