Proof using lmi rri.
intros.
pose proof (lift_prop _ log_matching_invariant).
forward_invariant.
unfold log_matching, log_matching_hosts, entries_contiguous in *. break_and.
intros.
repeat match goal with
| [ H : _ |- _ ] => setoid_rewrite deghost_spec in H
end.
red. intuition eauto.
find_apply_hyp_hyp. auto.
Qed.

(* Specifications: *)
Lemma entries_sorted_invariant :
forall net,
refined_raft_intermediate_reachable net ->
entries_sorted net.