fact: Definition for_first_char (str : String) (P : Char -> Prop) := forall ch, take 1 str ~= [ ch ] -> P ch.
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.ZArith.ZArith Fiat.Parsers.StringLike.Core Fiat.Parsers.StringLike.Properties Fiat.Parsers.StringLike.ForallChars Fiat.Common