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 b c L t d e. (~((p) = 1) /\ forall pfa_factor_left_left_pad_bounded_prime pfa_factor_right_left_pad_bounded_prime. (p) = pfa_factor_left_left_pad_bounded_prime * pfa_factor_right_left_pad_bounded_prime -> pfa_factor_left_left_pad_bounded_prime = 1 \/ pfa_factor_right_left_pad_bounded_prime = 1) -> (forall fom_index_pfp_left_pad_bounded_source. (exists fom_gap_pfp_left_pad_bounded_source_index_bound. fom_gap_pfp_left_pad_bounded_source_index_bound + S (fom_index_pfp_left_pad_bounded_source) = L) -> exists fom_value_pfp_left_pad_bounded_source. ((((exists fom_beta_height_pfp_left_pad_bounded_source_entry. fom_beta_height_pfp_left_pad_bounded_source_entry + S (fom_value_pfp_left_pad_bounded_source) = S ((S (fom_index_pfp_left_pad_bounded_source)) * c)) /\ exists fom_beta_quotient_pfp_left_pad_bounded_source_entry. b = fom_beta_quotient_pfp_left_pad_bounded_source_entry * S ((S (fom_index_pfp_left_pad_bounded_source)) * c) + (fom_value_pfp_left_pad_bounded_source))) /\ (exists fom_gap_pfp_left_pad_bounded_source_value_bound. fom_gap_pfp_left_pad_bounded_source_value_bound + S (fom_value_pfp_left_pad_bounded_source) = p))) -> (((forall pfp_repeat_index_left_pad_bounded_graphzeros. (exists pfa_gap_left_pad_bounded_graphzerosindex. pfa_gap_left_pad_bounded_graphzerosindex + S (pfp_repeat_index_left_pad_bounded_graphzeros) = (t)) -> (((exists ff_h_pfp_left_pad_bounded_graphzerosentry. ff_h_pfp_left_pad_bounded_graphzerosentry + S (0) = S ((S (pfp_repeat_index_left_pad_bounded_graphzeros)) * e)) /\ exists ff_q_pfp_left_pad_bounded_graphzerosentry. d = ff_q_pfp_left_pad_bounded_graphzerosentry * S ((S (pfp_repeat_index_left_pad_bounded_graphzeros)) * e) + (0)))) /\ ((forall pfrep_index_left_pad_bounded_graph pfrep_value_left_pad_bounded_graph. (exists pfa_gap_left_pad_bounded_graphbound. pfa_gap_left_pad_bounded_graphbound + S (pfrep_index_left_pad_bounded_graph) = (L)) -> (((exists ff_h_pfp_left_pad_bounded_graphinput. ff_h_pfp_left_pad_bounded_graphinput + S (pfrep_value_left_pad_bounded_graph) = S ((S (pfrep_index_left_pad_bounded_graph)) * c)) /\ exists ff_q_pfp_left_pad_bounded_graphinput. b = ff_q_pfp_left_pad_bounded_graphinput * S ((S (pfrep_index_left_pad_bounded_graph)) * c) + (pfrep_value_left_pad_bounded_graph))) -> (((exists ff_h_pfp_left_pad_bounded_graphoutput. ff_h_pfp_left_pad_bounded_graphoutput + S (pfrep_value_left_pad_bounded_graph) = S ((S ((t)+pfrep_index_left_pad_bounded_graph)) * e)) /\ exists ff_q_pfp_left_pad_bounded_graphoutput. d = ff_q_pfp_left_pad_bounded_graphoutput * S ((S ((t)+pfrep_index_left_pad_bounded_graph)) * e) + (pfrep_value_left_pad_bounded_graph))))))) -> (forall fom_index_pfp_left_pad_bounded_target. (exists fom_gap_pfp_left_pad_bounded_target_index_bound. fom_gap_pfp_left_pad_bounded_target_index_bound + S (fom_index_pfp_left_pad_bounded_target) = t+L) -> exists fom_value_pfp_left_pad_bounded_target. ((((exists fom_beta_height_pfp_left_pad_bounded_target_entry. fom_beta_height_pfp_left_pad_bounded_target_entry + S (fom_value_pfp_left_pad_bounded_target) = S ((S (fom_index_pfp_left_pad_bounded_target)) * e)) /\ exists fom_beta_quotient_pfp_left_pad_bounded_target_entry. d = fom_beta_quotient_pfp_left_pad_bounded_target_entry * S ((S (fom_index_pfp_left_pad_bounded_target)) * e) + (fom_value_pfp_left_pad_bounded_target))) /\ (exists fom_gap_pfp_left_pad_bounded_target_value_bound. fom_gap_pfp_left_pad_bounded_target_value_bound + S (fom_value_pfp_left_pad_bounded_target) = p)))Constructive proof overview
Generated structural guide
Actual leading-zero padding preserves canonical prime-field bounds at its exact enlarged length.
The unchanged tactic script uses 2 declared prerequisites and contains 46 exact native proof lines.
Alpha v34 checked-use · first admitted v33 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
PX000A prime_field_polynomial_left_pad_index_cases prime_field_zero_below_prime 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.
Named ingredients (1)
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
cases h
04Establish hoL14–19
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime field polynomial left pad index cases.
- L14
have ho : (exists pfa_gap_left_pad_bound_zero. pfa_gap_left_pad_bound_zero + S (i) = (t)) \/ exists j. (((exists pfa_gap_left_pad_bound_source. pfa_gap_left_pad_bound_source + S (j) = (L)) /\ ((i=t+j)))) - L15
specialize prime_field_polynomial_left_pad_index_cases (t) - L16
specialize prime_field_polynomial_left_pad_index_cases (L) - L17
specialize prime_field_polynomial_left_pad_index_cases (i) - L18
apply prime_field_polynomial_left_pad_index_cases - L19
exact hi
05Separate the logical casesL20–20
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L20
cases ho
06Construct an explicit witnessL21–21
Supply the displayed value, then prove that it has the required property.
- L21
exists 0
07Separate the logical casesL22–22
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L22
split
08Use earlier factsL23–28
09Separate the logical casesL29–30
10Establish hvL31–34
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply hc.
- L31
have hv : exists a. (((((exists ff_h_pfp_left_pad_bound_entry. ff_h_pfp_left_pad_bound_entry + S (a) = S ((S (x)) * c)) /\ exists ff_q_pfp_left_pad_bound_entry. b = ff_q_pfp_left_pad_bound_entry * S ((S (x)) * c) + (a))) /\ ((exists pfa_gap_left_pad_bound_value. pfa_gap_left_pad_bound_value + S (a) = (p))))) - L32
specialize hc (x) - L33
apply hc - L34
exact ho_right_witness_left
11Separate the logical casesL35–36
12Construct an explicit witnessL37–37
Supply the displayed value, then prove that it has the required property.
- L37
exists x1
13Separate the logical casesL38–38
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L38
split
14Calculate and transport equalitiesL39–40
Original exact command ledger · 46 lines
- 0001
intro p - 0002
intro b - 0003
intro c - 0004
intro L - 0005
intro t - 0006
intro d - 0007
intro e - 0008
intro hp - 0009
intro hc - 0010
intro h - 0011
intro i - 0012
intro hi - 0013
cases h - 0014
have ho : (exists pfa_gap_left_pad_bound_zero. pfa_gap_left_pad_bound_zero + S (i) = (t)) \/ exists j. (((exists pfa_gap_left_pad_bound_source. pfa_gap_left_pad_bound_source + S (j) = (L)) /\ ((i=t+j)))) - 0015
specialize prime_field_polynomial_left_pad_index_cases (t) - 0016
specialize prime_field_polynomial_left_pad_index_cases (L) - 0017
specialize prime_field_polynomial_left_pad_index_cases (i) - 0018
apply prime_field_polynomial_left_pad_index_cases - 0019
exact hi - 0020
cases ho - 0021
exists 0 - 0022
split - 0023
specialize h_left (i) - 0024
apply h_left - 0025
exact ho_left - 0026
specialize prime_field_zero_below_prime (p) - 0027
apply prime_field_zero_below_prime - 0028
exact hp - 0029
cases ho_right - 0030
cases ho_right_witness - 0031
have hv : exists a. (((((exists ff_h_pfp_left_pad_bound_entry. ff_h_pfp_left_pad_bound_entry + S (a) = S ((S (x)) * c)) /\ exists ff_q_pfp_left_pad_bound_entry. b = ff_q_pfp_left_pad_bound_entry * S ((S (x)) * c) + (a))) /\ ((exists pfa_gap_left_pad_bound_value. pfa_gap_left_pad_bound_value + S (a) = (p))))) - 0032
specialize hc (x) - 0033
apply hc - 0034
exact ho_right_witness_left - 0035
cases hv - 0036
cases hv_witness - 0037
exists x1 - 0038
split - 0039
rewrite ho_right_witness_right - 0040
rewrite ho_right_witness_right - 0041
specialize h_right (x) - 0042
specialize h_right (x1) - 0043
apply h_right - 0044
exact ho_right_witness_left - 0045
exact hv_witness_left - 0046
exact hv_witness_right