Proof using rri.
unfold CandidateEntriesLowered_rvr, CandidateEntries.
intros. break_and.
rewrite deghost_spec.
find_apply_lem_hyp deghost_packet_exists.
break_exists.  break_and. subst.
apply_prop_hyp candidateEntries_host_invariant In.
eapply wonElection_candidateEntries_rvr; auto;
repeat find_rewrite_lem deghost_spec; eauto.
Qed.

(* Specifications: *)
Lemma candidate_entries_lowered_rvr :
forall net,
raft_intermediate_reachable net ->
forall p h e,
In e (log (nwState net h)) ->
CandidateEntriesLowered_rvr net e p.