RosettaCodeData/Task/Apply-a-callback-to-an-array/OCaml/apply-a-callback-to-an-array-2.ml

let square x = x * x;;
let values = Array.init 10 ((+) 1);;
Array.map square values;;