Lemma wonElection_candidateEntries_rvr : forall (net : network (params := raft_refined_multi_params)) p e, votes_correct net -> cronies_correct net -> candidateEntries e (nwState net) -> In p (nwPackets net) -> pBody p = RequestVoteReply (eTerm e) true -> currentTerm (snd (nwState net (pDst p))) = eTerm e -> wonElection (dedup name_eq_dec (pSrc p :: votesReceived (snd (nwState net (pDst p))))) = true -> type (snd (nwState net (pDst p))) <> Candidate.