Proof using.
intros. unfold handleAppendEntriesReply, advanceCurrentTerm in *.
repeat break_match; find_inversion; subst; auto.
Qed.

(* Specifications: *)
Lemma handleAppendEntriesReply_packets :
forall h st from t es s st' ps,
handleAppendEntriesReply h st from t es s = (st', ps) ->
ps = [].
Theorem logs_sorted_append_entries_reply :
raft_net_invariant_append_entries_reply logs_sorted.
Lemma doGenericServer_packets :
forall h st os st' ps,
doGenericServer h st = (os, st', ps) ->
ps = [].