Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved.
A genuine divisor mask has S n entries, indexed zero through n, and forces its zeroth entry to zero regardless of F(0). Möbius values remain positive-domain only. This family constructs divisor sums and Möbius tables; cancellation and the full G007 endpoint are separately proved later in the same release.
Exact theorem in conservative defined notation
∀ F. ∀ G. ∀ pb. ∀ pc. ∀ nb. ∀ nc. ∀ qb. ∀ qc. ∀ mb. ∀ mc. ∀ l. MatrixMinorFourCode(F,pb,pc,nb,nc) → MatrixMinorFourCode(G,qb,qc,mb,mc) → BetaPrefixEqual(pb,pc,qb,qc,l) → BetaPrefixEqual(nb,nc,mb,mc,l) → ArithTableEqual(F,G,l)
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 64 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–10
02Fix variables and assumptionsL11–20
03Fix variables and assumptionsL21–21
Work with arbitrary variables or the premises of the current implication.
- L21
intro hb
04Establish hpartsL22–31
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply divisor signed table at to components.
- L22
have hparts : ∃ p. ∃ n. BetaAt(pb,pc,i,p) ∧ (BetaAt(nb,nc,i,n) ∧ SignedBalance(a,p,n))Definitions: BetaAt(pb,pc,i,p)BetaAt(nb,nc,i,n)SignedBalance(a,p,n)Original native command in the exact edition - L23
specialize divisor_signed_table_at_to_components (F) - L24
specialize divisor_signed_table_at_to_components (pb) - L25
specialize divisor_signed_table_at_to_components (pc) - L26
specialize divisor_signed_table_at_to_components (nb) - L27
specialize divisor_signed_table_at_to_components (nc) - L28
specialize divisor_signed_table_at_to_components (i) - L29
specialize divisor_signed_table_at_to_components (a) - L30
apply divisor_signed_table_at_to_components - L31
exact hF
05Use earlier factsL32–32
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L32
exact ha
06Separate the logical casesL33–36
07Use earlier factsL37–46
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L37
specialize divisor_signed_table_at_functional (G) - L38
specialize divisor_signed_table_at_functional (i) - L39
specialize divisor_signed_table_at_functional (a) - L40
specialize divisor_signed_table_at_functional (b) - L41
apply divisor_signed_table_at_functional - L42
specialize divisor_signed_table_at_from_components (G) - L43
specialize divisor_signed_table_at_from_components (qb) - L44
specialize divisor_signed_table_at_from_components (qc) - L45
specialize divisor_signed_table_at_from_components (mb) - L46
specialize divisor_signed_table_at_from_components (mc)
08Use earlier factsL47–56
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L47
specialize divisor_signed_table_at_from_components (i) - L48
specialize divisor_signed_table_at_from_components (x) - L49
specialize divisor_signed_table_at_from_components (x1) - L50
specialize divisor_signed_table_at_from_components (a) - L51
apply divisor_signed_table_at_from_components - L52
exact hG - L53
specialize hp (i) - L54
specialize hp (x) - L55
apply hp - L56
exact hi
09Use earlier factsL57–64
Original defined command ledger · 64 lines
- 0001
intro F - 0002
intro G - 0003
intro pb - 0004
intro pc - 0005
intro nb - 0006
intro nc - 0007
intro qb - 0008
intro qc - 0009
intro mb - 0010
intro mc - 0011
intro l - 0012
intro hF - 0013
intro hG - 0014
intro hp - 0015
intro hn - 0016
intro i - 0017
intro a - 0018
intro b - 0019
intro hi - 0020
intro ha - 0021
intro hb - 0022
have hparts : ∃ p. ∃ n. BetaAt(pb,pc,i,p) ∧ (BetaAt(nb,nc,i,n) ∧ SignedBalance(a,p,n)) - 0023
specialize divisor_signed_table_at_to_components (F) - 0024
specialize divisor_signed_table_at_to_components (pb) - 0025
specialize divisor_signed_table_at_to_components (pc) - 0026
specialize divisor_signed_table_at_to_components (nb) - 0027
specialize divisor_signed_table_at_to_components (nc) - 0028
specialize divisor_signed_table_at_to_components (i) - 0029
specialize divisor_signed_table_at_to_components (a) - 0030
apply divisor_signed_table_at_to_components - 0031
exact hF - 0032
exact ha - 0033
cases hparts - 0034
cases hparts_witness - 0035
cases hparts_witness_witness - 0036
cases hparts_witness_witness_right - 0037
specialize divisor_signed_table_at_functional (G) - 0038
specialize divisor_signed_table_at_functional (i) - 0039
specialize divisor_signed_table_at_functional (a) - 0040
specialize divisor_signed_table_at_functional (b) - 0041
apply divisor_signed_table_at_functional - 0042
specialize divisor_signed_table_at_from_components (G) - 0043
specialize divisor_signed_table_at_from_components (qb) - 0044
specialize divisor_signed_table_at_from_components (qc) - 0045
specialize divisor_signed_table_at_from_components (mb) - 0046
specialize divisor_signed_table_at_from_components (mc) - 0047
specialize divisor_signed_table_at_from_components (i) - 0048
specialize divisor_signed_table_at_from_components (x) - 0049
specialize divisor_signed_table_at_from_components (x1) - 0050
specialize divisor_signed_table_at_from_components (a) - 0051
apply divisor_signed_table_at_from_components - 0052
exact hG - 0053
specialize hp (i) - 0054
specialize hp (x) - 0055
apply hp - 0056
exact hi - 0057
exact hparts_witness_witness_left - 0058
specialize hn (i) - 0059
specialize hn (x1) - 0060
apply hn - 0061
exact hi - 0062
exact hparts_witness_witness_right_left - 0063
exact hparts_witness_witness_right_right - 0064
exact hb