Proof using.
unfold raft_net_invariant_do_generic_server, prevLog_leader_sublog.
intros. simpl in *.
repeat find_higher_order_rewrite.
find_apply_hyp_hyp. break_or_hyp.
- break_if; eauto.
find_copy_eapply_lem_hyp doGenericServer_type. break_and.
find_copy_eapply_lem_hyp doGenericServer_log.
repeat find_rewrite.
eauto.
- find_copy_eapply_lem_hyp doGenericServer_packets.
subst. simpl in *. intuition.
Qed.

(* Specifications: *)
Lemma prevLog_leader_sublog_state_same_packet_subset :
raft_net_invariant_state_same_packet_subset prevLog_leader_sublog.