Definition lifted_no_entries_past_current_term_host net :=
    forall (h : name) e,
      In e (log (snd (nwState net h))) ->
      eTerm e <= currentTerm (snd (nwState net h)).

Lemma lifted_handleAppendEntries_logs_sorted : forall (net : ghost_log_network) (p : ghost_log_packet) t n pli plt es ci st' m, msg_refined_raft_intermediate_reachable net -> handleAppendEntries (pDst p) (snd (nwState net (pDst p))) t n pli plt es ci = (st', m) -> snd (pBody p) = AppendEntries t n pli plt es ci -> In p (nwPackets net) -> sorted (log st').