Module Subtyping_glushkov.TypeName_Glushkov

module TypeName_Glushkov: Regexp.GlushkovType  with type Regexp.letter = OrderedNamePairs.t
    and type NFA.letter = OrderedNamePairs.t
    and type NFA.Alphabet.elt = OrderedNamePairs.t
    and type NFA.StateToTransitionMap.key = int
    and type NFA.TransitionMap.key = OrderedNamePairs.t
    and type NFA.StateSet.elt = int
    and type DFA.letter = OrderedNamePairs.t
    and type DFA.Alphabet.elt = OrderedNamePairs.t
    and type DFA.StateToTransitionMap.key = int
    and type DFA.TransitionMap.key = OrderedNamePairs.t
    and type DFA.StateSet.elt = int
    and type NFAPair.letter = OrderedNamePairs.t
    and type NFAPair.Alphabet.elt = OrderedNamePairs.t
    and type NFAPair.StateToTransitionMap.key = int * int
    and type NFAPair.TransitionMap.key = OrderedNamePairs.t
    and type NFAPair.StateSet.elt = int * int

module Regexp: Regexp.RegexpType 

module NFA: Nfa.NFA 

module DFA: Dfa.DFA 

module NFAPair: Nfa.NFA 

val build_glushkov : Regexp.regexp -> NFA.nfa

val build_dtm_glushkov : Regexp.regexp -> DFA.dfa

val negates_in_alphabet_space : DFA.dfa -> DFA.Alphabet.t -> DFA.dfa

val intersects : NFA.nfa -> NFA.nfa -> NFAPair.nfa

val intersects_dtm : NFA.nfa -> DFA.dfa -> NFAPair.nfa

val print_intersection : (NFAPair.Alphabet.elt -> unit) ->
       (NFAPair.StateSet.elt -> unit) -> NFAPair.nfa -> unit