array_of_n.ml