Proof using.
unfold raft_net_invariant_request_vote_reply, current_term_gt_zero.
simpl. intuition. find_higher_order_rewrite.
find_apply_lem_hyp handleRequestVoteReply_type. update_destruct; subst; rewrite_update.
- intuition; repeat find_rewrite.
+ auto.
+ apply H1. find_rewrite. discriminate.
- auto.
Qed.

Lemma current_term_gt_zero_do_leader :
raft_net_invariant_do_leader current_term_gt_zero.