Proof using.
intros.
destruct (log st') using (handleClientRequest_log_ind ltac:(eauto)); intuition.
Qed.

(* Specifications: *)
Lemma committed_log_allEntries_preserved :
forall net net' e t,
committed net e t ->
(forall h e',
In e' (log (snd (nwState net h))) ->
In e' (log (snd (nwState net' h)))) ->
(forall h e' t',
In (t', e') (allEntries (fst (nwState net h))) ->
In (t', e') (allEntries (fst (nwState net' h)))) ->
committed net' e t.