Proof using.
set_up_input_handlers;
auto using locks_correct_update_false.
Qed.

(* Specifications: *)
Lemma ClientNetHandler_cases :
forall c m st u out st' ms,
ClientNetHandler c m st = (u, out, st', ms) ->
ms = [] /\
((st' = st /\ out = [] ) \/
(m = Locked /\ out = [Locked] /\ held st' = true)).
Lemma ClientNetHandler_cases :
forall c m st u out st' ms,
ClientNetHandler c m st = (u, out, st', ms) ->
ms = [] /\
((st' = st /\ out = [] /\ m <> Locked) \/
(m = Locked /\ out = [Locked] /\ held st' = true)).