fact: Definition Tab x : table := ([set q | connect (srel (size x).+1 x) (nfa2_s M, ord1) (q,ord_max)], [set pq | connect (srel (size x).+1 x) (pq.1,inord (size x)) (pq.2,ord_max)]).
imports: Coq(Lia) mathcomp(all_ssreflect) RegLang(misc setoid_leq languages dfa myhill_nerode two_way)