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

(* Specifications: *)
Lemma current_term_gt_zero_state_same_packet_subset :
raft_net_invariant_state_same_packet_subset current_term_gt_zero.