ObserverAutomaton.KMP
module KMPArg : KMPArg
type q = int
type t = KMPArg.t
val initial : q
val next : q -> t -> q
val accepting : q -> bool