Definition ghost_master sh (a : @G P) p := own p (sh, a) NoneP.

Corollary snaps_master_join : forall lv sh v2 p, sh <> Share.bot ->
fold_right sepcon emp (map (fun v => ghost_snap v p) lv) * ghost_master sh v2 p =
!!(Forall (fun v1 => ord v1 v2) lv) && ghost_master sh v2 p.