module Automaton: sig .. end
sig
end
val add_rule : Core.automaton -> string -> unit
Core.automaton -> string -> unit
XXXXX -> A
val is_rule : Core.automaton -> Core.state list -> bool
Core.automaton -> Core.state list -> bool
[D; A; D; D; A]
val ix_to_rule : int -> string
int -> string
26 -> 11010 -> DDADA