Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved.
All products and sums use actual beta-coded coefficients; equality is formal coefficient equivalence, not equality of evaluations or raw codes. The zero gcd is included. Uniqueness is up to formal equivalence, not unique Bézout coefficients. This proves the polynomial gcd component, not G091 irreducible-polynomial existence or arbitrary prime-power-field construction.
Exact theorem in conservative defined notation
∀ p. ∀ db. ∀ dc. ∀ D. ∀ ab. ∀ ac. ∀ L. ∀ bb. ∀ bc. ∀ M. BetaPrefixInto(bb,bc,M,p) → FpPolynomialRightDivides(p,db,dc,D,ab,ac,L) → PolynomialEquivalent(ab,ac,L,bb,bc,M) → FpPolynomialRightDivides(p,db,dc,D,bb,bc,M)
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 49 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.
Named ingredients (1)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–13
03Separate the logical casesL14–21
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L14
cases hdivides - L15
cases hdivides_right - L16
cases hdivides_right_witness - L17
cases hdivides_right_witness_witness - L18
cases hdivides_right_witness_witness_witness - L19
cases hdivides_right_witness_witness_witness_witness - L20
cases hdivides_right_witness_witness_witness_witness_witness - L21
cases hdivides_right_witness_witness_witness_witness_witness_witness
04Use earlier factsL22–31
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L22
specialize prime_field_polynomial_right_divides_from_product (p) - L23
specialize prime_field_polynomial_right_divides_from_product (db) - L24
specialize prime_field_polynomial_right_divides_from_product (dc) - L25
specialize prime_field_polynomial_right_divides_from_product (D) - L26
specialize prime_field_polynomial_right_divides_from_product (bb) - L27
specialize prime_field_polynomial_right_divides_from_product (bc) - L28
specialize prime_field_polynomial_right_divides_from_product (M) - L29
specialize prime_field_polynomial_right_divides_from_product (x) - L30
specialize prime_field_polynomial_right_divides_from_product (x1) - L31
specialize prime_field_polynomial_right_divides_from_product (x2)
05Use earlier factsL32–41
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L32
specialize prime_field_polynomial_right_divides_from_product (x3) - L33
specialize prime_field_polynomial_right_divides_from_product (x4) - L34
specialize prime_field_polynomial_right_divides_from_product (x5) - L35
apply prime_field_polynomial_right_divides_from_product - L36
exact hB - L37
exact hdivides_right_witness_witness_witness_witness_witness_witness_left - L38
specialize prime_field_polynomial_equivalent_transitive (x3) - L39
specialize prime_field_polynomial_equivalent_transitive (x4) - L40
specialize prime_field_polynomial_equivalent_transitive (x5) - L41
specialize prime_field_polynomial_equivalent_transitive (ab)
06Use earlier factsL42–49
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L42
specialize prime_field_polynomial_equivalent_transitive (ac) - L43
specialize prime_field_polynomial_equivalent_transitive (L) - L44
specialize prime_field_polynomial_equivalent_transitive (bb) - L45
specialize prime_field_polynomial_equivalent_transitive (bc) - L46
specialize prime_field_polynomial_equivalent_transitive (M) - L47
apply prime_field_polynomial_equivalent_transitive - L48
exact hdivides_right_witness_witness_witness_witness_witness_witness_right - L49
exact hequivalent
Original defined command ledger · 49 lines
- 0001
intro p - 0002
intro db - 0003
intro dc - 0004
intro D - 0005
intro ab - 0006
intro ac - 0007
intro L - 0008
intro bb - 0009
intro bc - 0010
intro M - 0011
intro hB - 0012
intro hdivides - 0013
intro hequivalent - 0014
cases hdivides - 0015
cases hdivides_right - 0016
cases hdivides_right_witness - 0017
cases hdivides_right_witness_witness - 0018
cases hdivides_right_witness_witness_witness - 0019
cases hdivides_right_witness_witness_witness_witness - 0020
cases hdivides_right_witness_witness_witness_witness_witness - 0021
cases hdivides_right_witness_witness_witness_witness_witness_witness - 0022
specialize prime_field_polynomial_right_divides_from_product (p) - 0023
specialize prime_field_polynomial_right_divides_from_product (db) - 0024
specialize prime_field_polynomial_right_divides_from_product (dc) - 0025
specialize prime_field_polynomial_right_divides_from_product (D) - 0026
specialize prime_field_polynomial_right_divides_from_product (bb) - 0027
specialize prime_field_polynomial_right_divides_from_product (bc) - 0028
specialize prime_field_polynomial_right_divides_from_product (M) - 0029
specialize prime_field_polynomial_right_divides_from_product (x) - 0030
specialize prime_field_polynomial_right_divides_from_product (x1) - 0031
specialize prime_field_polynomial_right_divides_from_product (x2) - 0032
specialize prime_field_polynomial_right_divides_from_product (x3) - 0033
specialize prime_field_polynomial_right_divides_from_product (x4) - 0034
specialize prime_field_polynomial_right_divides_from_product (x5) - 0035
apply prime_field_polynomial_right_divides_from_product - 0036
exact hB - 0037
exact hdivides_right_witness_witness_witness_witness_witness_witness_left - 0038
specialize prime_field_polynomial_equivalent_transitive (x3) - 0039
specialize prime_field_polynomial_equivalent_transitive (x4) - 0040
specialize prime_field_polynomial_equivalent_transitive (x5) - 0041
specialize prime_field_polynomial_equivalent_transitive (ab) - 0042
specialize prime_field_polynomial_equivalent_transitive (ac) - 0043
specialize prime_field_polynomial_equivalent_transitive (L) - 0044
specialize prime_field_polynomial_equivalent_transitive (bb) - 0045
specialize prime_field_polynomial_equivalent_transitive (bc) - 0046
specialize prime_field_polynomial_equivalent_transitive (M) - 0047
apply prime_field_polynomial_equivalent_transitive - 0048
exact hdivides_right_witness_witness_witness_witness_witness_witness_right - 0049
exact hequivalent