95 new Alpha admissions come from 96 source lemmas: tuple equality reflexivity reuses an already-admitted theorem and is not counted twice. All counts use actual finite beta-coded enumerations. G008 multiplicativity is proved; the general prime-power count and distinct-prime product formula are further goals. General prime-power fields (G091) remain open. Stable is unchanged.
Exact theorem in conservative defined notation
∀ k. ∀ A. ∀ B. ∀ C. ∀ D. ∀ E. ∀ F. ∀ G. ∀ H. ∀ i. ∀ j. ∀ b. ∀ c. ∀ d. ∀ e. BetaAt(A,B,i,b) ∧ BetaAt(C,D,i,c) → BetaAt(E,F,j,d) ∧ BetaAt(G,H,j,e) → IntegerVectorZero(b,c,d,e,k) → ∀ x. ∀ y. ∀ z. ∀ n. BetaAt(A,B,i,x) ∧ BetaAt(C,D,i,y) → BetaAt(E,F,j,z) ∧ BetaAt(G,H,j,n) → IntegerVectorZero(x,y,z,n,k)
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 71 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–24
04Separate the logical casesL25–28
05Establish heq_bL29–37
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply beta at unique.
06Establish heq_cL38–46
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply beta at unique.
07Establish heq_dL47–55
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply beta at unique.
08Establish heq_eL56–65
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply beta at unique.
09Calculate and transport equalitiesL66–70
10Use earlier factsL71–71
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L71
exact he
Original defined command ledger · 71 lines
- 0001
intro k - 0002
intro A - 0003
intro B - 0004
intro C - 0005
intro D - 0006
intro E - 0007
intro F - 0008
intro G - 0009
intro H - 0010
intro i - 0011
intro j - 0012
intro b - 0013
intro c - 0014
intro d - 0015
intro e - 0016
intro hl - 0017
intro hr - 0018
intro he - 0019
intro a0 - 0020
intro a1 - 0021
intro a2 - 0022
intro a3 - 0023
intro hnewl - 0024
intro hnewr - 0025
cases hl - 0026
cases hr - 0027
cases hnewl - 0028
cases hnewr - 0029
have heq_b : b=a0 - 0030
specialize beta_at_unique (A) - 0031
specialize beta_at_unique (B) - 0032
specialize beta_at_unique (i) - 0033
specialize beta_at_unique (b) - 0034
specialize beta_at_unique (a0) - 0035
apply beta_at_unique - 0036
exact hl_left - 0037
exact hnewl_left - 0038
have heq_c : c=a1 - 0039
specialize beta_at_unique (C) - 0040
specialize beta_at_unique (D) - 0041
specialize beta_at_unique (i) - 0042
specialize beta_at_unique (c) - 0043
specialize beta_at_unique (a1) - 0044
apply beta_at_unique - 0045
exact hl_right - 0046
exact hnewl_right - 0047
have heq_d : d=a2 - 0048
specialize beta_at_unique (E) - 0049
specialize beta_at_unique (F) - 0050
specialize beta_at_unique (j) - 0051
specialize beta_at_unique (d) - 0052
specialize beta_at_unique (a2) - 0053
apply beta_at_unique - 0054
exact hr_left - 0055
exact hnewr_left - 0056
have heq_e : e=a3 - 0057
specialize beta_at_unique (G) - 0058
specialize beta_at_unique (H) - 0059
specialize beta_at_unique (j) - 0060
specialize beta_at_unique (e) - 0061
specialize beta_at_unique (a3) - 0062
apply beta_at_unique - 0063
exact hr_right - 0064
exact hnewr_right - 0065
rewrite heq_b at he - 0066
rewrite heq_c at he - 0067
rewrite heq_c at he - 0068
rewrite heq_d at he - 0069
rewrite heq_e at he - 0070
rewrite heq_e at he - 0071
exact he