Proof using.
intros.
unfold committed in *.
break_exists_exists. intuition.
unfold log_matching, log_matching_hosts in *.
intuition. unfold entries_match in *.
rewrite deghost_snd in *.
match goal with
| H : forall _ _ _ _ _, _  |- In _ (_ (_ _ ?x)) =>
specialize (H h x e e e')
end; intuition eauto.
Qed.

(* Specifications: *)
Lemma logs_contiguous :
forall net h,
raft_intermediate_reachable net ->
contiguous_range_exact_lo (log (nwState net h)) 0.