fact: Definition compile_item (expr : Core.item Char) : opt.item T := match expr with | Core.Terminal ch => Terminal (on_terminal ch) | Core.NonTerminal nt => NonTerminal nt (compile_nonterminal nt) end.
imports: Coq.Strings.String Fiat.Parsers.ContextFreeGrammar.Core Fiat.Parsers.ContextFreeGrammar.Carriers Fiat.Parsers.ContextFreeGrammar.PreNotations Fiat.Common.List.Operations Fiat.Common.Equality