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 msg_lifted_sms_nw : forall (net : ghost_log_network) h p t leaderId prevLogIndex prevLogTerm entries leaderCommit e, state_machine_safety (deghost (mgv_deghost net)) -> In p (nwPackets net) -> snd (pBody p) = AppendEntries t leaderId prevLogIndex prevLogTerm entries leaderCommit -> t >= currentTerm (snd (nwState net h)) -> commit_recorded (deghost (mgv_deghost net)) h e -> (prevLogIndex > eIndex e \/ (prevLogIndex = eIndex e /\ prevLogTerm = eTerm e) \/ eIndex e > maxIndex entries \/ In e entries).