Proof using si 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: *)
Lemma lift_nextIndex_safety :
forall net,
refined_raft_intermediate_reachable net ->
nextIndex_safety (deghost net).
Theorem lift_log_matching :
forall net,
refined_raft_intermediate_reachable net ->
log_matching (deghost net).