Section SkipActionWrapper.
Variable W : world.
Notation getP l := (getProtocol W l).
Notation getS s l := (getStatelet s l).
Variable this : nid.
Variable l : Label.
Variable p : protocol.
Variable pf : getP l = p.
Definition skip_safe s := Coh W s.
Variable V : Type.
(* Skip-like actions allow for reading from the state *)
Variable f : forall s, coh p (getS s l) -> V.

Lemma safe_local s : skip_safe s -> coh p (getS s l).