Proof using.
unfold refined_raft_net_invariant_do_leader, votesWithLog_sorted.
intros. subst. simpl in *. find_higher_order_rewrite.
update_destruct_simplify.
- match goal with
| [ H : _, H' : _ |- _ ] =>
eapply H; rewrite H'; simpl; eauto
end.
- eauto.
Qed.

(* Specifications: *)
Lemma votesWithLog_sorted_do_generic_server :
refined_raft_net_invariant_do_generic_server votesWithLog_sorted.