Proof using.
intros. unfold handleAppendEntriesReply, advanceCurrentTerm in *.
repeat break_match; repeat tuple_inversion; simpl in *; do_bool; congruence.
Qed.

(* Specifications: *)
Lemma doGenericServer_currentTerm :
forall h st os st' ms,
doGenericServer h st = (os, st', ms) ->
currentTerm st' = currentTerm st.