fact: Definition reachable_trans (x : reachable_type) a : reachable_type := Sub (dfa_trans (val x) a) (reachable_trans_proof x a).
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice) mathcomp(fintype path fingraph finfun finset generic_quotient) RegLang(misc languages dfa)