Proof using rmri rri.
unfold commit_recorded.
intros.
rewrite deghost_spec.
rewrite msg_deghost_spec with (net0 := net).
auto.
Qed.
Definition lifted_entries_contiguous (net : ghost_log_network) : Prop :=
forall h, contiguous_range_exact_lo (log (snd (nwState net h))) 0.

(* Specifications: *)
Lemma lifted_entries_contiguous_invariant :
forall net, msg_refined_raft_intermediate_reachable net ->
lifted_entries_contiguous net.