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 p k kb kc ab ac L i a r. (((exists ff_h_pfp_left_constant_coefficient_K. ff_h_pfp_left_constant_coefficient_K + S (k) = S ((S (0)) * kc)) /\ exists ff_q_pfp_left_constant_coefficient_K. kb = ff_q_pfp_left_constant_coefficient_K * S ((S (0)) * kc) + (k))) -> (exists pfa_gap_left_constant_coefficient_index. pfa_gap_left_constant_coefficient_index + S (i) = (L)) -> (((exists ff_h_pfp_left_constant_coefficient_A. ff_h_pfp_left_constant_coefficient_A + S (a) = S ((S (i)) * ac)) /\ exists ff_q_pfp_left_constant_coefficient_A. ab = ff_q_pfp_left_constant_coefficient_A * S ((S (i)) * ac) + (a))) -> (exists pfa_gap_left_constant_coefficient_k_bound. pfa_gap_left_constant_coefficient_k_bound + S (k) = (p)) -> (exists pfa_gap_left_constant_coefficient_a_bound. pfa_gap_left_constant_coefficient_a_bound + S (a) = (p)) -> (exists pfc_terms_code_left_constant_coefficient_actual pfc_terms_scale_left_constant_coefficient_actual pfc_natural_sum_left_constant_coefficient_actual. ((forall pfc_index_left_constant_coefficient_actualdiagonal. (exists pfa_gap_left_constant_coefficient_actualdiagonalbound. pfa_gap_left_constant_coefficient_actualdiagonalbound + S (pfc_index_left_constant_coefficient_actualdiagonal) = (S (i))) -> exists pfc_value_left_constant_coefficient_actualdiagonal. ((((exists ff_h_pfp_left_constant_coefficient_actualdiagonalentry. ff_h_pfp_left_constant_coefficient_actualdiagonalentry + S (pfc_value_left_constant_coefficient_actualdiagonal) = S ((S (pfc_index_left_constant_coefficient_actualdiagonal)) * pfc_terms_scale_left_constant_coefficient_actual)) /\ exists ff_q_pfp_left_constant_coefficient_actualdiagonalentry. pfc_terms_code_left_constant_coefficient_actual = ff_q_pfp_left_constant_coefficient_actualdiagonalentry * S ((S (pfc_index_left_constant_coefficient_actualdiagonal)) * pfc_terms_scale_left_constant_coefficient_actual) + (pfc_value_left_constant_coefficient_actualdiagonal))) /\ ((exists pfc_complement_left_constant_coefficient_actualdiagonalterm pfc_left_left_constant_coefficient_actualdiagonalterm pfc_right_left_constant_coefficient_actualdiagonalterm. (((pfc_index_left_constant_coefficient_actualdiagonal)+pfc_complement_left_constant_coefficient_actualdiagonalterm=(i)) /\ ((((((exists pfa_gap_left_constant_coefficient_actualdiagonaltermleftinside. pfa_gap_left_constant_coefficient_actualdiagonaltermleftinside + S (pfc_index_left_constant_coefficient_actualdiagonal) = (1)) /\ ((((exists ff_h_pfp_left_constant_coefficient_actualdiagonaltermleftentry. ff_h_pfp_left_constant_coefficient_actualdiagonaltermleftentry + S (pfc_left_left_constant_coefficient_actualdiagonalterm) = S ((S (pfc_index_left_constant_coefficient_actualdiagonal)) * kc)) /\ exists ff_q_pfp_left_constant_coefficient_actualdiagonaltermleftentry. kb = ff_q_pfp_left_constant_coefficient_actualdiagonaltermleftentry * S ((S (pfc_index_left_constant_coefficient_actualdiagonal)) * kc) + (pfc_left_left_constant_coefficient_actualdiagonalterm)))))) \/ (((exists pfc_gap_left_constant_coefficient_actualdiagonaltermleftoutside. pfc_gap_left_constant_coefficient_actualdiagonaltermleftoutside+(1)=(pfc_index_left_constant_coefficient_actualdiagonal)) /\ (((pfc_left_left_constant_coefficient_actualdiagonalterm)=0))))) /\ ((((((exists pfa_gap_left_constant_coefficient_actualdiagonaltermrightinside. pfa_gap_left_constant_coefficient_actualdiagonaltermrightinside + S (pfc_complement_left_constant_coefficient_actualdiagonalterm) = (L)) /\ ((((exists ff_h_pfp_left_constant_coefficient_actualdiagonaltermrightentry. ff_h_pfp_left_constant_coefficient_actualdiagonaltermrightentry + S (pfc_right_left_constant_coefficient_actualdiagonalterm) = S ((S (pfc_complement_left_constant_coefficient_actualdiagonalterm)) * ac)) /\ exists ff_q_pfp_left_constant_coefficient_actualdiagonaltermrightentry. ab = ff_q_pfp_left_constant_coefficient_actualdiagonaltermrightentry * S ((S (pfc_complement_left_constant_coefficient_actualdiagonalterm)) * ac) + (pfc_right_left_constant_coefficient_actualdiagonalterm)))))) \/ (((exists pfc_gap_left_constant_coefficient_actualdiagonaltermrightoutside. pfc_gap_left_constant_coefficient_actualdiagonaltermrightoutside+(L)=(pfc_complement_left_constant_coefficient_actualdiagonalterm)) /\ (((pfc_right_left_constant_coefficient_actualdiagonalterm)=0))))) /\ (((pfc_value_left_constant_coefficient_actualdiagonal)=pfc_left_left_constant_coefficient_actualdiagonalterm*pfc_right_left_constant_coefficient_actualdiagonalterm))))))))))) /\ (((exists fs_u_pfc_left_constant_coefficient_actualsum fs_v_pfc_left_constant_coefficient_actualsum. ((((exists fs_h_pfc_left_constant_coefficient_actualsum_body_start. fs_h_pfc_left_constant_coefficient_actualsum_body_start + S (0) = S ((S (0)) * fs_v_pfc_left_constant_coefficient_actualsum)) /\ exists fs_q_pfc_left_constant_coefficient_actualsum_body_start. fs_u_pfc_left_constant_coefficient_actualsum = fs_q_pfc_left_constant_coefficient_actualsum_body_start * S ((S (0)) * fs_v_pfc_left_constant_coefficient_actualsum) + (0))) /\ ((((exists fs_h_pfc_left_constant_coefficient_actualsum_body_terminal. fs_h_pfc_left_constant_coefficient_actualsum_body_terminal + S (pfc_natural_sum_left_constant_coefficient_actual) = S ((S (S (i))) * fs_v_pfc_left_constant_coefficient_actualsum)) /\ exists fs_q_pfc_left_constant_coefficient_actualsum_body_terminal. fs_u_pfc_left_constant_coefficient_actualsum = fs_q_pfc_left_constant_coefficient_actualsum_body_terminal * S ((S (S (i))) * fs_v_pfc_left_constant_coefficient_actualsum) + (pfc_natural_sum_left_constant_coefficient_actual))) /\ forall fs_i_pfc_left_constant_coefficient_actualsum_body_steps. (exists fs_lt_pfc_left_constant_coefficient_actualsum_body_steps_bound. fs_lt_pfc_left_constant_coefficient_actualsum_body_steps_bound + S fs_i_pfc_left_constant_coefficient_actualsum_body_steps = S (i)) -> exists fs_a_pfc_left_constant_coefficient_actualsum_body_steps fs_r_pfc_left_constant_coefficient_actualsum_body_steps fs_s_pfc_left_constant_coefficient_actualsum_body_steps. ((((exists fs_h_pfc_left_constant_coefficient_actualsum_body_steps_summand. fs_h_pfc_left_constant_coefficient_actualsum_body_steps_summand + S (fs_a_pfc_left_constant_coefficient_actualsum_body_steps) = S ((S (fs_i_pfc_left_constant_coefficient_actualsum_body_steps)) * pfc_terms_scale_left_constant_coefficient_actual)) /\ exists fs_q_pfc_left_constant_coefficient_actualsum_body_steps_summand. pfc_terms_code_left_constant_coefficient_actual = fs_q_pfc_left_constant_coefficient_actualsum_body_steps_summand * S ((S (fs_i_pfc_left_constant_coefficient_actualsum_body_steps)) * pfc_terms_scale_left_constant_coefficient_actual) + (fs_a_pfc_left_constant_coefficient_actualsum_body_steps))) /\ ((((exists fs_h_pfc_left_constant_coefficient_actualsum_body_steps_partial. fs_h_pfc_left_constant_coefficient_actualsum_body_steps_partial + S (fs_r_pfc_left_constant_coefficient_actualsum_body_steps) = S ((S (fs_i_pfc_left_constant_coefficient_actualsum_body_steps)) * fs_v_pfc_left_constant_coefficient_actualsum)) /\ exists fs_q_pfc_left_constant_coefficient_actualsum_body_steps_partial. fs_u_pfc_left_constant_coefficient_actualsum = fs_q_pfc_left_constant_coefficient_actualsum_body_steps_partial * S ((S (fs_i_pfc_left_constant_coefficient_actualsum_body_steps)) * fs_v_pfc_left_constant_coefficient_actualsum) + (fs_r_pfc_left_constant_coefficient_actualsum_body_steps))) /\ ((((exists fs_h_pfc_left_constant_coefficient_actualsum_body_steps_successor. fs_h_pfc_left_constant_coefficient_actualsum_body_steps_successor + S (fs_s_pfc_left_constant_coefficient_actualsum_body_steps) = S ((S (S fs_i_pfc_left_constant_coefficient_actualsum_body_steps)) * fs_v_pfc_left_constant_coefficient_actualsum)) /\ exists fs_q_pfc_left_constant_coefficient_actualsum_body_steps_successor. fs_u_pfc_left_constant_coefficient_actualsum = fs_q_pfc_left_constant_coefficient_actualsum_body_steps_successor * S ((S (S fs_i_pfc_left_constant_coefficient_actualsum_body_steps)) * fs_v_pfc_left_constant_coefficient_actualsum) + (fs_s_pfc_left_constant_coefficient_actualsum_body_steps))) /\ fs_s_pfc_left_constant_coefficient_actualsum_body_steps = fs_r_pfc_left_constant_coefficient_actualsum_body_steps + fs_a_pfc_left_constant_coefficient_actualsum_body_steps)))))) /\ ((((exists pfa_gap_left_constant_coefficient_actualresiduebound. pfa_gap_left_constant_coefficient_actualresiduebound + S (r) = (p)) /\ ((exists pfa_offset_left_left_constant_coefficient_actualresiduecongruence pfa_offset_right_left_constant_coefficient_actualresiduecongruence. (pfc_natural_sum_left_constant_coefficient_actual) + (p) * pfa_offset_left_left_constant_coefficient_actualresiduecongruence = (r) + (p) * pfa_offset_right_left_constant_coefficient_actualresiduecongruence))))))))) -> (((exists pfa_gap_left_constant_coefficient_resultleft. pfa_gap_left_constant_coefficient_resultleft + S (k) = (p)) /\ (((exists pfa_gap_left_constant_coefficient_resultright. pfa_gap_left_constant_coefficient_resultright + S (a) = (p)) /\ ((((exists pfa_gap_left_constant_coefficient_resultresultbound. pfa_gap_left_constant_coefficient_resultresultbound + S (r) = (p)) /\ ((exists pfa_offset_left_left_constant_coefficient_resultresultcongruence pfa_offset_right_left_constant_coefficient_resultresultcongruence. ((k) * (a)) + (p) * pfa_offset_left_left_constant_coefficient_resultresultcongruence = (r) + (p) * pfa_offset_right_left_constant_coefficient_resultresultcongruence)))))))))Constructive proof overview
Generated structural guide
Every actual in-range constant-left convolution coefficient is the canonical residue of the ordered product k*a. Both input bounds and the actual natural-sum witness are explicit; primality is unnecessary for this implication.
The unchanged tactic script uses 1 declared prerequisite and contains 45 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 (1)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–16
03Separate the logical casesL17–21
04Establish hnL22–31
Establish this local claim before using it. It is not an additional assumption.
- L22
have hn : x2=k*a - L23
specialize polynomial_diagonal_left_constant_natural_sum (k) - L24
specialize polynomial_diagonal_left_constant_natural_sum (kb) - L25
specialize polynomial_diagonal_left_constant_natural_sum (kc) - L26
specialize polynomial_diagonal_left_constant_natural_sum (ab) - L27
specialize polynomial_diagonal_left_constant_natural_sum (ac) - L28
specialize polynomial_diagonal_left_constant_natural_sum (L) - L29
specialize polynomial_diagonal_left_constant_natural_sum (i) - L30
specialize polynomial_diagonal_left_constant_natural_sum (a) - L31
specialize polynomial_diagonal_left_constant_natural_sum (x)
05Use earlier factsL32–39
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L32
specialize polynomial_diagonal_left_constant_natural_sum (x1) - L33
specialize polynomial_diagonal_left_constant_natural_sum (x2) - L34
apply polynomial_diagonal_left_constant_natural_sum - L35
exact hk - L36
exact hi - L37
exact ha - L38
exact hr_witness_witness_witness_left - L39
exact hr_witness_witness_witness_right_left
06Calculate and transport equalitiesL40–40
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L40
rewrite hn at hr_witness_witness_witness_right_right
07Separate the logical casesL41–41
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L41
split
08Use earlier factsL42–42
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L42
exact hkb
09Separate the logical casesL43–43
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L43
split
Original exact command ledger · 45 lines
- 0001
intro p - 0002
intro k - 0003
intro kb - 0004
intro kc - 0005
intro ab - 0006
intro ac - 0007
intro L - 0008
intro i - 0009
intro a - 0010
intro r - 0011
intro hk - 0012
intro hi - 0013
intro ha - 0014
intro hkb - 0015
intro hab - 0016
intro hr - 0017
cases hr - 0018
cases hr_witness - 0019
cases hr_witness_witness - 0020
cases hr_witness_witness_witness - 0021
cases hr_witness_witness_witness_right - 0022
have hn : x2=k*a - 0023
specialize polynomial_diagonal_left_constant_natural_sum (k) - 0024
specialize polynomial_diagonal_left_constant_natural_sum (kb) - 0025
specialize polynomial_diagonal_left_constant_natural_sum (kc) - 0026
specialize polynomial_diagonal_left_constant_natural_sum (ab) - 0027
specialize polynomial_diagonal_left_constant_natural_sum (ac) - 0028
specialize polynomial_diagonal_left_constant_natural_sum (L) - 0029
specialize polynomial_diagonal_left_constant_natural_sum (i) - 0030
specialize polynomial_diagonal_left_constant_natural_sum (a) - 0031
specialize polynomial_diagonal_left_constant_natural_sum (x) - 0032
specialize polynomial_diagonal_left_constant_natural_sum (x1) - 0033
specialize polynomial_diagonal_left_constant_natural_sum (x2) - 0034
apply polynomial_diagonal_left_constant_natural_sum - 0035
exact hk - 0036
exact hi - 0037
exact ha - 0038
exact hr_witness_witness_witness_left - 0039
exact hr_witness_witness_witness_right_left - 0040
rewrite hn at hr_witness_witness_witness_right_right - 0041
split - 0042
exact hkb - 0043
split - 0044
exact hab - 0045
exact hr_witness_witness_witness_right_right