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.

Lemma leaderLogs_currentTerm_sanity_invariant : forall net, refined_raft_intermediate_reachable net -> leaderLogs_currentTerm_sanity net.