interleave_eq

Mathlib.Data.Stream.Init

URI: https://scilib.ai/kg/mathlib#Stream'.interleave_eq

Lean4

theorem interleave_eq (s₁ s₂ : Stream' α) : s₁ ⋈ s₂ = head s₁ :: head s₂ :: (tail s₁ ⋈ tail s₂) :=
  by
  let t := tail s₁ ⋈ tail s₂
  change s₁ ⋈ s₂ = head s₁ :: head s₂ :: t
  unfold interleave; unfold corecOn; rw [corec_eq]; dsimp; rw [corec_eq]; rfl

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

Научная платформа российской исследовательской школы.

Разделы

MathLib Explorer
Graph RAG
Лаборатория
Блог
О проекте
Команда

Аффилиация

Вычислительный центр им. А. А. Дороницына при ФИЦ «Информатика и Управление» РАН frccsc.ru