all_goals sorry
case atom_prog
α : Program
φ✝ : Formula
E : List Formula
E_in : E ∈ unfoldBox α φ✝
φ : Formula
a✝ : ℕ
y_in_E : (⌈·a✝⌉φ) ∈ E
⊢ lmOfFormula (⌈·a✝⌉φ) < lmOfProgram α + lmOfFormula φ✝

case sequence
α : Program
φ✝ : Formula
E : List Formula
E_in : E ∈ unfoldBox α φ✝
φ : Formula
a✝¹ a✝ : Program
y_in_E : (⌈a✝¹;'a✝⌉φ) ∈ E
⊢ lmOfFormula (⌈a✝¹;'a✝⌉φ) < lmOfProgram α + lmOfFormula φ✝

case union
α : Program
φ✝ : Formula
E : List Formula
E_in : E ∈ unfoldBox α φ✝
φ : Formula
a✝¹ a✝ : Program
y_in_E : (⌈a✝¹⋓a✝⌉φ) ∈ E
⊢ lmOfFormula (⌈a✝¹⋓a✝⌉φ) < lmOfProgram α + lmOfFormula φ✝

case test
α : Program
φ✝ : Formula
E : List Formula
E_in : E ∈ unfoldBox α φ✝
φ a✝ : Formula
y_in_E : (⌈?'a✝⌉φ) ∈ E
⊢ lmOfFormula (⌈?'a✝⌉φ) < lmOfProgram α + lmOfFormula φ✝
no goals