Theorem aks6d1c2 42091

Description: Claim 2 of Theorem 6.1 of https://www3.nd.edu/%7eandyp/notes/AKS.pdf (Contributed by metakunt, 2-May-2025.)

Hypotheses

Ref	Expression
aks6d1c2a.1	⊢ ∼ = {⟨𝑒, 𝑓⟩ ∣ (𝑒 ∈ ℕ ∧ 𝑓 ∈ (Base‘(Poly1‘𝐾)) ∧ ∀𝑦 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅)(𝑒(.g‘(mulGrp‘𝐾))(((eval1‘𝐾)‘𝑓)‘𝑦)) = (((eval1‘𝐾)‘𝑓)‘(𝑒(.g‘(mulGrp‘𝐾))𝑦)))}
aks6d1c2a.2	⊢ 𝑃 = (chr‘𝐾)
aks6d1c2a.3	⊢ (𝜑 → 𝐾 ∈ Field)
aks6d1c2a.4	⊢ (𝜑 → 𝑃 ∈ ℙ)
aks6d1c2a.5	⊢ (𝜑 → 𝑅 ∈ ℕ)
aks6d1c2a.6	⊢ (𝜑 → 𝑁 ∈ ℕ)
aks6d1c2a.7	⊢ (𝜑 → 𝑃 ∥ 𝑁)
aks6d1c2a.8	⊢ (𝜑 → (𝑁 gcd 𝑅) = 1)
aks6d1c2a.10	⊢ 𝐺 = (𝑔 ∈ (ℕ0 ↑m (0...𝐴)) ↦ ((mulGrp‘(Poly1‘𝐾)) Σg (𝑖 ∈ (0...𝐴) ↦ ((𝑔‘𝑖)(.g‘(mulGrp‘(Poly1‘𝐾)))((var1‘𝐾)(+g‘(Poly1‘𝐾))((algSc‘(Poly1‘𝐾))‘((ℤRHom‘𝐾)‘𝑖)))))))
aks6d1c2a.11	⊢ (𝜑 → 𝐴 ∈ ℕ0)
aks6d1c2a.12	⊢ 𝐸 = (𝑘 ∈ ℕ0, 𝑙 ∈ ℕ0 ↦ ((𝑃↑𝑘) · ((𝑁 / 𝑃)↑𝑙)))
aks6d1c2a.13	⊢ 𝐿 = (ℤRHom‘(ℤ/nℤ‘𝑅))
aks6d1c2a.14	⊢ (𝜑 → ∀𝑎 ∈ (1...𝐴)𝑁 ∼ ((var1‘𝐾)(+g‘(Poly1‘𝐾))((algSc‘(Poly1‘𝐾))‘((ℤRHom‘𝐾)‘𝑎))))
aks6d1c2a.15	⊢ (𝜑 → (𝑥 ∈ (Base‘𝐾) ↦ (𝑃(.g‘(mulGrp‘𝐾))𝑥)) ∈ (𝐾 RingIso 𝐾))
aks6d1c2a.16	⊢ (𝜑 → 𝑀 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅))
aks6d1c2a.17	⊢ 𝐻 = (ℎ ∈ (ℕ0 ↑m (0...𝐴)) ↦ (((eval1‘𝐾)‘(𝐺‘ℎ))‘𝑀))
aks6d1c2a.18	⊢ 𝐵 = (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
aks6d1c2a.19	⊢ 𝐶 = (𝐸 “ ((0...𝐵) × (0...𝐵)))
aks6d1c2a.20	⊢ (𝜑 → (𝑄 ∈ ℙ ∧ 𝑄 ∥ 𝑁 ∧ 𝑃 ≠ 𝑄))

Assertion

Ref	Expression
aks6d1c2	⊢ (𝜑 → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))

Distinct variable groups:   ∼ ,𝑎   𝐴,𝑎   𝐴,𝑔,𝑖   𝐴,ℎ   𝐴,𝑘,𝑙   𝑥,𝐴   𝐵,𝑎   𝐵,𝑔,𝑖   𝐵,𝑘,𝑙   𝑥,𝐵   𝐶,𝑎   𝐶,𝑔,𝑖   𝐶,ℎ   𝐶,𝑘,𝑙   𝑥,𝐶   𝐸,𝑎   𝑔,𝐸,𝑖   𝑘,𝐸,𝑙   𝑥,𝐸   𝑒,𝐺,𝑓,𝑦   ℎ,𝐺   𝐾,𝑎   𝑒,𝐾,𝑓,𝑦   𝑔,𝐾,𝑖   ℎ,𝐾   𝑥,𝐾   ℎ,𝑀   𝑦,𝑀   𝑁,𝑎   𝑒,𝑁,𝑓,𝑦   𝑘,𝑁,𝑙   𝑥,𝑁   𝑃,𝑒,𝑓,𝑦   𝑃,𝑘,𝑙   𝑥,𝑃   𝑅,𝑎   𝑅,𝑒,𝑓,𝑦   𝑅,𝑔,𝑖   𝑅,ℎ   𝑅,𝑘,𝑙   𝑥,𝑅   𝜑,𝑎   𝜑,𝑔,𝑖   𝜑,ℎ   𝜑,𝑘,𝑙   𝜑,𝑥

Allowed substitution hints:   𝜑(𝑦,𝑒,𝑓)   𝐴(𝑦,𝑒,𝑓)   𝐵(𝑦,𝑒,𝑓,ℎ)   𝐶(𝑦,𝑒,𝑓)   𝑃(𝑔,ℎ,𝑖,𝑎)   𝑄(𝑥,𝑦,𝑒,𝑓,𝑔,ℎ,𝑖,𝑘,𝑎,𝑙)   ∼ (𝑥,𝑦,𝑒,𝑓,𝑔,ℎ,𝑖,𝑘,𝑙)   𝐸(𝑦,𝑒,𝑓,ℎ)   𝐺(𝑥,𝑔,𝑖,𝑘,𝑎,𝑙)   𝐻(𝑥,𝑦,𝑒,𝑓,𝑔,ℎ,𝑖,𝑘,𝑎,𝑙)   𝐾(𝑘,𝑙)   𝐿(𝑥,𝑦,𝑒,𝑓,𝑔,ℎ,𝑖,𝑘,𝑎,𝑙)   𝑀(𝑥,𝑒,𝑓,𝑔,𝑖,𝑘,𝑎,𝑙)   𝑁(𝑔,ℎ,𝑖)

Proof of Theorem aks6d1c2

Dummy variables 𝑏 𝑐 𝑑 𝑗 𝑢 𝑤 𝑠 𝑡 𝑜 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpl 482	. . . . 5 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → ((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶))
2		simprl 770	. . . . 5 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → 𝑏 < 𝑐)
3	1, 2	jca 511	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐))
4		simprr 772	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))
5	3, 4	jca 511	. . 3 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))))
6		aks6d1c2a.1	. . . . . . 7 ⊢ ∼ = {⟨𝑒, 𝑓⟩ ∣ (𝑒 ∈ ℕ ∧ 𝑓 ∈ (Base‘(Poly1‘𝐾)) ∧ ∀𝑦 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅)(𝑒(.g‘(mulGrp‘𝐾))(((eval1‘𝐾)‘𝑓)‘𝑦)) = (((eval1‘𝐾)‘𝑓)‘(𝑒(.g‘(mulGrp‘𝐾))𝑦)))}
7		aks6d1c2a.2	. . . . . . 7 ⊢ 𝑃 = (chr‘𝐾)
8		aks6d1c2a.3	. . . . . . . 8 ⊢ (𝜑 → 𝐾 ∈ Field)
9	8	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝐾 ∈ Field)
10		aks6d1c2a.4	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∈ ℙ)
11	10	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑃 ∈ ℙ)
12		aks6d1c2a.5	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ ℕ)
13	12	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑅 ∈ ℕ)
14		aks6d1c2a.6	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
15	14	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑁 ∈ ℕ)
16		aks6d1c2a.7	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∥ 𝑁)
17	16	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑃 ∥ 𝑁)
18		aks6d1c2a.8	. . . . . . . 8 ⊢ (𝜑 → (𝑁 gcd 𝑅) = 1)
19	18	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (𝑁 gcd 𝑅) = 1)
20		0nn0 12433	. . . . . . . . 9 ⊢ 0 ∈ ℕ0
21	20	a1i 11	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) ∧ 𝑗 ∈ (0...𝐴)) → 0 ∈ ℕ0)
22		eqid 2729	. . . . . . . 8 ⊢ (𝑗 ∈ (0...𝐴) ↦ 0) = (𝑗 ∈ (0...𝐴) ↦ 0)
23	21, 22	fmptd 7068	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (𝑗 ∈ (0...𝐴) ↦ 0):(0...𝐴)⟶ℕ0)
24		aks6d1c2a.10	. . . . . . 7 ⊢ 𝐺 = (𝑔 ∈ (ℕ0 ↑m (0...𝐴)) ↦ ((mulGrp‘(Poly1‘𝐾)) Σg (𝑖 ∈ (0...𝐴) ↦ ((𝑔‘𝑖)(.g‘(mulGrp‘(Poly1‘𝐾)))((var1‘𝐾)(+g‘(Poly1‘𝐾))((algSc‘(Poly1‘𝐾))‘((ℤRHom‘𝐾)‘𝑖)))))))
25		aks6d1c2a.11	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ ℕ0)
26	25	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝐴 ∈ ℕ0)
27		aks6d1c2a.12	. . . . . . 7 ⊢ 𝐸 = (𝑘 ∈ ℕ0, 𝑙 ∈ ℕ0 ↦ ((𝑃↑𝑘) · ((𝑁 / 𝑃)↑𝑙)))
28		aks6d1c2a.13	. . . . . . 7 ⊢ 𝐿 = (ℤRHom‘(ℤ/nℤ‘𝑅))
29		aks6d1c2a.14	. . . . . . . 8 ⊢ (𝜑 → ∀𝑎 ∈ (1...𝐴)𝑁 ∼ ((var1‘𝐾)(+g‘(Poly1‘𝐾))((algSc‘(Poly1‘𝐾))‘((ℤRHom‘𝐾)‘𝑎))))
30	29	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → ∀𝑎 ∈ (1...𝐴)𝑁 ∼ ((var1‘𝐾)(+g‘(Poly1‘𝐾))((algSc‘(Poly1‘𝐾))‘((ℤRHom‘𝐾)‘𝑎))))
31		aks6d1c2a.15	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ (Base‘𝐾) ↦ (𝑃(.g‘(mulGrp‘𝐾))𝑥)) ∈ (𝐾 RingIso 𝐾))
32	31	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (𝑥 ∈ (Base‘𝐾) ↦ (𝑃(.g‘(mulGrp‘𝐾))𝑥)) ∈ (𝐾 RingIso 𝐾))
33		aks6d1c2a.16	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅))
34	33	ad5antr 734	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑀 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅))
35		aks6d1c2a.17	. . . . . . 7 ⊢ 𝐻 = (ℎ ∈ (ℕ0 ↑m (0...𝐴)) ↦ (((eval1‘𝐾)‘(𝐺‘ℎ))‘𝑀))
36		aks6d1c2a.18	. . . . . . 7 ⊢ 𝐵 = (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
37		aks6d1c2a.19	. . . . . . 7 ⊢ 𝐶 = (𝐸 “ ((0...𝐵) × (0...𝐵)))
38		simp-5r 785	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑏 ∈ 𝐶)
39		simp-4r 783	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑐 ∈ 𝐶)
40		simpllr 775	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑏 < 𝑐)
41		eqid 2729	. . . . . . 7 ⊢ (.g‘(mulGrp‘(Poly1‘𝐾))) = (.g‘(mulGrp‘(Poly1‘𝐾)))
42		eqid 2729	. . . . . . 7 ⊢ (var1‘𝐾) = (var1‘𝐾)
43		eqid 2729	. . . . . . 7 ⊢ ((𝑐(.g‘(mulGrp‘(Poly1‘𝐾)))(var1‘𝐾))(-g‘(Poly1‘𝐾))(𝑏(.g‘(mulGrp‘(Poly1‘𝐾)))(var1‘𝐾))) = ((𝑐(.g‘(mulGrp‘(Poly1‘𝐾)))(var1‘𝐾))(-g‘(Poly1‘𝐾))(𝑏(.g‘(mulGrp‘(Poly1‘𝐾)))(var1‘𝐾)))
44		simplr 768	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑑 ∈ ℕ)
45		simpr 484	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑐 = (𝑏 + (𝑑 · 𝑅)))
46	6, 7, 9, 11, 13, 15, 17, 19, 23, 24, 26, 27, 28, 30, 32, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45	aks6d1c2lem4 42088	. . . . . 6 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))
47	46	ex 412	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) → (𝑐 = (𝑏 + (𝑑 · 𝑅)) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵)))
48	47	rexlimdva 3134	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) → (∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵)))
49	48	imp 406	. . 3 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))
50	5, 49	syl 17	. 2 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))
51		simprr 772	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑏 < 𝑐)
52		nfcv 2891	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑠(𝐿‘𝑡)
53		nfcv 2891	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑡(𝐿‘𝑠)
54		fveq2 6840	. . . . . . . . . . . . 13 ⊢ (𝑡 = 𝑠 → (𝐿‘𝑡) = (𝐿‘𝑠))
55	52, 53, 54	cbvmpt 5204	. . . . . . . . . . . 12 ⊢ (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑠 ∈ 𝐶 ↦ (𝐿‘𝑠))
56	55	a1i 11	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑠 ∈ 𝐶 ↦ (𝐿‘𝑠)))
57		simpr 484	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑏) → 𝑠 = 𝑏)
58	57	fveq2d 6844	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑏) → (𝐿‘𝑠) = (𝐿‘𝑏))
59		simpllr 775	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑏 ∈ 𝐶)
60		fvexd 6855	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) ∈ V)
61	56, 58, 59, 60	fvmptd 6957	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = (𝐿‘𝑏))
62	61	eqcomd 2735	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏))
63		simprl 770	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐))
64		simpr 484	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑐) → 𝑠 = 𝑐)
65	64	fveq2d 6844	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑐) → (𝐿‘𝑠) = (𝐿‘𝑐))
66		simplr 768	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑐 ∈ 𝐶)
67		fvexd 6855	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑐) ∈ V)
68	56, 65, 66, 67	fvmptd 6957	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) = (𝐿‘𝑐))
69	63, 68	eqtrd 2764	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = (𝐿‘𝑐))
70	62, 69	eqtrd 2764	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) = (𝐿‘𝑐))
71	70	eqcomd 2735	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑐) = (𝐿‘𝑏))
72	12	nnnn0d 12479	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 ∈ ℕ0)
73	72	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝑅 ∈ ℕ0)
74	73	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑅 ∈ ℕ0)
75	74	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℕ0)
76		fz0ssnn0 13559	. . . . . . . . . . . . . . . . . 18 ⊢ (0...𝐵) ⊆ ℕ0
77	76	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (0...𝐵) ⊆ ℕ0)
78	77, 77	jca 511	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((0...𝐵) ⊆ ℕ0 ∧ (0...𝐵) ⊆ ℕ0))
79		eqid 2729	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (ℤ/nℤ‘𝑅) = (ℤ/nℤ‘𝑅)
80	14, 10, 16, 12, 18, 27, 28, 79	hashscontpowcl 42081	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
81	80	nn0red 12480	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ)
82	80	nn0ge0d 12482	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
83	81, 82	resqrtcld 15360	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ)
84	83	flcld 13736	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ)
85	81, 82	sqrtge0d 15363	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → 0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
86		0zd 12517	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → 0 ∈ ℤ)
87		flge 13743	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ ∧ 0 ∈ ℤ) → (0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ↔ 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))))
88	83, 86, 87	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → (0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ↔ 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))))
89	85, 88	mpbid 232	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
90	84, 89	jca 511	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ ∧ 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))))
91		elnn0z 12518	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℕ0 ↔ ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ ∧ 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))))
92	90, 91	sylibr 234	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℕ0)
93	36	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → 𝐵 = (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
94	93	eleq1d 2813	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (𝐵 ∈ ℕ0 ↔ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℕ0))
95	92, 94	mpbird 257	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝐵 ∈ ℕ0)
96	95	nn0ge0d 12482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 0 ≤ 𝐵)
97	95	nn0zd 12531	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝐵 ∈ ℤ)
98		eluz 12783	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((0 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐵 ∈ (ℤ≥‘0) ↔ 0 ≤ 𝐵))
99	86, 97, 98	syl2anc 584	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝐵 ∈ (ℤ≥‘0) ↔ 0 ≤ 𝐵))
100	96, 99	mpbird 257	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝐵 ∈ (ℤ≥‘0))
101		fzn0 13475	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((0...𝐵) ≠ ∅ ↔ 𝐵 ∈ (ℤ≥‘0))
102	100, 101	sylibr 234	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (0...𝐵) ≠ ∅)
103	102, 102	jca 511	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅))
104		xpnz 6120	. . . . . . . . . . . . . . . . . . 19 ⊢ (((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅) ↔ ((0...𝐵) × (0...𝐵)) ≠ ∅)
105	104	biimpi 216	. . . . . . . . . . . . . . . . . 18 ⊢ (((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅) → ((0...𝐵) × (0...𝐵)) ≠ ∅)
106	103, 105	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ≠ ∅)
107		ssxpb 6135	. . . . . . . . . . . . . . . . 17 ⊢ (((0...𝐵) × (0...𝐵)) ≠ ∅ → (((0...𝐵) × (0...𝐵)) ⊆ (ℕ0 × ℕ0) ↔ ((0...𝐵) ⊆ ℕ0 ∧ (0...𝐵) ⊆ ℕ0)))
108	106, 107	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (((0...𝐵) × (0...𝐵)) ⊆ (ℕ0 × ℕ0) ↔ ((0...𝐵) ⊆ ℕ0 ∧ (0...𝐵) ⊆ ℕ0)))
109	78, 108	mpbird 257	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ⊆ (ℕ0 × ℕ0))
110		imass2 6062	. . . . . . . . . . . . . . 15 ⊢ (((0...𝐵) × (0...𝐵)) ⊆ (ℕ0 × ℕ0) → (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ (𝐸 “ (ℕ0 × ℕ0)))
111	109, 110	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ (𝐸 “ (ℕ0 × ℕ0)))
112		nfv 1914	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑜𝜑
113		aks6d1c2a.20	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝑄 ∈ ℙ ∧ 𝑄 ∥ 𝑁 ∧ 𝑃 ≠ 𝑄))
114	113	simp1d 1142	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑄 ∈ ℙ)
115	113	simp2d 1143	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑄 ∥ 𝑁)
116	113	simp3d 1144	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑃 ≠ 𝑄)
117	14, 10, 16, 27, 114, 115, 116	aks6d1c2p2 42080	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐸:(ℕ0 × ℕ0)–1-1→ℕ)
118		f1f 6738	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐸:(ℕ0 × ℕ0)–1-1→ℕ → 𝐸:(ℕ0 × ℕ0)⟶ℕ)
119	117, 118	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐸:(ℕ0 × ℕ0)⟶ℕ)
120	119	ffnd 6671	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐸 Fn (ℕ0 × ℕ0))
121	120	fnfund 6601	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → Fun 𝐸)
122	119	ffvelcdmda 7038	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑜 ∈ (ℕ0 × ℕ0)) → (𝐸‘𝑜) ∈ ℕ)
123	112, 121, 122	funimassd 6909	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℕ)
124	111, 123	sstrd 3954	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ ℕ)
125	37	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐶 = (𝐸 “ ((0...𝐵) × (0...𝐵))))
126	125	sseq1d 3975	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐶 ⊆ ℕ ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ ℕ))
127	124, 126	mpbird 257	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐶 ⊆ ℕ)
128	127	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝐶 ⊆ ℕ)
129		simpr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ 𝐶)
130	128, 129	sseldd 3944	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ ℕ)
131	130	nnzd 12532	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ ℤ)
132	131	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑐 ∈ ℤ)
133		simplr 768	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ 𝐶)
134	128, 133	sseldd 3944	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ ℕ)
135	134	nnzd 12532	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ ℤ)
136	135	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑏 ∈ ℤ)
137	79, 28	zndvds 21435	. . . . . . . 8 ⊢ ((𝑅 ∈ ℕ0 ∧ 𝑐 ∈ ℤ ∧ 𝑏 ∈ ℤ) → ((𝐿‘𝑐) = (𝐿‘𝑏) ↔ 𝑅 ∥ (𝑐 − 𝑏)))
138	75, 132, 136, 137	syl3anc 1373	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝐿‘𝑐) = (𝐿‘𝑏) ↔ 𝑅 ∥ (𝑐 − 𝑏)))
139	71, 138	mpbid 232	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∥ (𝑐 − 𝑏))
140	75	nn0zd 12531	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℤ)
141	132, 136	zsubcld 12619	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑐 − 𝑏) ∈ ℤ)
142		divides 16200	. . . . . . . 8 ⊢ ((𝑅 ∈ ℤ ∧ (𝑐 − 𝑏) ∈ ℤ) → (𝑅 ∥ (𝑐 − 𝑏) ↔ ∃𝑑 ∈ ℤ (𝑑 · 𝑅) = (𝑐 − 𝑏)))
143	140, 141, 142	syl2anc 584	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑅 ∥ (𝑐 − 𝑏) ↔ ∃𝑑 ∈ ℤ (𝑑 · 𝑅) = (𝑐 − 𝑏)))
144	143	biimpd 229	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑅 ∥ (𝑐 − 𝑏) → ∃𝑑 ∈ ℤ (𝑑 · 𝑅) = (𝑐 − 𝑏)))
145	139, 144	mpd 15	. . . . 5 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ∃𝑑 ∈ ℤ (𝑑 · 𝑅) = (𝑐 − 𝑏))
146		simprl 770	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℤ)
147	130	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 ∈ ℕ)
148	147	nnred 12177	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 ∈ ℝ)
149	134	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℕ)
150	149	nnred 12177	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℝ)
151	148, 150	resubcld 11582	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) ∈ ℝ)
152	12	nnrpd 12969	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ ℝ+)
153	152	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝑅 ∈ ℝ+)
154	153	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑅 ∈ ℝ+)
155	154	adantr 480	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℝ+)
156	155	adantr 480	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℝ+)
157	156	rpred 12971	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℝ)
158	51	adantr 480	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 < 𝑐)
159	150, 148	posdifd 11741	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑏 < 𝑐 ↔ 0 < (𝑐 − 𝑏)))
160	158, 159	mpbid 232	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < (𝑐 − 𝑏))
161	156	rpgt0d 12974	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < 𝑅)
162	151, 157, 160, 161	divgt0d 12094	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < ((𝑐 − 𝑏) / 𝑅))
163	157	recnd 11178	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℂ)
164	146	zred 12614	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℝ)
165	164	recnd 11178	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℂ)
166	163, 165	mulcomd 11171	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑅 · 𝑑) = (𝑑 · 𝑅))
167		simprr 772	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 · 𝑅) = (𝑐 − 𝑏))
168	166, 167	eqtrd 2764	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑅 · 𝑑) = (𝑐 − 𝑏))
169	151	recnd 11178	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) ∈ ℂ)
170	161	gt0ne0d 11718	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ≠ 0)
171	169, 163, 165, 170	divmuld 11956	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (((𝑐 − 𝑏) / 𝑅) = 𝑑 ↔ (𝑅 · 𝑑) = (𝑐 − 𝑏)))
172	168, 171	mpbird 257	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → ((𝑐 − 𝑏) / 𝑅) = 𝑑)
173	162, 172	breqtrd 5128	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < 𝑑)
174	146, 173	jca 511	. . . . . 6 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 ∈ ℤ ∧ 0 < 𝑑))
175		elnnz 12515	. . . . . 6 ⊢ (𝑑 ∈ ℕ ↔ (𝑑 ∈ ℤ ∧ 0 < 𝑑))
176	174, 175	sylibr 234	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℕ)
177	167	eqcomd 2735	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) = (𝑑 · 𝑅))
178	148	recnd 11178	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 ∈ ℂ)
179	150	recnd 11178	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℂ)
180	167, 169	eqeltrd 2828	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 · 𝑅) ∈ ℂ)
181	178, 179, 180	subaddd 11527	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → ((𝑐 − 𝑏) = (𝑑 · 𝑅) ↔ (𝑏 + (𝑑 · 𝑅)) = 𝑐))
182	177, 181	mpbid 232	. . . . . 6 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑏 + (𝑑 · 𝑅)) = 𝑐)
183	182	eqcomd 2735	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 = (𝑏 + (𝑑 · 𝑅)))
184	145, 176, 183	reximssdv 3151	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))
185	51, 184	jca 511	. . 3 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))))
186		fzfid 13914	. . . . . . 7 ⊢ (𝜑 → (0...𝐵) ∈ Fin)
187		xpfi 9245	. . . . . . 7 ⊢ (((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin) → ((0...𝐵) × (0...𝐵)) ∈ Fin)
188	186, 186, 187	syl2anc 584	. . . . . 6 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ∈ Fin)
189		imafi 9240	. . . . . 6 ⊢ ((Fun 𝐸 ∧ ((0...𝐵) × (0...𝐵)) ∈ Fin) → (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin)
190	121, 188, 189	syl2anc 584	. . . . 5 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin)
191	125	eleq1d 2813	. . . . 5 ⊢ (𝜑 → (𝐶 ∈ Fin ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin))
192	190, 191	mpbird 257	. . . 4 ⊢ (𝜑 → 𝐶 ∈ Fin)
193	79	zncrng 21430	. . . . . . . . . 10 ⊢ (𝑅 ∈ ℕ0 → (ℤ/nℤ‘𝑅) ∈ CRing)
194	72, 193	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (ℤ/nℤ‘𝑅) ∈ CRing)
195		crngring 20130	. . . . . . . . 9 ⊢ ((ℤ/nℤ‘𝑅) ∈ CRing → (ℤ/nℤ‘𝑅) ∈ Ring)
196	194, 195	syl 17	. . . . . . . 8 ⊢ (𝜑 → (ℤ/nℤ‘𝑅) ∈ Ring)
197	28	zrhrhm 21397	. . . . . . . 8 ⊢ ((ℤ/nℤ‘𝑅) ∈ Ring → 𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)))
198	196, 197	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)))
199	198	imaexd 7872	. . . . . 6 ⊢ (𝜑 → (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ V)
200		hashclb 14299	. . . . . 6 ⊢ ((𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ V → ((𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ Fin ↔ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0))
201	199, 200	syl 17	. . . . 5 ⊢ (𝜑 → ((𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ Fin ↔ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0))
202	80, 201	mpbird 257	. . . 4 ⊢ (𝜑 → (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ Fin)
203		hashcl 14297	. . . . . . . . . . . . 13 ⊢ ((𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ Fin → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
204	202, 203	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
205	204	nn0red 12480	. . . . . . . . . . 11 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ)
206	204	nn0ge0d 12482	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
207		sqrtmsq 15212	. . . . . . . . . . 11 ⊢ (((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) = (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
208	205, 206, 207	syl2anc 584	. . . . . . . . . 10 ⊢ (𝜑 → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) = (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
209	208	eqcomd 2735	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) = (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
210	205, 206	jca 511	. . . . . . . . . . 11 ⊢ (𝜑 → ((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
211		sqrtmul 15201	. . . . . . . . . . 11 ⊢ ((((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∧ ((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) = ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) · (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
212	210, 210, 211	syl2anc 584	. . . . . . . . . 10 ⊢ (𝜑 → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) = ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) · (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
213	205, 206	resqrtcld 15360	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ)
214	213	flcld 13736	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ)
215	205, 206	sqrtge0d 15363	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
216	213, 86, 87	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ↔ 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))))
217	215, 216	mpbid 232	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
218	214, 217	jca 511	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ ∧ 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))))
219	218, 91	sylibr 234	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℕ0)
220	219, 94	mpbird 257	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵 ∈ ℕ0)
221	220	nn0red 12480	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐵 ∈ ℝ)
222		1red 11151	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℝ)
223	221, 222	readdcld 11179	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 + 1) ∈ ℝ)
224		flltp1 13738	. . . . . . . . . . . . 13 ⊢ ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
225	213, 224	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
226	93	oveq1d 7384	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 + 1) = ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
227	225, 226	breqtrrd 5130	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < (𝐵 + 1))
228	213, 223, 213, 223, 215, 227, 215, 227	ltmul12ad 12100	. . . . . . . . . 10 ⊢ (𝜑 → ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) · (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) < ((𝐵 + 1) · (𝐵 + 1)))
229	212, 228	eqbrtrd 5124	. . . . . . . . 9 ⊢ (𝜑 → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) < ((𝐵 + 1) · (𝐵 + 1)))
230	209, 229	eqbrtrd 5124	. . . . . . . 8 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < ((𝐵 + 1) · (𝐵 + 1)))
231		hashfz0 14373	. . . . . . . . . 10 ⊢ (𝐵 ∈ ℕ0 → (♯‘(0...𝐵)) = (𝐵 + 1))
232	220, 231	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(0...𝐵)) = (𝐵 + 1))
233	232, 232	oveq12d 7387	. . . . . . . 8 ⊢ (𝜑 → ((♯‘(0...𝐵)) · (♯‘(0...𝐵))) = ((𝐵 + 1) · (𝐵 + 1)))
234	230, 233	breqtrrd 5130	. . . . . . 7 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
235	186, 186	jca 511	. . . . . . . 8 ⊢ (𝜑 → ((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin))
236		hashxp 14375	. . . . . . . 8 ⊢ (((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin) → (♯‘((0...𝐵) × (0...𝐵))) = ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
237	235, 236	syl 17	. . . . . . 7 ⊢ (𝜑 → (♯‘((0...𝐵) × (0...𝐵))) = ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
238	234, 237	breqtrrd 5130	. . . . . 6 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘((0...𝐵) × (0...𝐵))))
239		ovexd 7404	. . . . . . . . . . 11 ⊢ (𝜑 → (0...𝐵) ∈ V)
240	239, 239	jca 511	. . . . . . . . . 10 ⊢ (𝜑 → ((0...𝐵) ∈ V ∧ (0...𝐵) ∈ V))
241		xpexg 7706	. . . . . . . . . 10 ⊢ (((0...𝐵) ∈ V ∧ (0...𝐵) ∈ V) → ((0...𝐵) × (0...𝐵)) ∈ V)
242	240, 241	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ∈ V)
243	242	mptexd 7180	. . . . . . . 8 ⊢ (𝜑 → (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) ∈ V)
244	120	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝐸 Fn (ℕ0 × ℕ0))
245	109	sselda 3943	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝑤 ∈ (ℕ0 × ℕ0))
246		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝑤 ∈ ((0...𝐵) × (0...𝐵)))
247	244, 245, 246	fnfvimad 7190	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → (𝐸‘𝑤) ∈ (𝐸 “ ((0...𝐵) × (0...𝐵))))
248		eqid 2729	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤))
249	247, 248	fmptd 7068	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))⟶(𝐸 “ ((0...𝐵) × (0...𝐵))))
250	119, 109	feqresmpt 6912	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸 ↾ ((0...𝐵) × (0...𝐵))) = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)))
251	250	feq1d 6652	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐸 ↾ ((0...𝐵) × (0...𝐵))):((0...𝐵) × (0...𝐵))⟶(𝐸 “ ((0...𝐵) × (0...𝐵))) ↔ (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))⟶(𝐸 “ ((0...𝐵) × (0...𝐵)))))
252	249, 251	mpbird 257	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐸 ↾ ((0...𝐵) × (0...𝐵))):((0...𝐵) × (0...𝐵))⟶(𝐸 “ ((0...𝐵) × (0...𝐵))))
253		f1resf1 6746	. . . . . . . . . . . 12 ⊢ ((𝐸:(ℕ0 × ℕ0)–1-1→ℕ ∧ ((0...𝐵) × (0...𝐵)) ⊆ (ℕ0 × ℕ0) ∧ (𝐸 ↾ ((0...𝐵) × (0...𝐵))):((0...𝐵) × (0...𝐵))⟶(𝐸 “ ((0...𝐵) × (0...𝐵)))) → (𝐸 ↾ ((0...𝐵) × (0...𝐵))):((0...𝐵) × (0...𝐵))–1-1→(𝐸 “ ((0...𝐵) × (0...𝐵))))
254	117, 109, 252, 253	syl3anc 1373	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 ↾ ((0...𝐵) × (0...𝐵))):((0...𝐵) × (0...𝐵))–1-1→(𝐸 “ ((0...𝐵) × (0...𝐵))))
255		eqidd 2730	. . . . . . . . . . . 12 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) = ((0...𝐵) × (0...𝐵)))
256		eqidd 2730	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) = (𝐸 “ ((0...𝐵) × (0...𝐵))))
257	250, 255, 256	f1eq123d 6774	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐸 ↾ ((0...𝐵) × (0...𝐵))):((0...𝐵) × (0...𝐵))–1-1→(𝐸 “ ((0...𝐵) × (0...𝐵))) ↔ (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1→(𝐸 “ ((0...𝐵) × (0...𝐵)))))
258	254, 257	mpbid 232	. . . . . . . . . 10 ⊢ (𝜑 → (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1→(𝐸 “ ((0...𝐵) × (0...𝐵))))
259		df-ima 5644	. . . . . . . . . . . 12 ⊢ (𝐸 “ ((0...𝐵) × (0...𝐵))) = ran (𝐸 ↾ ((0...𝐵) × (0...𝐵)))
260	259	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) = ran (𝐸 ↾ ((0...𝐵) × (0...𝐵))))
261	250	rneqd 5891	. . . . . . . . . . 11 ⊢ (𝜑 → ran (𝐸 ↾ ((0...𝐵) × (0...𝐵))) = ran (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)))
262	260, 261	eqtr2d 2765	. . . . . . . . . 10 ⊢ (𝜑 → ran (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) = (𝐸 “ ((0...𝐵) × (0...𝐵))))
263	258, 262	jca 511	. . . . . . . . 9 ⊢ (𝜑 → ((𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1→(𝐸 “ ((0...𝐵) × (0...𝐵))) ∧ ran (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) = (𝐸 “ ((0...𝐵) × (0...𝐵)))))
264		dff1o5 6791	. . . . . . . . 9 ⊢ ((𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))) ↔ ((𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1→(𝐸 “ ((0...𝐵) × (0...𝐵))) ∧ ran (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) = (𝐸 “ ((0...𝐵) × (0...𝐵)))))
265	263, 264	sylibr 234	. . . . . . . 8 ⊢ (𝜑 → (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))))
266		f1oeq1 6770	. . . . . . . 8 ⊢ (𝑢 = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) → (𝑢:((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))) ↔ (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵)))))
267	243, 265, 266	spcedv 3561	. . . . . . 7 ⊢ (𝜑 → ∃𝑢 𝑢:((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))))
268		hasheqf1oi 14292	. . . . . . . 8 ⊢ (((0...𝐵) × (0...𝐵)) ∈ V → (∃𝑢 𝑢:((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))) → (♯‘((0...𝐵) × (0...𝐵))) = (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵))))))
269	242, 268	syl 17	. . . . . . 7 ⊢ (𝜑 → (∃𝑢 𝑢:((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))) → (♯‘((0...𝐵) × (0...𝐵))) = (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵))))))
270	267, 269	mpd 15	. . . . . 6 ⊢ (𝜑 → (♯‘((0...𝐵) × (0...𝐵))) = (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵)))))
271	238, 270	breqtrd 5128	. . . . 5 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵)))))
272	125	fveq2d 6844	. . . . 5 ⊢ (𝜑 → (♯‘𝐶) = (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵)))))
273	271, 272	breqtrrd 5130	. . . 4 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘𝐶))
274		zringbas 21339	. . . . . . . . . 10 ⊢ ℤ = (Base‘ℤring)
275		eqid 2729	. . . . . . . . . 10 ⊢ (Base‘(ℤ/nℤ‘𝑅)) = (Base‘(ℤ/nℤ‘𝑅))
276	274, 275	rhmf 20370	. . . . . . . . 9 ⊢ (𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)) → 𝐿:ℤ⟶(Base‘(ℤ/nℤ‘𝑅)))
277	198, 276	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐿:ℤ⟶(Base‘(ℤ/nℤ‘𝑅)))
278	277	ffnd 6671	. . . . . . 7 ⊢ (𝜑 → 𝐿 Fn ℤ)
279	278	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → 𝐿 Fn ℤ)
280		resss 5961	. . . . . . . . . . . 12 ⊢ (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸
281	280	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸)
282		rnss 5892	. . . . . . . . . . 11 ⊢ ((𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸 → ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
283	281, 282	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
284		df-ima 5644	. . . . . . . . . . . 12 ⊢ (𝐸 “ (ℕ0 × ℕ0)) = ran (𝐸 ↾ (ℕ0 × ℕ0))
285	284	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) = ran (𝐸 ↾ (ℕ0 × ℕ0)))
286	285	sseq1d 3975	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐸 “ (ℕ0 × ℕ0)) ⊆ ran 𝐸 ↔ ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸))
287	283, 286	mpbird 257	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
288		frn 6677	. . . . . . . . . 10 ⊢ (𝐸:(ℕ0 × ℕ0)⟶ℕ → ran 𝐸 ⊆ ℕ)
289	119, 288	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ran 𝐸 ⊆ ℕ)
290	287, 289	sstrd 3954	. . . . . . . 8 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℕ)
291		nnssz 12527	. . . . . . . . 9 ⊢ ℕ ⊆ ℤ
292	291	a1i 11	. . . . . . . 8 ⊢ (𝜑 → ℕ ⊆ ℤ)
293	290, 292	sstrd 3954	. . . . . . 7 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ)
294	293	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ)
295	125	sseq1d 3975	. . . . . . . . 9 ⊢ (𝜑 → (𝐶 ⊆ (𝐸 “ (ℕ0 × ℕ0)) ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ (𝐸 “ (ℕ0 × ℕ0))))
296	111, 295	mpbird 257	. . . . . . . 8 ⊢ (𝜑 → 𝐶 ⊆ (𝐸 “ (ℕ0 × ℕ0)))
297	296	sseld 3942	. . . . . . 7 ⊢ (𝜑 → (𝑡 ∈ 𝐶 → 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0))))
298	297	imp 406	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0)))
299		fnfvima 7189	. . . . . 6 ⊢ ((𝐿 Fn ℤ ∧ (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ ∧ 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0))) → (𝐿‘𝑡) ∈ (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
300	279, 294, 298, 299	syl3anc 1373	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → (𝐿‘𝑡) ∈ (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
301		eqid 2729	. . . . 5 ⊢ (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))
302	300, 301	fmptd 7068	. . . 4 ⊢ (𝜑 → (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)):𝐶⟶(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
303		nnssre 12166	. . . . . 6 ⊢ ℕ ⊆ ℝ
304	303	a1i 11	. . . . 5 ⊢ (𝜑 → ℕ ⊆ ℝ)
305	127, 304	sstrd 3954	. . . 4 ⊢ (𝜑 → 𝐶 ⊆ ℝ)
306	192, 202, 273, 302, 305	hashnexinjle 42090	. . 3 ⊢ (𝜑 → ∃𝑏 ∈ 𝐶 ∃𝑐 ∈ 𝐶 (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐))
307	185, 306	reximddv2 3194	. 2 ⊢ (𝜑 → ∃𝑏 ∈ 𝐶 ∃𝑐 ∈ 𝐶 (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))))
308	50, 307	r19.29vva 3195	1 ⊢ (𝜑 → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1540  ∃wex 1779   ∈ wcel 2109   ≠ wne 2925  ∀wral 3044  ∃wrex 3053  Vcvv 3444   ⊆ wss 3911  ∅c0 4292   class class class wbr 5102  {copab 5164   ↦ cmpt 5183   × cxp 5629  ran crn 5632   ↾ cres 5633   “ cima 5634  Fun wfun 6493   Fn wfn 6494  ⟶wf 6495  –1-1→wf1 6496  –1-1-onto→wf1o 6498  ‘cfv 6499  (class class class)co 7369   ∈ cmpo 7371   ↑_m cmap 8776  Fincfn 8895  ℂcc 11042  ℝcr 11043  0cc0 11044  1c1 11045   + caddc 11047   · cmul 11049   < clt 11184   ≤ cle 11185   − cmin 11381   / cdiv 11811  ℕcn 12162  ℕ₀cn0 12418  ℤcz 12505  ℤ_≥cuz 12769  ℝ⁺crp 12927  ...cfz 13444  ⌊cfl 13728  ↑cexp 14002  ♯chash 14271  √csqrt 15175   ∥ cdvds 16198   gcd cgcd 16440  ℙcprime 16617  Basecbs 17155  +_gcplusg 17196   Σ_g cgsu 17379  -_gcsg 18843  ._gcmg 18975  mulGrpcmgp 20025  Ringcrg 20118  CRingccrg 20119   RingHom crh 20354   RingIso crs 20355  Fieldcfield 20615  ℤ_ringczring 21332  ℤRHomczrh 21385  chrcchr 21387  ℤ/nℤczn 21388  algSccascl 21737  var₁cv1 22036  Poly₁cpl1 22037  eval₁ce1 22177   PrimRoots cprimroots 42052

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5229  ax-sep 5246  ax-nul 5256  ax-pow 5315  ax-pr 5382  ax-un 7691  ax-cnex 11100  ax-resscn 11101  ax-1cn 11102  ax-icn 11103  ax-addcl 11104  ax-addrcl 11105  ax-mulcl 11106  ax-mulrcl 11107  ax-mulcom 11108  ax-addass 11109  ax-mulass 11110  ax-distr 11111  ax-i2m1 11112  ax-1ne0 11113  ax-1rid 11114  ax-rnegex 11115  ax-rrecex 11116  ax-cnre 11117  ax-pre-lttri 11118  ax-pre-lttrn 11119  ax-pre-ltadd 11120  ax-pre-mulgt0 11121  ax-pre-sup 11122  ax-addf 11123  ax-mulf 11124

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3351  df-reu 3352  df-rab 3403  df-v 3446  df-sbc 3751  df-csb 3860  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3931  df-nul 4293  df-if 4485  df-pw 4561  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4868  df-int 4907  df-iun 4953  df-iin 4954  df-br 5103  df-opab 5165  df-mpt 5184  df-tr 5210  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-se 5585  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6262  df-ord 6323  df-on 6324  df-lim 6325  df-suc 6326  df-iota 6452  df-fun 6501  df-fn 6502  df-f 6503  df-f1 6504  df-fo 6505  df-f1o 6506  df-fv 6507  df-isom 6508  df-riota 7326  df-ov 7372  df-oprab 7373  df-mpo 7374  df-of 7633  df-ofr 7634  df-om 7823  df-1st 7947  df-2nd 7948  df-supp 8117  df-tpos 8182  df-frecs 8237  df-wrecs 8268  df-recs 8317  df-rdg 8355  df-1o 8411  df-2o 8412  df-oadd 8415  df-er 8648  df-ec 8650  df-qs 8654  df-map 8778  df-pm 8779  df-ixp 8848  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-fsupp 9289  df-sup 9369  df-inf 9370  df-oi 9439  df-dju 9830  df-card 9868  df-pnf 11186  df-mnf 11187  df-xr 11188  df-ltxr 11189  df-le 11190  df-sub 11383  df-neg 11384  df-div 11812  df-nn 12163  df-2 12225  df-3 12226  df-4 12227  df-5 12228  df-6 12229  df-7 12230  df-8 12231  df-9 12232  df-n0 12419  df-xnn0 12492  df-z 12506  df-dec 12626  df-uz 12770  df-q 12884  df-rp 12928  df-fz 13445  df-fzo 13592  df-fl 13730  df-mod 13808  df-seq 13943  df-exp 14003  df-fac 14215  df-bc 14244  df-hash 14272  df-cj 15041  df-re 15042  df-im 15043  df-sqrt 15177  df-abs 15178  df-dvds 16199  df-gcd 16441  df-prm 16618  df-phi 16712  df-pc 16784  df-struct 17093  df-sets 17110  df-slot 17128  df-ndx 17140  df-base 17156  df-ress 17177  df-plusg 17209  df-mulr 17210  df-starv 17211  df-sca 17212  df-vsca 17213  df-ip 17214  df-tset 17215  df-ple 17216  df-ds 17218  df-unif 17219  df-hom 17220  df-cco 17221  df-0g 17380  df-gsum 17381  df-prds 17386  df-pws 17388  df-imas 17447  df-qus 17448  df-mre 17523  df-mrc 17524  df-acs 17526  df-mgm 18543  df-sgrp 18622  df-mnd 18638  df-mhm 18686  df-submnd 18687  df-grp 18844  df-minusg 18845  df-sbg 18846  df-mulg 18976  df-subg 19031  df-nsg 19032  df-eqg 19033  df-ghm 19121  df-cntz 19225  df-od 19434  df-cmn 19688  df-abl 19689  df-mgp 20026  df-rng 20038  df-ur 20067  df-srg 20072  df-ring 20120  df-cring 20121  df-oppr 20222  df-dvdsr 20242  df-unit 20243  df-invr 20273  df-dvr 20286  df-rhm 20357  df-rim 20358  df-nzr 20398  df-subrng 20431  df-subrg 20455  df-rlreg 20579  df-domn 20580  df-idom 20581  df-drng 20616  df-field 20617  df-lmod 20744  df-lss 20814  df-lsp 20854  df-sra 21056  df-rgmod 21057  df-lidl 21094  df-rsp 21095  df-2idl 21136  df-cnfld 21241  df-zring 21333  df-zrh 21389  df-chr 21391  df-zn 21392  df-assa 21738  df-asp 21739  df-ascl 21740  df-psr 21794  df-mvr 21795  df-mpl 21796  df-opsr 21798  df-evls 21957  df-evl 21958  df-psr1 22040  df-vr1 22041  df-ply1 22042  df-coe1 22043  df-evl1 22179  df-mdeg 25936  df-deg1 25937  df-mon1 26012  df-uc1p 26013  df-q1p 26014  df-r1p 26015  df-primroots 42053

This theorem is referenced by:  aks6d1c7lem2  42142