Section TermsAndIndicesFromOneLog.
Context {orig_base_params : BaseParams}.
Context {one_node_params : OneNodeParams orig_base_params}.
Context {raft_params : RaftParams orig_base_params}.
Context {ctgzi : current_term_gt_zero_interface}.
Definition terms_and_indices_from_one_log_ind (net : network) : Prop :=
terms_and_indices_from_one_log net /\ terms_and_indices_from_one_log_nw net.
Proof using.
split.
- unfold terms_and_indices_from_one_log, terms_and_indices_from_one. simpl. contradiction.
- unfold terms_and_indices_from_one_log_nw, terms_and_indices_from_one. simpl. contradiction.
Qed.

Lemma taifol_no_append_entries :
forall ps' net ms p t leaderId prevLogIndex prevLogTerm entries leaderCommit h,
(forall (p : packet), In p ps' -> In p (nwPackets net) \/ In p (send_packets h ms)) ->
(forall m, In m ms -> ~ is_append_entries (snd m)) ->
In p ps' ->
pBody p = AppendEntries t leaderId prevLogIndex prevLogTerm entries leaderCommit ->
terms_and_indices_from_one_log_nw net ->
terms_and_indices_from_one entries.