Proof using.
set_up_input_handlers;
auto using locks_correct_locked_sent_lock, locks_correct_locked_sent_unlock.
Qed.

(* Specifications: *)
Lemma nwnw_locked_lock :
forall p q,
LockServ_network_network_invariant p q ->
pBody p = Locked ->
pBody q = Lock.
Lemma nwnw_locked_lock :
forall p q,
LockServ_network_network_invariant p q ->
pBody p = Locked ->
pBody q = Lock.