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 a b. (~((p) = 1) /\ forall pfa_factor_left_addunique_domain pfa_factor_right_addunique_domain. (p) = pfa_factor_left_addunique_domain * pfa_factor_right_addunique_domain -> pfa_factor_left_addunique_domain = 1 \/ pfa_factor_right_addunique_domain = 1) -> (exists pfa_gap_addunique_left. pfa_gap_addunique_left + S (a) = (p)) -> (exists pfa_gap_addunique_right. pfa_gap_addunique_right + S (b) = (p)) -> exists c. (((exists pfa_gap_addchosenleft. pfa_gap_addchosenleft + S (a) = (p)) /\ (((exists pfa_gap_addchosenright. pfa_gap_addchosenright + S (b) = (p)) /\ ((((exists pfa_gap_addchosenresultbound. pfa_gap_addchosenresultbound + S (c) = (p)) /\ ((exists pfa_offset_left_addchosenresultcongruence pfa_offset_right_addchosenresultcongruence. ((a) + (b)) + (p) * pfa_offset_left_addchosenresultcongruence = (c) + (p) * pfa_offset_right_addchosenresultcongruence))))))))) /\ forall d. (((exists pfa_gap_addcomparisonleft. pfa_gap_addcomparisonleft + S (a) = (p)) /\ (((exists pfa_gap_addcomparisonright. pfa_gap_addcomparisonright + S (b) = (p)) /\ ((((exists pfa_gap_addcomparisonresultbound. pfa_gap_addcomparisonresultbound + S (d) = (p)) /\ ((exists pfa_offset_left_addcomparisonresultcongruence pfa_offset_right_addcomparisonresultcongruence. ((a) + (b)) + (p) * pfa_offset_left_addcomparisonresultcongruence = (d) + (p) * pfa_offset_right_addcomparisonresultcongruence))))))))) -> d = cConstructive proof overview
Generated structural guide
Existence and uniqueness of canonical prime-field add are both proved.
The unchanged tactic script uses 2 declared prerequisites and contains 28 exact native proof lines.
Alpha v34 checked-use · first admitted v31 · 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–6
02Establish hcL7–14
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime field add exists.
- L7
have hc : exists c. (((exists pfa_gap_addchoiceleft. pfa_gap_addchoiceleft + S (a) = (p)) /\ (((exists pfa_gap_addchoiceright. pfa_gap_addchoiceright + S (b) = (p)) /\ ((((exists pfa_gap_addchoiceresultbound. pfa_gap_addchoiceresultbound + S (c) = (p)) /\ ((exists pfa_offset_left_addchoiceresultcongruence pfa_offset_right_addchoiceresultcongruence. ((a) + (b)) + (p) * pfa_offset_left_addchoiceresultcongruence = (c) + (p) * pfa_offset_right_addchoiceresultcongruence))))))))) - L8
specialize prime_field_add_exists (p) - L9
specialize prime_field_add_exists (a) - L10
specialize prime_field_add_exists (b) - L11
apply prime_field_add_exists - L12
exact hp - L13
exact ha - L14
exact hb
03Separate the logical casesL15–15
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L15
cases hc
04Construct an explicit witnessL16–16
Supply the displayed value, then prove that it has the required property.
- L16
exists x
05Separate the logical casesL17–17
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L17
split
06Use earlier factsL18–18
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L18
exact hc_witness
07Fix variables and assumptionsL19–20
08Use earlier factsL21–28
Instantiate or apply named facts and discharge the corresponding proof obligations.
Original exact command ledger · 28 lines
- 0001
intro p - 0002
intro a - 0003
intro b - 0004
intro hp - 0005
intro ha - 0006
intro hb - 0007
have hc : exists c. (((exists pfa_gap_addchoiceleft. pfa_gap_addchoiceleft + S (a) = (p)) /\ (((exists pfa_gap_addchoiceright. pfa_gap_addchoiceright + S (b) = (p)) /\ ((((exists pfa_gap_addchoiceresultbound. pfa_gap_addchoiceresultbound + S (c) = (p)) /\ ((exists pfa_offset_left_addchoiceresultcongruence pfa_offset_right_addchoiceresultcongruence. ((a) + (b)) + (p) * pfa_offset_left_addchoiceresultcongruence = (c) + (p) * pfa_offset_right_addchoiceresultcongruence))))))))) - 0008
specialize prime_field_add_exists (p) - 0009
specialize prime_field_add_exists (a) - 0010
specialize prime_field_add_exists (b) - 0011
apply prime_field_add_exists - 0012
exact hp - 0013
exact ha - 0014
exact hb - 0015
cases hc - 0016
exists x - 0017
split - 0018
exact hc_witness - 0019
intro d - 0020
intro hd - 0021
specialize prime_field_add_functional (p) - 0022
specialize prime_field_add_functional (a) - 0023
specialize prime_field_add_functional (b) - 0024
specialize prime_field_add_functional (d) - 0025
specialize prime_field_add_functional (x) - 0026
apply prime_field_add_functional - 0027
exact hd - 0028
exact hc_witness