@[simp, grind =] def combine : Decision → Decision → Decision | .deny, _ => .deny | _, .deny => .deny | .permit, _ => .permit | _, .permit => .permit | .notApplicable, d => d @[simp, grind] def denyOverrides : List Decision → Decision := List.foldr combine .notApplicable