Exact expanded first-order arithmetic statement
forall n b c d e k. (forall jt_index_msource jt_left_msource jt_right_msource. (exists jt_gap_msourceindex. jt_gap_msourceindex+S (jt_index_msource)=(k)) -> (((exists fs_h_jt_msourceleft. fs_h_jt_msourceleft + S (jt_left_msource) = S ((S (jt_index_msource)) * c)) /\ exists fs_q_jt_msourceleft. b = fs_q_jt_msourceleft * S ((S (jt_index_msource)) * c) + (jt_left_msource))) -> (((exists fs_h_jt_msourceright. fs_h_jt_msourceright + S (jt_right_msource) = S ((S (jt_index_msource)) * e)) /\ exists fs_q_jt_msourceright. d = fs_q_jt_msourceright * S ((S (jt_index_msource)) * e) + (jt_right_msource))) -> (exists jt_left_msourcemod jt_right_msourcemod. (jt_left_msource)+(n)*jt_left_msourcemod=(jt_right_msource)+(n)*jt_right_msourcemod)) -> (forall jt_index_mtarget jt_left_mtarget jt_right_mtarget. (exists jt_gap_mtargetindex. jt_gap_mtargetindex+S (jt_index_mtarget)=(k)) -> (((exists fs_h_jt_mtargetleft. fs_h_jt_mtargetleft + S (jt_left_mtarget) = S ((S (jt_index_mtarget)) * e)) /\ exists fs_q_jt_mtargetleft. d = fs_q_jt_mtargetleft * S ((S (jt_index_mtarget)) * e) + (jt_left_mtarget))) -> (((exists fs_h_jt_mtargetright. fs_h_jt_mtargetright + S (jt_right_mtarget) = S ((S (jt_index_mtarget)) * c)) /\ exists fs_q_jt_mtargetright. b = fs_q_jt_mtargetright * S ((S (jt_index_mtarget)) * c) + (jt_right_mtarget))) -> (exists jt_left_mtargetmod jt_right_mtargetmod. (jt_left_mtarget)+(n)*jt_left_mtargetmod=(jt_right_mtarget)+(n)*jt_right_mtargetmod))Constructive proof overview
Generated structural guide
Pointwise balanced congruence is symmetric on every finite prefix.
The unchanged tactic script uses 1 declared prerequisite and contains 24 exact native proof lines.
Alpha v35 checked-use · first admitted v35 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
mod_eq_symm Alpha theorem; checked-use authorizedDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.
Read the argument
Proof checkpoints
This is a reading aid, not a new proof or a proof-tree certificate. Checkpoint groups are consecutive commands, not inferred branch boundaries. Every step links to the preserved script.
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–13
03Use earlier factsL14–23
04Use earlier factsL24–24
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L24
exact ha
Original exact command ledger · 24 lines
- 0001
intro n - 0002
intro b - 0003
intro c - 0004
intro d - 0005
intro e - 0006
intro k - 0007
intro h - 0008
intro i - 0009
intro a - 0010
intro z - 0011
intro hi - 0012
intro ha - 0013
intro hz - 0014
specialize mod_eq_symm (n) - 0015
specialize mod_eq_symm (z) - 0016
specialize mod_eq_symm (a) - 0017
apply mod_eq_symm - 0018
specialize h (i) - 0019
specialize h (z) - 0020
specialize h (a) - 0021
apply h - 0022
exact hi - 0023
exact hz - 0024
exact ha