fact: Definition Forall_parse_of_item' (Forall_parse_of : forall {str pats} (p : parse_of G str pats), Type) {str it} (p : parse_of_item G str it) := match p return Type with | ParseTerminal ch P pf1 pf2 => unit | ParseNonTerminal nt H' p' => (P str nt * Forall_parse_of p')%type end.
imports: Coq.Lists.List Coq.Arith.PeanoNat Fiat.Common Fiat.Common.UIP Fiat.Parsers.ContextFreeGrammar.Core Fiat.Parsers.ContextFreeGrammar.Equality