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. ¬m = 0 → ¬n = 0 → Coprime(m,n) → JordanTupleEnumeration(k,m,A,B,C,D,u) → JordanTupleEnumeration(k,n,E,F,G,H,v) → ∀ x. Le(x,u · v) → ∃ y. ∃ z. ∃ i. ∃ j. JordanRectangleCRT(m,n,k,A,B,C,D,u,E,F,G,H,v,y,z,i,j,x)
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 65 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–18
03Induction on qL19–20
04Construct an explicit witnessL21–24
05Fix variables and assumptionsL25–26
06Separate the logical casesL27–27
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L27
exfalso
07Use earlier factsL28–33
08Fix variables and assumptionsL34–34
Work with arbitrary variables or the premises of the current implication.
- L34
intro hq
09Establish holdL35–44
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply IH.
- L35
have hold : ∃ P. ∃ Q. ∃ R. ∃ T. JordanRectangleCRT(m,n,k,A,B,C,D,u,E,F,G,H,v,P,Q,R,T,q)Definitions: JordanRectangleCRT(m,n,k,A,B,C,D,u,E,F,G,H,v,P,Q,R,T,q)Original native command in the exact edition - L36
apply IH - L37
specialize le_trans (q) - L38
specialize le_trans (S q) - L39
specialize le_trans (u*v) - L40
apply le_trans - L41
specialize le_succ_self (q) - L42
apply le_succ_self - L43
exact hq - L44
specialize jordan_rectangle_crt_successor (m)
10Use earlier factsL45–54
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L45
specialize jordan_rectangle_crt_successor (n) - L46
specialize jordan_rectangle_crt_successor (k) - L47
specialize jordan_rectangle_crt_successor (A) - L48
specialize jordan_rectangle_crt_successor (B) - L49
specialize jordan_rectangle_crt_successor (C) - L50
specialize jordan_rectangle_crt_successor (D) - L51
specialize jordan_rectangle_crt_successor (u) - L52
specialize jordan_rectangle_crt_successor (E) - L53
specialize jordan_rectangle_crt_successor (F) - L54
specialize jordan_rectangle_crt_successor (G)
11Use earlier factsL55–64
Instantiate or apply named facts and discharge the corresponding proof obligations.
12Use earlier factsL65–65
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L65
exact hq
Original defined command ledger · 65 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 hm - 0015
intro hn - 0016
intro hcop - 0017
intro hleft - 0018
intro hright - 0019
induction q - 0020
intro hq - 0021
exists 0 - 0022
exists 0 - 0023
exists 0 - 0024
exists 0 - 0025
intro p - 0026
intro hp - 0027
exfalso - 0028
specialize lt_not_le (p) - 0029
specialize lt_not_le (0) - 0030
apply lt_not_le - 0031
exact hp - 0032
specialize zero_le (p) - 0033
apply zero_le - 0034
intro hq - 0035
have hold : ∃ P. ∃ Q. ∃ R. ∃ T. JordanRectangleCRT(m,n,k,A,B,C,D,u,E,F,G,H,v,P,Q,R,T,q) - 0036
apply IH - 0037
specialize le_trans (q) - 0038
specialize le_trans (S q) - 0039
specialize le_trans (u*v) - 0040
apply le_trans - 0041
specialize le_succ_self (q) - 0042
apply le_succ_self - 0043
exact hq - 0044
specialize jordan_rectangle_crt_successor (m) - 0045
specialize jordan_rectangle_crt_successor (n) - 0046
specialize jordan_rectangle_crt_successor (k) - 0047
specialize jordan_rectangle_crt_successor (A) - 0048
specialize jordan_rectangle_crt_successor (B) - 0049
specialize jordan_rectangle_crt_successor (C) - 0050
specialize jordan_rectangle_crt_successor (D) - 0051
specialize jordan_rectangle_crt_successor (u) - 0052
specialize jordan_rectangle_crt_successor (E) - 0053
specialize jordan_rectangle_crt_successor (F) - 0054
specialize jordan_rectangle_crt_successor (G) - 0055
specialize jordan_rectangle_crt_successor (H) - 0056
specialize jordan_rectangle_crt_successor (v) - 0057
specialize jordan_rectangle_crt_successor (q) - 0058
apply jordan_rectangle_crt_successor - 0059
exact hm - 0060
exact hn - 0061
exact hcop - 0062
exact hleft - 0063
exact hright - 0064
exact hold - 0065
exact hq