Local Arguments update {_} {_} _ _ _ _ _ : simpl never.
Section EveryEntryWasCreated.
Context {orig_base_params : BaseParams}.
Context {one_node_params : OneNodeParams orig_base_params}.
Context {raft_params : RaftParams orig_base_params}.
Context {rri : raft_refinement_interface}.
Context {lhlli : leaders_have_leaderLogs_interface}.
Hint Constructors in_any_log.
(* proof sketch: prove for in_any_log. the only time new entries come into the system is on a leader, and leaders have leaderLogs in their term.  *)
Definition in_any_log_term_was_created net :=
forall e,
in_any_log net e ->
term_was_created net (eTerm e).
Ltac iae_case :=
match goal with
| [ H : in_any_log _ _ |- _ ] => invcs H
end.

(* Specifications: *)
Lemma term_was_created_preserved :
forall net net' t,
term_was_created net t ->
(forall h t ll,
In (t, ll) (leaderLogs (fst (nwState net h))) ->
In (t, ll) (leaderLogs (fst (nwState net' h)))) ->
term_was_created net' t.