RosettaCodeData/Task/Create-a-two-dimensional-array-at-runtime/OCaml/create-a-two-dimensional-array-at-runtime-2.ml

let nbr1 = read_int ();;
let nbr2 = read_int ();;
let arr = Bigarray.Array2.create Bigarray.float32 Bigarray.c_layout nbr1 nbr2 ;;
arr.{0,0} <- 3.5;;
print_float arr.{0,0}; print_newline ();;