proposition: Lemma nonterminal_to_positive_eq x y : nonterminal_to_positive x = nonterminal_to_positive y <-> x = y.
proof: Proof. split; try congruence. rewrite <- (nonterminal_to_positive_to_nonterminal x), <- (nonterminal_to_positive_to_nonterminal y) at 2. congruence. Qed.
imports: Coq.PArith.BinPos Coq.PArith.Pnat Coq.Arith.Arith Coq.FSets.FMapInterface Coq.FSets.FMapPositive Fiat.Parsers.ContextFreeGrammar.Carriers Fiat.Common.List.ListFacts Fiat.Common.List.ListMorphisms Fiat.Common.Prod