Proof using.
start_update; simpl in *;
match goal with
| H : nwState ?net ?h = (?gd, ?d) |- _ =>
replace gd with (fst (nwState net h)) in * by (rewrite H; reflexivity);
replace d with (snd (nwState net h)) in * by (rewrite H; reflexivity);
clear H
end;
try find_erewrite_lem doLeader_log; eauto;
find_apply_hyp_hyp; intuition; eauto;
do_in_map; subst; simpl in *;
find_eapply_lem_hyp doLeader_message_entries; eauto.
Qed.

(* Specifications: *)
Lemma allEntries_log_matching_do_generic_server :
refined_raft_net_invariant_do_generic_server allEntries_log_matching_inductive.