Proof using.
unfold raft_net_invariant_do_generic_server, no_entries_past_current_term. intros.
find_apply_lem_hyp doGenericServer_spec. intuition.
- unfold no_entries_past_current_term_host in *.
intros. simpl in *.
find_higher_order_rewrite; break_match; eauto.
subst; repeat find_rewrite; eauto.
- eauto using no_entries_past_current_term_nw_no_append_entries.
Qed.

(* Specifications: *)
Lemma handleClientRequest_messages :
forall h d client id c os d' ms,
handleClientRequest h d client id c = (os, d', ms) ->
(forall m, In m ms -> ~ is_append_entries (snd m)).