Proof using cei cci.
start.
intro_refined_invariant candidate_entries_invariant.
eapply candidateEntries_ext; eauto.
subst.
repeat find_higher_order_rewrite.
find_rewrite_lem update_fun_comm. simpl in *.
destruct_update.
- find_rewrite_lem update_elections_data_requestVoteReply_allEntries; eauto.
find_apply_hyp_hyp.
eapply handleRequestVoteReply_preserves_candidate_entries; eauto.
- eapply handleRequestVoteReply_preserves_candidate_entries; eauto.
Qed.

(* Specifications: *)
Lemma allEntries_candidateEntries_do_leader :
refined_raft_net_invariant_do_leader allEntries_candidateEntries.