Proof using.
unfold raft_net_invariant_request_vote.
intros. find_apply_lem_hyp handleRequestVote_spec.
intuition eauto using no_entries_past_current_term_unaffected_1.
Qed.

Lemma handleRequestVoteReply_spec :
forall h st h' t v st',
handleRequestVoteReply h st h' t v = st' ->
(currentTerm st <= currentTerm st' /\
log st' = log st).