let transition_rule nb_states neighbours configuration cell =
  let neighbours = neighbours.(cell) in
  if Array.length neighbours < 4
  then configuration.(cell)
  else configuration.(neighbours.(1))