LiftRelAux — Mathlib

English

See LiftRel Bind for a general statement about lifting relations through bind.

Русский

См. LiftRel Bind для общего утверждения о подъёме связей через bind.

LaTeX

$$$(повторение того же утверждения о LiftRel Bind, как выше)$$$

Lean4

/-- Alternate definition of `LiftRel` over relations between `Computation`s -/
def LiftRelAux (R : α → β → Prop) (C : Computation α → Computation β → Prop) :
    α ⊕ (Computation α) → β ⊕ (Computation β) → Prop
  | Sum.inl a, Sum.inl b => R a b
  | Sum.inl a, Sum.inr cb => ∃ b, b ∈ cb ∧ R a b
  | Sum.inr ca, Sum.inl b => ∃ a, a ∈ ca ∧ R a b
  | Sum.inr ca, Sum.inr cb => C ca cb

Похожие утверждения