PG0007

polynomial_diagonal_term_shift_right_iff

Alpha v34 independently verified · alpha_closed; checked-use authorized; not Stable

An actual trailing-zero shift of the right factor preserves exactly the same antidiagonal term witnesses in both directions.

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

65 script commands · 23 reading checkpoints · 0 local claims

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

Work with arbitrary variables or the premises of the current implication.

  1. L1
    intro ab
  2. L2
    intro ac
  3. L3
    intro L
  4. L4
    intro bb
  5. L5
    intro bc
  6. L6
    intro M
  7. L7
    intro BB
  8. L8
    intro BC
  9. L9
    intro i
  10. L10
    intro j
02Fix variables and assumptionsL11–12

Work with arbitrary variables or the premises of the current implication.

  1. L11
    intro t
  2. L12
    intro hs
03Separate the logical casesL13–13

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L13
    split
04Fix variables and assumptionsL14–14

Work with arbitrary variables or the premises of the current implication.

  1. L14
    intro ht
05Separate the logical casesL15–20

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L15
    cases ht
  2. L16
    cases ht_witness
  3. L17
    cases ht_witness_witness
  4. L18
    cases ht_witness_witness_witness
  5. L19
    cases ht_witness_witness_witness_right
  6. L20
    cases ht_witness_witness_witness_right_right
06Construct an explicit witnessL21–23

Supply the displayed value, then prove that it has the required property.

  1. L21
    exists x
  2. L22
    exists x1
  3. L23
    exists x2
07Separate the logical casesL24–24

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L24
    split
08Use earlier factsL25–25

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L25
    exact ht_witness_witness_witness_left
09Separate the logical casesL26–26

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L26
    split
10Use earlier factsL27–27

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L27
    exact ht_witness_witness_witness_right_left
11Separate the logical casesL28–28

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L28
    split
12Use earlier factsL29–38

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L29
    specialize polynomial_zero_extended_shift_forward (bb)
  2. L30
    specialize polynomial_zero_extended_shift_forward (bc)
  3. L31
    specialize polynomial_zero_extended_shift_forward (M)
  4. L32
    specialize polynomial_zero_extended_shift_forward (BB)
  5. L33
    specialize polynomial_zero_extended_shift_forward (BC)
  6. L34
    specialize polynomial_zero_extended_shift_forward (x)
  7. L35
    specialize polynomial_zero_extended_shift_forward (x2)
  8. L36
    apply polynomial_zero_extended_shift_forward
  9. L37
    exact hs
  10. L38
    exact ht_witness_witness_witness_right_right_left
13Use earlier factsL39–39

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. 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.

  1. L40
    intro ht
15Separate the logical casesL41–46

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L41
    cases ht
  2. L42
    cases ht_witness
  3. L43
    cases ht_witness_witness
  4. L44
    cases ht_witness_witness_witness
  5. L45
    cases ht_witness_witness_witness_right
  6. L46
    cases ht_witness_witness_witness_right_right
16Construct an explicit witnessL47–49

Supply the displayed value, then prove that it has the required property.

  1. L47
    exists x
  2. L48
    exists x1
  3. L49
    exists x2
17Separate the logical casesL50–50

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L50
    split
18Use earlier factsL51–51

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L51
    exact ht_witness_witness_witness_left
19Separate the logical casesL52–52

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L52
    split
20Use earlier factsL53–53

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L53
    exact ht_witness_witness_witness_right_left
21Separate the logical casesL54–54

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L54
    split
22Use earlier factsL55–64

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L55
    specialize polynomial_zero_extended_shift_reverse (bb)
  2. L56
    specialize polynomial_zero_extended_shift_reverse (bc)
  3. L57
    specialize polynomial_zero_extended_shift_reverse (M)
  4. L58
    specialize polynomial_zero_extended_shift_reverse (BB)
  5. L59
    specialize polynomial_zero_extended_shift_reverse (BC)
  6. L60
    specialize polynomial_zero_extended_shift_reverse (x)
  7. L61
    specialize polynomial_zero_extended_shift_reverse (x2)
  8. L62
    apply polynomial_zero_extended_shift_reverse
  9. L63
    exact hs
  10. L64
    exact ht_witness_witness_witness_right_right_left
23Use earlier factsL65–65

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L65
    exact ht_witness_witness_witness_right_right_right

Library-wide reading audit

Original exact command ledger · 65 lines
  1. 0001intro ab
  2. 0002intro ac
  3. 0003intro L
  4. 0004intro bb
  5. 0005intro bc
  6. 0006intro M
  7. 0007intro BB
  8. 0008intro BC
  9. 0009intro i
  10. 0010intro j
  11. 0011intro t
  12. 0012intro hs
  13. 0013split
  14. 0014intro ht
  15. 0015cases ht
  16. 0016cases ht_witness
  17. 0017cases ht_witness_witness
  18. 0018cases ht_witness_witness_witness
  19. 0019cases ht_witness_witness_witness_right
  20. 0020cases ht_witness_witness_witness_right_right
  21. 0021exists x
  22. 0022exists x1
  23. 0023exists x2
  24. 0024split
  25. 0025exact ht_witness_witness_witness_left
  26. 0026split
  27. 0027exact ht_witness_witness_witness_right_left
  28. 0028split
  29. 0029specialize polynomial_zero_extended_shift_forward (bb)
  30. 0030specialize polynomial_zero_extended_shift_forward (bc)
  31. 0031specialize polynomial_zero_extended_shift_forward (M)
  32. 0032specialize polynomial_zero_extended_shift_forward (BB)
  33. 0033specialize polynomial_zero_extended_shift_forward (BC)
  34. 0034specialize polynomial_zero_extended_shift_forward (x)
  35. 0035specialize polynomial_zero_extended_shift_forward (x2)
  36. 0036apply polynomial_zero_extended_shift_forward
  37. 0037exact hs
  38. 0038exact ht_witness_witness_witness_right_right_left
  39. 0039exact ht_witness_witness_witness_right_right_right
  40. 0040intro ht
  41. 0041cases ht
  42. 0042cases ht_witness
  43. 0043cases ht_witness_witness
  44. 0044cases ht_witness_witness_witness
  45. 0045cases ht_witness_witness_witness_right
  46. 0046cases ht_witness_witness_witness_right_right
  47. 0047exists x
  48. 0048exists x1
  49. 0049exists x2
  50. 0050split
  51. 0051exact ht_witness_witness_witness_left
  52. 0052split
  53. 0053exact ht_witness_witness_witness_right_left
  54. 0054split
  55. 0055specialize polynomial_zero_extended_shift_reverse (bb)
  56. 0056specialize polynomial_zero_extended_shift_reverse (bc)
  57. 0057specialize polynomial_zero_extended_shift_reverse (M)
  58. 0058specialize polynomial_zero_extended_shift_reverse (BB)
  59. 0059specialize polynomial_zero_extended_shift_reverse (BC)
  60. 0060specialize polynomial_zero_extended_shift_reverse (x)
  61. 0061specialize polynomial_zero_extended_shift_reverse (x2)
  62. 0062apply polynomial_zero_extended_shift_reverse
  63. 0063exact hs
  64. 0064exact ht_witness_witness_witness_right_right_left
  65. 0065exact ht_witness_witness_witness_right_right_right