match loop with
| .inl eqs => exact eqs ▸ .complete
| .inr ⟨cs₁, cs₂, eqs, path, loop⟩ =>
  exact eqs ▸ .loop path loop
nfa : NFA
next : Fin nfa.nodes.size
r : Expr
result : { nfa' // nfa.nodes.size < nfa'.nodes.size }
cs : List Char
eq : nfa.pushRegex next r.star = result
ev : (↑result).pathIn nfa.nodes.size nfa.nodes.size nfa.nodes.size cs
loop :
  cs = [] ∨
    ∃ cs₁ cs₂,
      cs = cs₁ ++ cs₂ ∧ (↑result).pathToNext nfa.nodes.size (nfa.nodes.size + 1) (rStart_of eq) cs₁ ∧ starLoop eq cs₂
⊢ starLoop eq cs
no goals