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
∀ m. ∀ n. ∀ k. ∀ A. ∀ B. ∀ C. ∀ D. ∀ u. ∀ E. ∀ F. ∀ G. ∀ H. ∀ v. ∀ P. ∀ Q. ∀ R. ∀ T. ¬m = 0 → ¬n = 0 → Coprime(m,n) → JordanTupleEnumeration(k,m,A,B,C,D,u) → JordanTupleEnumeration(k,n,E,F,G,H,v) → JordanRectangleCRT(m,n,k,A,B,C,D,u,E,F,G,H,v,P,Q,R,T,u · v) → JordanTupleEnumeration(k,m · n,P,Q,R,T,u · v)
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 131 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 (2)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–20
03Fix variables and assumptionsL21–23
04Separate the logical casesL24–24
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L24
split
05Fix variables and assumptionsL25–26
06Establish hvL27–30
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply hr.
- L27
have hv : ∃ i. ∃ j. ∃ b. ∃ c. ∃ d. ∃ e. ∃ f. ∃ g. Lt(i,u) ∧ (Lt(j,v) ∧ (p = v · i + j ∧ (BetaAt(A,B,i,b) ∧ BetaAt(C,D,i,c) ∧ (BetaAt(E,F,j,d) ∧ BetaAt(G,H,j,e) ∧ (BetaAt(P,Q,p,f) ∧ BetaAt(R,T,p,g) ∧ (JordanCanonicalTupleCRT(m,n,b,c,d,e,f,g,k) ∧ JordanPrimitiveTuple(m · n,f,g,k)))))))Definitions: Lt(i,u)Lt(j,v)BetaAt(A,B,i,b)BetaAt(C,D,i,c)BetaAt(E,F,j,d)BetaAt(G,H,j,e)BetaAt(P,Q,p,f)BetaAt(R,T,p,g)JordanCanonicalTupleCRT(m,n,b,c,d,e,f,g,k)JordanPrimitiveTuple(m · n,f,g,k)Original native command in the exact edition - L28
specialize hr (p) - L29
apply hr - L30
exact hp
07Separate the logical casesL31–40
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L31
cases hv - L32
cases hv_witness - L33
cases hv_witness_witness - L34
cases hv_witness_witness_witness - L35
cases hv_witness_witness_witness_witness - L36
cases hv_witness_witness_witness_witness_witness - L37
cases hv_witness_witness_witness_witness_witness_witness - L38
cases hv_witness_witness_witness_witness_witness_witness_witness - L39
cases hv_witness_witness_witness_witness_witness_witness_witness_witness - L40
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right
08Separate the logical casesL41–45
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L41
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right - L42
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right - L43
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right - L44
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right - L45
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right_right
09Construct an explicit witnessL46–47
10Separate the logical casesL48–48
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L48
split
11Use earlier factsL49–49
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L49
exact hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right_left
12Separate the logical casesL50–50
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L50
split
13Establish hcL51–52
Establish this local claim before using it. It is not an additional assumption.
- L51
have hc : JordanCanonicalTupleCRT(m,n,x2,x3,x4,x5,x6,x7,k)Definitions: JordanCanonicalTupleCRT(m,n,x2,x3,x4,x5,x6,x7,k)Original native command in the exact edition - L52
exact hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right_right_left
14Separate the logical casesL53–53
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L53
cases hc
15Use earlier factsL54–55
16Separate the logical casesL56–56
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L56
split
17Fix variables and assumptionsL57–60
18Use earlier factsL61–70
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L61
specialize jordan_rectangle_crt_covers (m) - L62
specialize jordan_rectangle_crt_covers (n) - L63
specialize jordan_rectangle_crt_covers (k) - L64
specialize jordan_rectangle_crt_covers (A) - L65
specialize jordan_rectangle_crt_covers (B) - L66
specialize jordan_rectangle_crt_covers (C) - L67
specialize jordan_rectangle_crt_covers (D) - L68
specialize jordan_rectangle_crt_covers (u) - L69
specialize jordan_rectangle_crt_covers (E) - L70
specialize jordan_rectangle_crt_covers (F)
19Use earlier factsL71–80
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L71
specialize jordan_rectangle_crt_covers (G) - L72
specialize jordan_rectangle_crt_covers (H) - L73
specialize jordan_rectangle_crt_covers (v) - L74
specialize jordan_rectangle_crt_covers (P) - L75
specialize jordan_rectangle_crt_covers (Q) - L76
specialize jordan_rectangle_crt_covers (R) - L77
specialize jordan_rectangle_crt_covers (T) - L78
specialize jordan_rectangle_crt_covers (b) - L79
specialize jordan_rectangle_crt_covers (c) - L80
apply jordan_rectangle_crt_covers
20Use earlier factsL81–88
21Fix variables and assumptionsL89–98
22Fix variables and assumptionsL99–99
Work with arbitrary variables or the premises of the current implication.
- L99
intro hsame
23Use earlier factsL100–109
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L100
specialize jordan_rectangle_crt_distinct (m) - L101
specialize jordan_rectangle_crt_distinct (n) - L102
specialize jordan_rectangle_crt_distinct (k) - L103
specialize jordan_rectangle_crt_distinct (A) - L104
specialize jordan_rectangle_crt_distinct (B) - L105
specialize jordan_rectangle_crt_distinct (C) - L106
specialize jordan_rectangle_crt_distinct (D) - L107
specialize jordan_rectangle_crt_distinct (u) - L108
specialize jordan_rectangle_crt_distinct (E) - L109
specialize jordan_rectangle_crt_distinct (F)
24Use earlier factsL110–119
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L110
specialize jordan_rectangle_crt_distinct (G) - L111
specialize jordan_rectangle_crt_distinct (H) - L112
specialize jordan_rectangle_crt_distinct (v) - L113
specialize jordan_rectangle_crt_distinct (P) - L114
specialize jordan_rectangle_crt_distinct (Q) - L115
specialize jordan_rectangle_crt_distinct (R) - L116
specialize jordan_rectangle_crt_distinct (T) - L117
specialize jordan_rectangle_crt_distinct (i) - L118
specialize jordan_rectangle_crt_distinct (j) - L119
specialize jordan_rectangle_crt_distinct (b)
25Use earlier factsL120–129
Instantiate or apply named facts and discharge the corresponding proof obligations.
Original defined command ledger · 131 lines
- 0001
intro m - 0002
intro n - 0003
intro k - 0004
intro A - 0005
intro B - 0006
intro C - 0007
intro D - 0008
intro u - 0009
intro E - 0010
intro F - 0011
intro G - 0012
intro H - 0013
intro v - 0014
intro P - 0015
intro Q - 0016
intro R - 0017
intro T - 0018
intro hm - 0019
intro hn - 0020
intro hcop - 0021
intro hl - 0022
intro hh - 0023
intro hr - 0024
split - 0025
intro p - 0026
intro hp - 0027
have hv : ∃ i. ∃ j. ∃ b. ∃ c. ∃ d. ∃ e. ∃ f. ∃ g. Lt(i,u) ∧ (Lt(j,v) ∧ (p = v · i + j ∧ (BetaAt(A,B,i,b) ∧ BetaAt(C,D,i,c) ∧ (BetaAt(E,F,j,d) ∧ BetaAt(G,H,j,e) ∧ (BetaAt(P,Q,p,f) ∧ BetaAt(R,T,p,g) ∧ (JordanCanonicalTupleCRT(m,n,b,c,d,e,f,g,k) ∧ JordanPrimitiveTuple(m · n,f,g,k))))))) - 0028
specialize hr (p) - 0029
apply hr - 0030
exact hp - 0031
cases hv - 0032
cases hv_witness - 0033
cases hv_witness_witness - 0034
cases hv_witness_witness_witness - 0035
cases hv_witness_witness_witness_witness - 0036
cases hv_witness_witness_witness_witness_witness - 0037
cases hv_witness_witness_witness_witness_witness_witness - 0038
cases hv_witness_witness_witness_witness_witness_witness_witness - 0039
cases hv_witness_witness_witness_witness_witness_witness_witness_witness - 0040
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right - 0041
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right - 0042
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right - 0043
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right - 0044
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right - 0045
cases hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right_right - 0046
exists x6 - 0047
exists x7 - 0048
split - 0049
exact hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right_left - 0050
split - 0051
have hc : JordanCanonicalTupleCRT(m,n,x2,x3,x4,x5,x6,x7,k) - 0052
exact hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right_right_left - 0053
cases hc - 0054
exact hc_left - 0055
exact hv_witness_witness_witness_witness_witness_witness_witness_witness_right_right_right_right_right_right_right - 0056
split - 0057
intro b - 0058
intro c - 0059
intro hb - 0060
intro hp - 0061
specialize jordan_rectangle_crt_covers (m) - 0062
specialize jordan_rectangle_crt_covers (n) - 0063
specialize jordan_rectangle_crt_covers (k) - 0064
specialize jordan_rectangle_crt_covers (A) - 0065
specialize jordan_rectangle_crt_covers (B) - 0066
specialize jordan_rectangle_crt_covers (C) - 0067
specialize jordan_rectangle_crt_covers (D) - 0068
specialize jordan_rectangle_crt_covers (u) - 0069
specialize jordan_rectangle_crt_covers (E) - 0070
specialize jordan_rectangle_crt_covers (F) - 0071
specialize jordan_rectangle_crt_covers (G) - 0072
specialize jordan_rectangle_crt_covers (H) - 0073
specialize jordan_rectangle_crt_covers (v) - 0074
specialize jordan_rectangle_crt_covers (P) - 0075
specialize jordan_rectangle_crt_covers (Q) - 0076
specialize jordan_rectangle_crt_covers (R) - 0077
specialize jordan_rectangle_crt_covers (T) - 0078
specialize jordan_rectangle_crt_covers (b) - 0079
specialize jordan_rectangle_crt_covers (c) - 0080
apply jordan_rectangle_crt_covers - 0081
exact hm - 0082
exact hn - 0083
exact hcop - 0084
exact hl - 0085
exact hh - 0086
exact hr - 0087
exact hb - 0088
exact hp - 0089
intro i - 0090
intro j - 0091
intro b - 0092
intro c - 0093
intro d - 0094
intro e - 0095
intro hi - 0096
intro hj - 0097
intro he - 0098
intro hf - 0099
intro hsame - 0100
specialize jordan_rectangle_crt_distinct (m) - 0101
specialize jordan_rectangle_crt_distinct (n) - 0102
specialize jordan_rectangle_crt_distinct (k) - 0103
specialize jordan_rectangle_crt_distinct (A) - 0104
specialize jordan_rectangle_crt_distinct (B) - 0105
specialize jordan_rectangle_crt_distinct (C) - 0106
specialize jordan_rectangle_crt_distinct (D) - 0107
specialize jordan_rectangle_crt_distinct (u) - 0108
specialize jordan_rectangle_crt_distinct (E) - 0109
specialize jordan_rectangle_crt_distinct (F) - 0110
specialize jordan_rectangle_crt_distinct (G) - 0111
specialize jordan_rectangle_crt_distinct (H) - 0112
specialize jordan_rectangle_crt_distinct (v) - 0113
specialize jordan_rectangle_crt_distinct (P) - 0114
specialize jordan_rectangle_crt_distinct (Q) - 0115
specialize jordan_rectangle_crt_distinct (R) - 0116
specialize jordan_rectangle_crt_distinct (T) - 0117
specialize jordan_rectangle_crt_distinct (i) - 0118
specialize jordan_rectangle_crt_distinct (j) - 0119
specialize jordan_rectangle_crt_distinct (b) - 0120
specialize jordan_rectangle_crt_distinct (c) - 0121
specialize jordan_rectangle_crt_distinct (d) - 0122
specialize jordan_rectangle_crt_distinct (e) - 0123
apply jordan_rectangle_crt_distinct - 0124
exact hl - 0125
exact hh - 0126
exact hr - 0127
exact hi - 0128
exact hj - 0129
exact he - 0130
exact hf - 0131
exact hsame