let unsafe_get_ar ar ix = match Impl.unsafe_get ar ix with | None -> failwith "unsafe_get_ar: element undefined - concurrent access?" | Some el -> el