sig
  val enfa : Kat.expr' -> Kat.expr' -> Kat.var Automata.senfa * int * int
end