Proof using iliaei rmri.
red. unfold ghost_log_allEntries. intros. simpl in *.
subst. repeat find_higher_order_rewrite.
destruct_update; simpl in *; eauto.
- find_apply_hyp_hyp.
intuition.
+ eapply_prop_hyp In In; eauto.
break_exists_exists.
eauto using update_elections_data_clientRequest_allEntries_old'.
+ do_in_map. unfold add_ghost_msg in *. do_in_map.
subst x. simpl in *. destruct p. simpl in *. find_inversion.
simpl in *. unfold write_ghost_log in *.
pose proof lifted_in_log_in_all_entries_invariant (mkNetwork _ _) ltac:(eauto) pSrc e.
simpl in *. find_higher_order_rewrite. rewrite_update.
simpl in *. concludes. break_exists_exists.
auto.
- find_apply_hyp_hyp; intuition; eauto.
do_in_map.
remember (pSrc p).
subst p. simpl in *. congruence.
Qed.

(* Specifications: *)
Lemma ghost_log_allEntries_do_leader :
msg_refined_raft_net_invariant_do_leader' ghost_log_allEntries.