simp
α : Type
L : Language α
s : Str α
i : ℕ
a2 : s ∈ exp L i
⊢ s ∈ {[]} ∪ concat L (kleene_closure α L)
α : Type
L : Language α
s : Str α
i : ℕ
a2 : s ∈ exp L i
⊢ s = [] ∨ s ∈ concat L (kleene_closure α L)