Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved.
Coefficients are highest-degree-first. The divisor has a nonzero decoded head; primality supplies its actual inverse. Empty quotients and remainders are included. Functionality compares the constructed execution lengths and decoded coefficients, never arbitrary beta codes. Formal polynomial equivalence compares every coefficient, not evaluations on a finite field. The formal identity and remainder-degree bound are proved separately, not assumed by the execution graph. Arbitrary quotient/remainder-pair uniqueness from a formal identity, multiplication associativity, gcd/Bezout, irreducible-polynomial existence, and the full G091 prime-power-field goal remain open. The seven displayed new names are conservative first-order notation, not new kernel primitives.
Exact theorem in conservative defined notation
∀ ab. ∀ ac. ∀ bb. ∀ bc. ∀ M. ∀ N. ∀ t. PolynomialDiagonalTerm(ab,ac,N,bb,bc,M,N,N,t) → t = 0
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 29 original proof lines are preserved. Only local proposition formulas are abbreviated; every abbreviation has an exact binder-safe expansion check. The linked exact edition contains the unchanged replay script.
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.
01Fix variables and assumptionsL1–8
02Separate the logical casesL9–17
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
03Use earlier factsL18–23
04Separate the logical casesL24–24
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L24
cases ht_witness_witness_witness_right_left_right
05Calculate and transport equalitiesL25–25
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L25
trans x1*x2
06Use earlier factsL26–26
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L26
exact ht_witness_witness_witness_right_right_right
07Calculate and transport equalitiesL27–27
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L27
rewrite ht_witness_witness_witness_right_left_right_right
Original defined command ledger · 29 lines
- 0001
intro ab - 0002
intro ac - 0003
intro bb - 0004
intro bc - 0005
intro M - 0006
intro N - 0007
intro t - 0008
intro ht - 0009
cases ht - 0010
cases ht_witness - 0011
cases ht_witness_witness - 0012
cases ht_witness_witness_witness - 0013
cases ht_witness_witness_witness_right - 0014
cases ht_witness_witness_witness_right_right - 0015
cases ht_witness_witness_witness_right_left - 0016
cases ht_witness_witness_witness_right_left_left - 0017
exfalso - 0018
specialize lt_not_le (N) - 0019
specialize lt_not_le (N) - 0020
apply lt_not_le - 0021
exact ht_witness_witness_witness_right_left_left_left - 0022
specialize le_refl (N) - 0023
apply le_refl - 0024
cases ht_witness_witness_witness_right_left_right - 0025
trans x1*x2 - 0026
exact ht_witness_witness_witness_right_right_right - 0027
rewrite ht_witness_witness_witness_right_left_right_right - 0028
specialize mul_zero_left (x2) - 0029
apply mul_zero_left