let reflexive_rule =
  let permutation = [|0;4;2;6;1;5;3;7|] in
fun rule_num ->
  let rule_array = wolfram_to_array rule_num in
  let reflexive_rule_array = Array.init 8 (fun i -> rule_array.(permutation.(i))) in
  array_to_wolfram reflexive_rule_array