Proof using.
unfold raft_net_invariant_append_entries_reply, current_term_gt_zero.
simpl. intuition. find_higher_order_rewrite. update_destruct; subst; rewrite_update.
- find_apply_lem_hyp handleAppendEntriesReply_type. intuition.
repeat find_rewrite. auto.
- auto.
Qed.

(* Specifications: *)
Lemma current_term_gt_zero_request_vote :
raft_net_invariant_request_vote current_term_gt_zero.