Proof using.
unfold refined_raft_net_invariant_append_entries, votes_le_currentTerm.
start_proof.
rewrite @votes_same_append_entries in *.
find_apply_lem_hyp handleAppendEntries_currentTerm.
find_apply_hyp_hyp.
eauto using le_trans.
Qed.

(* Specifications: *)
Lemma votes_le_current_term_append_entries_reply :
refined_raft_net_invariant_append_entries_reply votes_le_currentTerm.