simp [lindenbaum_next_indexed, lindenbaum_next]
case step
α : Type u_1
inst✝⁴ : DecidableEq α
inst✝³ : Inhabited α
𝓓 : DeductionParameter α
inst✝² : 𝓓.IncludeEFQ
inst✝¹ : Inhabited α
inst✝ : Encodable α
t : Tableau α
m n m✝ : ℕ
h : m.le m✝
ih : t[m].1 ⊆ t[m✝].1
⊢ t[m].1 ⊆ t[m✝.succ].1
case step
α : Type u_1
inst✝⁴ : DecidableEq α
inst✝³ : Inhabited α
𝓓 : DeductionParameter α
inst✝² : 𝓓.IncludeEFQ
inst✝¹ : Inhabited α
inst✝ : Encodable α
t : Tableau α
m n m✝ : ℕ
h : m.le m✝
ih : t[m].1 ⊆ t[m✝].1
⊢ t[m].1 ⊆
    (match decode m✝ with
      | some p =>
        if (𝓓)-Consistent (insert p t[m✝].1, t[m✝].2) then (insert p t[m✝].1, t[m✝].2) else (t[m✝].1, insert p t[m✝].2)
      | none => t[m✝]).1