Hint Resolve atomic_loc_hist_isptr : saturate_local.

(* Specifications: *)
Lemma hist_R_precise : forall p i R v, precise (EX h : _, R h v) -> precise (hist_R p i R v).
Hint Resolve hist_R_precise.
Lemma atomic_loc_hist_precise : forall sh p g i R, readable_share sh ->
precise (EX h : _, atomic_loc_hist sh p g i R h).