Local Open Scope pred.
Hint Resolve @now_later @andp_derives @sepcon_derives.

(* Specifications: *)
Lemma no_dups_swap:
forall F V a b c, @no_dups F V (a++b) c -> @no_dups F V (b++a) c.
Lemma join_sub_share_top: forall sh, join_sub Share.top sh -> sh = Share.top.
Lemma opt2list2opt: forall {A:Type} (l: option A), list2opt (opt2list l) = l.
destruct l; auto.