fact: Fixpoint Rev (char : finType) (e : regexp char) := match e with | Star e => Star (Rev e) | Plus e1 e2 => Plus (Rev e1) (Rev e2) | Conc e1 e2 => Conc (Rev e2) (Rev e1) | _ => e end.
imports: HB(structures) mathcomp(all_ssreflect) RegLang(setoid_leq misc languages dfa nfa)