let get s ~index = try Some (get_exn s index) with _ -> None