Section AppendEntriesReplySublog.
Context {orig_base_params : BaseParams}.
Context {one_node_params : OneNodeParams orig_base_params}.
Context {raft_params : RaftParams orig_base_params}.
Context {aerrci : append_entries_request_reply_correspondence_interface}.
Context {rri : raft_refinement_interface}.
Context {aeli : append_entries_leader_interface}.
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 lower_appendEntries_leader :
forall net,
raft_intermediate_reachable net ->
lowered_appendEntries_leader net.