Owl_foreign.dr_matptr_to

let dr_matptr_to_mat x m n =
  let open Dense_real in
  let raw = getf (!@ x) data in
  bigarray_of_ptr array2 (m,n) Bigarray.float64 raw