fact: Definition list_of_next_bin_ops_opt_nor (str : String) := let ls' := list_of_next_bin_ops'_opt_nor str in match fst ls' with | Some ls'' => nth 0 ls'' None :: snd ls' | None => snd ls' end.
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.Lists.List Coq.ZArith.ZArith Fiat.Common Fiat.Common.List.Operations Fiat.Common.List.ListFacts Fiat.Common.SetoidInstances Fiat.Parsers.Reachable.ParenBalanced.Core Fiat.Parsers.StringLike.Core Fiat.Parsers.StringLike.Properties Fiat.Parsers.StringLike.FirstChar Fiat.Parsers.Refinement.BinOpBrackets.ParenBalanced