Proof using.
intros.
find_apply_lem_hyp update_elections_data_client_request_allEntries.
intuition.
- find_rewrite. auto.
- break_exists. intuition.
repeat find_rewrite.  auto.
Qed.

(* Specifications: *)
Lemma update_elections_data_client_request_preserves_allEntries :
forall h st client id c out st' ms t e,
handleClientRequest h (snd st) client id c = (out, st', ms) ->
In (t, e) (allEntries (fst st)) ->
In (t, e) (allEntries (update_elections_data_client_request h st client id c)).