fact: Definition eNFA_to_NFA A (Hwf: eNFA.well_founded A) := let (size,_,delta,initial,final,max_label) := A in let eps := rt_closure (guard 100 Hwf) size in NFA.mk size (statelabelmap_set_to_fun (StateLabelMap.map (set_closure eps) delta)) (eps initial) (StateSet.singleton final) max_label.
imports: ATBR(Common) ATBR(Classes) ATBR(Graph) ATBR(Monoid) ATBR(SemiLattice) ATBR(SemiRing) ATBR(KleeneAlgebra) ATBR(MxGraph) ATBR(MxSemiLattice) ATBR(MxSemiRing) ATBR(MxKleeneAlgebra) ATBR(DKA_Definitions) ATBR(Utils_WF) Coq(Relations) Coq(Eqdep_dec)