fact: Definition split_list_completeT_for {data : @parser_computational_predataT Char} {len0 valid} (it : item Char) (its : production Char) (str : String) (pf : length str <= len0) (split_list : list nat) := ({ n : nat & (minimal_parse_of_item (G := G) len0 valid (take n str) it) * (minimal_parse_of_production (G := G) len0 valid (drop n str) its) }%type) -> ({ n : nat & (In (min (length str) n) (map (min (length str)) split_list)) * (minimal_parse_of_item (G := G) len0 valid (take n str) it) * (minimal_parse_of_production (G := G) len0 valid (drop n str) its) }%type).
imports: Coq.Lists.List Fiat.Parsers.BaseTypes Fiat.Parsers.ContextFreeGrammar.Core Fiat.Parsers.MinimalParse Fiat.Common