simp [this, NFA.Node.charStep, NFA.Node.εStep] at *
cls : Data.Classes
nfa : NFA
next : Fin nfa.nodes.size
result : { nfa' // nfa.nodes.size < nfa'.nodes.size }
cs : List Char
eq✝ : nfa.pushRegex next (Expr.classes cls) = result
eq : result = nfa.pushNode (Node.sparse cls ↑next) ⋯
i : ℕ
pcs scs : List Char
path :
  (↑(nfa.pushNode (Node.sparse cls ↑next) ⋯)).pathIn nfa.nodes.size (↑(↑(nfa.pushNode (Node.sparse cls ↑next) ⋯)).start)
    i pcs
step✝ : (↑(nfa.pushNode (Node.sparse cls ↑next) ⋯)).stepIn nfa.nodes.size i (↑next) scs
this✝ : i < nfa.nodes.size + 1
this : i = nfa.nodes.size
h₁✝ : nfa.nodes.size ≤ i
h₂✝ : i < (↑(nfa.pushNode (Node.sparse cls ↑next) ⋯)).nodes.size
step : ↑next ∈ (↑(nfa.pushNode (Node.sparse cls ↑next) ⋯))[i].εStep
eqs : cs = pcs ++ []
⊢ Expr.matches cs (Expr.classes cls)
no goals