Hint Resolve f_pred_precise f_pred_positive.

Corollary atomic_entries_join_nil : forall sh1 sh2 sh entries ghosts
(Hjoin : sepalg.join sh1 sh2 sh) (Hlen : Zlength entries = size) (Hleng : Zlength ghosts = size)
(Hsh1 : readable_share sh1) (Hsh2 : readable_share sh2),
atomic_entries sh1 entries ghosts empty_hists * atomic_entries sh2 entries ghosts empty_hists =
atomic_entries sh entries ghosts empty_hists.