Ltac currentTerm_sanity_unchanged :=
    red; intros; eapply leaderLogs_currentTerm_sanity_unchanged; subst; eauto.Ltac currentTerm_sanity_break_update :=
    currentTerm_sanity_start_update;
    match goal with
      h : _ |- _ => eapply h
    end; [| eauto];
    match goal with
      h : _ |- _ => solve [rewrite h; auto]
    end.

(* Specifications: *)
Lemma leaderLogs_currentTerm_sanity_init : refined_raft_net_invariant_init leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_client_request : refined_raft_net_invariant_client_request leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_timeout : refined_raft_net_invariant_timeout leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_append_entries : refined_raft_net_invariant_append_entries leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_append_entries_reply : refined_raft_net_invariant_append_entries_reply leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_request_vote : refined_raft_net_invariant_request_vote leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_request_vote_reply : refined_raft_net_invariant_request_vote_reply leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_do_leader : refined_raft_net_invariant_do_leader leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_do_generic_server : refined_raft_net_invariant_do_generic_server leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_state_same_packet_subset : refined_raft_net_invariant_state_same_packet_subset leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_reboot : refined_raft_net_invariant_reboot leaderLogs_currentTerm_sanity.
Lemma leaderLogs_currentTerm_sanity_invariant : forall net, refined_raft_intermediate_reachable net -> leaderLogs_currentTerm_sanity net.