Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved.
Exact expanded first-order arithmetic statement
forall ab ac L bb bc M BB BC i j t. (((forall mdr_i_pfp_shift_term_relationprefix mdr_a_pfp_shift_term_relationprefix. (exists mdr_gap_pfp_shift_term_relationprefixb. mdr_gap_pfp_shift_term_relationprefixb + S (mdr_i_pfp_shift_term_relationprefix) = (M)) -> (((exists ff_h_mdr_pfp_shift_term_relationprefixo. ff_h_mdr_pfp_shift_term_relationprefixo + S (mdr_a_pfp_shift_term_relationprefix) = S ((S (mdr_i_pfp_shift_term_relationprefix)) * bc)) /\ exists ff_q_mdr_pfp_shift_term_relationprefixo. bb = ff_q_mdr_pfp_shift_term_relationprefixo * S ((S (mdr_i_pfp_shift_term_relationprefix)) * bc) + (mdr_a_pfp_shift_term_relationprefix))) -> (((exists ff_h_mdr_pfp_shift_term_relationprefixn. ff_h_mdr_pfp_shift_term_relationprefixn + S (mdr_a_pfp_shift_term_relationprefix) = S ((S (mdr_i_pfp_shift_term_relationprefix)) * BC)) /\ exists ff_q_mdr_pfp_shift_term_relationprefixn. BB = ff_q_mdr_pfp_shift_term_relationprefixn * S ((S (mdr_i_pfp_shift_term_relationprefix)) * BC) + (mdr_a_pfp_shift_term_relationprefix)))) /\ ((((exists ff_h_pfp_shift_term_relationlast. ff_h_pfp_shift_term_relationlast + S (0) = S ((S (M)) * BC)) /\ exists ff_q_pfp_shift_term_relationlast. BB = ff_q_pfp_shift_term_relationlast * S ((S (M)) * BC) + (0)))))) -> ((((exists pfc_complement_shift_term_old pfc_left_shift_term_old pfc_right_shift_term_old. (((j)+pfc_complement_shift_term_old=(i)) /\ ((((((exists pfa_gap_shift_term_oldleftinside. pfa_gap_shift_term_oldleftinside + S (j) = (L)) /\ ((((exists ff_h_pfp_shift_term_oldleftentry. ff_h_pfp_shift_term_oldleftentry + S (pfc_left_shift_term_old) = S ((S (j)) * ac)) /\ exists ff_q_pfp_shift_term_oldleftentry. ab = ff_q_pfp_shift_term_oldleftentry * S ((S (j)) * ac) + (pfc_left_shift_term_old)))))) \/ (((exists pfc_gap_shift_term_oldleftoutside. pfc_gap_shift_term_oldleftoutside+(L)=(j)) /\ (((pfc_left_shift_term_old)=0))))) /\ ((((((exists pfa_gap_shift_term_oldrightinside. pfa_gap_shift_term_oldrightinside + S (pfc_complement_shift_term_old) = (M)) /\ ((((exists ff_h_pfp_shift_term_oldrightentry. ff_h_pfp_shift_term_oldrightentry + S (pfc_right_shift_term_old) = S ((S (pfc_complement_shift_term_old)) * bc)) /\ exists ff_q_pfp_shift_term_oldrightentry. bb = ff_q_pfp_shift_term_oldrightentry * S ((S (pfc_complement_shift_term_old)) * bc) + (pfc_right_shift_term_old)))))) \/ (((exists pfc_gap_shift_term_oldrightoutside. pfc_gap_shift_term_oldrightoutside+(M)=(pfc_complement_shift_term_old)) /\ (((pfc_right_shift_term_old)=0))))) /\ (((t)=pfc_left_shift_term_old*pfc_right_shift_term_old)))))))) -> (exists pfc_complement_shift_term_new pfc_left_shift_term_new pfc_right_shift_term_new. (((j)+pfc_complement_shift_term_new=(i)) /\ ((((((exists pfa_gap_shift_term_newleftinside. pfa_gap_shift_term_newleftinside + S (j) = (L)) /\ ((((exists ff_h_pfp_shift_term_newleftentry. ff_h_pfp_shift_term_newleftentry + S (pfc_left_shift_term_new) = S ((S (j)) * ac)) /\ exists ff_q_pfp_shift_term_newleftentry. ab = ff_q_pfp_shift_term_newleftentry * S ((S (j)) * ac) + (pfc_left_shift_term_new)))))) \/ (((exists pfc_gap_shift_term_newleftoutside. pfc_gap_shift_term_newleftoutside+(L)=(j)) /\ (((pfc_left_shift_term_new)=0))))) /\ ((((((exists pfa_gap_shift_term_newrightinside. pfa_gap_shift_term_newrightinside + S (pfc_complement_shift_term_new) = (S M)) /\ ((((exists ff_h_pfp_shift_term_newrightentry. ff_h_pfp_shift_term_newrightentry + S (pfc_right_shift_term_new) = S ((S (pfc_complement_shift_term_new)) * BC)) /\ exists ff_q_pfp_shift_term_newrightentry. BB = ff_q_pfp_shift_term_newrightentry * S ((S (pfc_complement_shift_term_new)) * BC) + (pfc_right_shift_term_new)))))) \/ (((exists pfc_gap_shift_term_newrightoutside. pfc_gap_shift_term_newrightoutside+(S M)=(pfc_complement_shift_term_new)) /\ (((pfc_right_shift_term_new)=0))))) /\ (((t)=pfc_left_shift_term_new*pfc_right_shift_term_new))))))))) /\ (((exists pfc_complement_shift_term_new pfc_left_shift_term_new pfc_right_shift_term_new. (((j)+pfc_complement_shift_term_new=(i)) /\ ((((((exists pfa_gap_shift_term_newleftinside. pfa_gap_shift_term_newleftinside + S (j) = (L)) /\ ((((exists ff_h_pfp_shift_term_newleftentry. ff_h_pfp_shift_term_newleftentry + S (pfc_left_shift_term_new) = S ((S (j)) * ac)) /\ exists ff_q_pfp_shift_term_newleftentry. ab = ff_q_pfp_shift_term_newleftentry * S ((S (j)) * ac) + (pfc_left_shift_term_new)))))) \/ (((exists pfc_gap_shift_term_newleftoutside. pfc_gap_shift_term_newleftoutside+(L)=(j)) /\ (((pfc_left_shift_term_new)=0))))) /\ ((((((exists pfa_gap_shift_term_newrightinside. pfa_gap_shift_term_newrightinside + S (pfc_complement_shift_term_new) = (S M)) /\ ((((exists ff_h_pfp_shift_term_newrightentry. ff_h_pfp_shift_term_newrightentry + S (pfc_right_shift_term_new) = S ((S (pfc_complement_shift_term_new)) * BC)) /\ exists ff_q_pfp_shift_term_newrightentry. BB = ff_q_pfp_shift_term_newrightentry * S ((S (pfc_complement_shift_term_new)) * BC) + (pfc_right_shift_term_new)))))) \/ (((exists pfc_gap_shift_term_newrightoutside. pfc_gap_shift_term_newrightoutside+(S M)=(pfc_complement_shift_term_new)) /\ (((pfc_right_shift_term_new)=0))))) /\ (((t)=pfc_left_shift_term_new*pfc_right_shift_term_new)))))))) -> (exists pfc_complement_shift_term_old pfc_left_shift_term_old pfc_right_shift_term_old. (((j)+pfc_complement_shift_term_old=(i)) /\ ((((((exists pfa_gap_shift_term_oldleftinside. pfa_gap_shift_term_oldleftinside + S (j) = (L)) /\ ((((exists ff_h_pfp_shift_term_oldleftentry. ff_h_pfp_shift_term_oldleftentry + S (pfc_left_shift_term_old) = S ((S (j)) * ac)) /\ exists ff_q_pfp_shift_term_oldleftentry. ab = ff_q_pfp_shift_term_oldleftentry * S ((S (j)) * ac) + (pfc_left_shift_term_old)))))) \/ (((exists pfc_gap_shift_term_oldleftoutside. pfc_gap_shift_term_oldleftoutside+(L)=(j)) /\ (((pfc_left_shift_term_old)=0))))) /\ ((((((exists pfa_gap_shift_term_oldrightinside. pfa_gap_shift_term_oldrightinside + S (pfc_complement_shift_term_old) = (M)) /\ ((((exists ff_h_pfp_shift_term_oldrightentry. ff_h_pfp_shift_term_oldrightentry + S (pfc_right_shift_term_old) = S ((S (pfc_complement_shift_term_old)) * bc)) /\ exists ff_q_pfp_shift_term_oldrightentry. bb = ff_q_pfp_shift_term_oldrightentry * S ((S (pfc_complement_shift_term_old)) * bc) + (pfc_right_shift_term_old)))))) \/ (((exists pfc_gap_shift_term_oldrightoutside. pfc_gap_shift_term_oldrightoutside+(M)=(pfc_complement_shift_term_old)) /\ (((pfc_right_shift_term_old)=0))))) /\ (((t)=pfc_left_shift_term_old*pfc_right_shift_term_old))))))))))))Constructive proof overview
Generated structural guide
An actual trailing-zero shift of the right factor preserves exactly the same antidiagonal term witnesses in both directions.
The unchanged tactic script uses 2 declared prerequisites and contains 65 exact native proof lines.
Alpha v34 checked-use · first admitted v34 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
Direct 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.
Named ingredients (2)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–12
03Separate the logical casesL13–13
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L13
split
04Fix variables and assumptionsL14–14
Work with arbitrary variables or the premises of the current implication.
- L14
intro ht
05Separate the logical casesL15–20
06Construct an explicit witnessL21–23
07Separate the logical casesL24–24
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L24
split
08Use earlier factsL25–25
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L25
exact ht_witness_witness_witness_left
09Separate the logical casesL26–26
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L26
split
10Use earlier factsL27–27
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L27
exact ht_witness_witness_witness_right_left
11Separate the logical casesL28–28
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L28
split
12Use earlier factsL29–38
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L29
specialize polynomial_zero_extended_shift_forward (bb) - L30
specialize polynomial_zero_extended_shift_forward (bc) - L31
specialize polynomial_zero_extended_shift_forward (M) - L32
specialize polynomial_zero_extended_shift_forward (BB) - L33
specialize polynomial_zero_extended_shift_forward (BC) - L34
specialize polynomial_zero_extended_shift_forward (x) - L35
specialize polynomial_zero_extended_shift_forward (x2) - L36
apply polynomial_zero_extended_shift_forward - L37
exact hs - L38
exact ht_witness_witness_witness_right_right_left
13Use earlier factsL39–39
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L39
exact ht_witness_witness_witness_right_right_right
14Fix variables and assumptionsL40–40
Work with arbitrary variables or the premises of the current implication.
- L40
intro ht
15Separate the logical casesL41–46
16Construct an explicit witnessL47–49
17Separate the logical casesL50–50
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L50
split
18Use earlier factsL51–51
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L51
exact ht_witness_witness_witness_left
19Separate the logical casesL52–52
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L52
split
20Use earlier factsL53–53
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L53
exact ht_witness_witness_witness_right_left
21Separate the logical casesL54–54
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L54
split
22Use earlier factsL55–64
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L55
specialize polynomial_zero_extended_shift_reverse (bb) - L56
specialize polynomial_zero_extended_shift_reverse (bc) - L57
specialize polynomial_zero_extended_shift_reverse (M) - L58
specialize polynomial_zero_extended_shift_reverse (BB) - L59
specialize polynomial_zero_extended_shift_reverse (BC) - L60
specialize polynomial_zero_extended_shift_reverse (x) - L61
specialize polynomial_zero_extended_shift_reverse (x2) - L62
apply polynomial_zero_extended_shift_reverse - L63
exact hs - L64
exact ht_witness_witness_witness_right_right_left
23Use earlier factsL65–65
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L65
exact ht_witness_witness_witness_right_right_right
Original exact command ledger · 65 lines
- 0001
intro ab - 0002
intro ac - 0003
intro L - 0004
intro bb - 0005
intro bc - 0006
intro M - 0007
intro BB - 0008
intro BC - 0009
intro i - 0010
intro j - 0011
intro t - 0012
intro hs - 0013
split - 0014
intro ht - 0015
cases ht - 0016
cases ht_witness - 0017
cases ht_witness_witness - 0018
cases ht_witness_witness_witness - 0019
cases ht_witness_witness_witness_right - 0020
cases ht_witness_witness_witness_right_right - 0021
exists x - 0022
exists x1 - 0023
exists x2 - 0024
split - 0025
exact ht_witness_witness_witness_left - 0026
split - 0027
exact ht_witness_witness_witness_right_left - 0028
split - 0029
specialize polynomial_zero_extended_shift_forward (bb) - 0030
specialize polynomial_zero_extended_shift_forward (bc) - 0031
specialize polynomial_zero_extended_shift_forward (M) - 0032
specialize polynomial_zero_extended_shift_forward (BB) - 0033
specialize polynomial_zero_extended_shift_forward (BC) - 0034
specialize polynomial_zero_extended_shift_forward (x) - 0035
specialize polynomial_zero_extended_shift_forward (x2) - 0036
apply polynomial_zero_extended_shift_forward - 0037
exact hs - 0038
exact ht_witness_witness_witness_right_right_left - 0039
exact ht_witness_witness_witness_right_right_right - 0040
intro ht - 0041
cases ht - 0042
cases ht_witness - 0043
cases ht_witness_witness - 0044
cases ht_witness_witness_witness - 0045
cases ht_witness_witness_witness_right - 0046
cases ht_witness_witness_witness_right_right - 0047
exists x - 0048
exists x1 - 0049
exists x2 - 0050
split - 0051
exact ht_witness_witness_witness_left - 0052
split - 0053
exact ht_witness_witness_witness_right_left - 0054
split - 0055
specialize polynomial_zero_extended_shift_reverse (bb) - 0056
specialize polynomial_zero_extended_shift_reverse (bc) - 0057
specialize polynomial_zero_extended_shift_reverse (M) - 0058
specialize polynomial_zero_extended_shift_reverse (BB) - 0059
specialize polynomial_zero_extended_shift_reverse (BC) - 0060
specialize polynomial_zero_extended_shift_reverse (x) - 0061
specialize polynomial_zero_extended_shift_reverse (x2) - 0062
apply polynomial_zero_extended_shift_reverse - 0063
exact hs - 0064
exact ht_witness_witness_witness_right_right_left - 0065
exact ht_witness_witness_witness_right_right_right