Proof using lsi rri.
intros.
find_apply_lem_hyp lift_sorted.
unfold logs_sorted, logs_sorted_host in *.
intuition.
unfold deghost in *. simpl in *. break_match; eauto.
Qed.

(* Specifications: *)
Theorem state_machine_safety_host'_invariant :
forall net,
refined_raft_intermediate_reachable net ->
state_machine_safety_host' net.