Definition lowered_appendEntries_leader (net : @network _ multi_params)  :=
    forall p t leaderId prevLogIndex prevLogTerm entries leaderCommit h e,
      In p (nwPackets net) ->
      pBody p = AppendEntries t leaderId prevLogIndex prevLogTerm
                              entries leaderCommit ->
      In e entries ->
      currentTerm (nwState net h) = t ->
      type (nwState net h) = Leader ->
      In e (log (nwState net h)).

Theorem append_entries_reply_sublog_invariant : forall net, raft_intermediate_reachable net -> append_entries_reply_sublog net.