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