Exhaust.er.at: def of cswap-bend-cli@0.1.0.0
Import: import cswap-bend-cli@0.1.0.0/policy/exhaust.bend as Exhaust
Lines 148-153 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=148&end_line=153

import Base

def er.at(+past: Bool, +e: Er, +t: Nat) -> Er:
  match past:
    case True{}:
      ErPoison{}
    case False{}:
      er.min(e, t)

Uses (4):
  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=cswap-bend-cli@0.1.0.0/policy/exhaust.bend&name=Er
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/policy/exhaust.bend&name=er.min