module Eca:Elementary Cellular Automatasig..end
val wolfram_to_array : int -> bool arrayrule_array where
rule_array.(n) is true iff
the nth bit of the binary representation of the argument is 1.val array_to_wolfram : bool array -> intval reflexive_rule : int -> intval conjugate_rule : int -> intval transition_rule : int -> int array array -> bool array -> int -> boolmodule type Parameters =sig..end
module Automaton: