(* Try out Bigarrays *)

open Bigarray
open Printf

let _ =
  let fd = Unix.openfile "trial.dat" [Unix.O_RDWR] 0 in
  let arr =
    Array2.map_file
      fd
      int8_unsigned
      c_layout
      true
      17770 3
    in
  Array2.set arr 0 2 17;
  let n = Array2.get arr 0 1 in
  printf "Num: %d\n" n