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
∀ L. ∀ d. ∀ q. PolynomialQuotientLength(L,d,q) → ¬q = 0 → PolynomialProductLength(q,S d,L)
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 23 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–5
02Separate the logical casesL6–8
03Use earlier factsL9–10
04Separate the logical casesL11–13
05Use earlier factsL14–14
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L14
exact hq
06Separate the logical casesL15–15
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L15
split
07Fix variables and assumptionsL16–16
Work with arbitrary variables or the premises of the current implication.
- L16
intro hz
08Use earlier factsL17–19
09Calculate and transport equalitiesL20–22
10Use earlier factsL23–23
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L23
exact h_right_right
Original defined command ledger · 23 lines
- 0001
intro L - 0002
intro d - 0003
intro q - 0004
intro h - 0005
intro hq - 0006
cases h - 0007
cases h_left - 0008
exfalso - 0009
apply hq - 0010
exact h_left_left - 0011
cases h_right - 0012
right - 0013
split - 0014
exact hq - 0015
split - 0016
intro hz - 0017
specialize succ_ne_zero (d) - 0018
apply succ_ne_zero - 0019
exact hz - 0020
trans S (q+d) - 0021
simp - 0022
congr - 0023
exact h_right_right