Ltac rewrite_goal :=
    match goal with
      | H: _ = _ |- _ => rewrite H
    end.Definition no_entries_past_current_term_host_lifted net :=
    forall (h : name) e,
      In e (log (snd (nwState net h))) ->
      eTerm e <= currentTerm (snd (nwState net h)).

(* Specifications: *)
Lemma no_entries_past_current_term_host_lifted_invariant : forall net, refined_raft_intermediate_reachable net -> no_entries_past_current_term_host_lifted net.
Lemma handleAppendEntries_currentTerm_monotonic: forall h st (d : raft_data) (m : msg) (t : term) (n : name) (pli : logIndex) (plt : term) (es : list entry) (ci : logIndex), handleAppendEntries h st t n pli plt es ci = (d, m) -> currentTerm st <= currentTerm d.
Lemma log_all_entries_append_entries : refined_raft_net_invariant_append_entries log_all_entries.
Lemma log_all_entries_append_entries_reply : refined_raft_net_invariant_append_entries_reply log_all_entries.
Lemma log_all_entries_request_vote : refined_raft_net_invariant_request_vote log_all_entries.
Lemma log_all_entries_request_vote_reply : refined_raft_net_invariant_request_vote_reply log_all_entries.
Lemma log_all_entries_do_leader : refined_raft_net_invariant_do_leader log_all_entries.
Lemma log_all_entries_do_generic_server : refined_raft_net_invariant_do_generic_server log_all_entries.
Lemma log_all_entries_client_request : refined_raft_net_invariant_client_request log_all_entries.
Lemma log_all_entries_timeout : refined_raft_net_invariant_timeout log_all_entries.
Lemma log_all_entries_reboot : refined_raft_net_invariant_reboot log_all_entries.
Lemma log_all_entries_init : refined_raft_net_invariant_init log_all_entries.
Lemma log_all_entries_state_same_packet_subset : refined_raft_net_invariant_state_same_packet_subset log_all_entries.
Theorem log_all_entries_invariant : forall net, refined_raft_intermediate_reachable net -> log_all_entries net.