corec'₁ — Mathlib

English

Corecursor variant corec'₁ for Cofix F with a higher-rank g param: refines corec g by threading Sum.inl/ Sum.inr shapes.

Русский

Вариант corec'₁ для Cofix F с высшим рангом g: уточняет corec g, прокидывая Sum.inl/ Sum.inr.

LaTeX

$$$\\mathrm{corec'}\\; g\\; x = \\mathrm{Cofix.corec}\\; (\\lambda x. g\\;\\text{id})\\; x.$$$

Lean4

/-- Corecursor for `Cofix F` -/
def corec'₁ {α : TypeVec n} {β : Type u} (g : ∀ {X}, (β → X) → F (α.append1 X)) (x : β) : Cofix F α :=
  Cofix.corec (fun _ => g id) x

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