Theorem aks6d1c2 42384

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 12416	. . . . . . . . 9 ⊢ 0 ∈ ℕ0
21	20	a1i 11	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) ∧ 𝑗 ∈ (0...𝐴)) → 0 ∈ ℕ0)
22		eqid 2736	. . . . . . . 8 ⊢ (𝑗 ∈ (0...𝐴) ↦ 0) = (𝑗 ∈ (0...𝐴) ↦ 0)
23	21, 22	fmptd 7059	. . . . . . 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 2736	. . . . . . 7 ⊢ (.g‘(mulGrp‘(Poly1‘𝐾))) = (.g‘(mulGrp‘(Poly1‘𝐾)))
42		eqid 2736	. . . . . . 7 ⊢ (var1‘𝐾) = (var1‘𝐾)
43		eqid 2736	. . . . . . 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 42381	. . . . . 6 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))
47	46	ex 412	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) → (𝑐 = (𝑏 + (𝑑 · 𝑅)) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵)))
48	47	rexlimdva 3137	. . . 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 2898	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑠(𝐿‘𝑡)
53		nfcv 2898	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑡(𝐿‘𝑠)
54		fveq2 6834	. . . . . . . . . . . . 13 ⊢ (𝑡 = 𝑠 → (𝐿‘𝑡) = (𝐿‘𝑠))
55	52, 53, 54	cbvmpt 5200	. . . . . . . . . . . 12 ⊢ (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑠 ∈ 𝐶 ↦ (𝐿‘𝑠))
56	55	a1i 11	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑠 ∈ 𝐶 ↦ (𝐿‘𝑠)))
57		simpr 484	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑏) → 𝑠 = 𝑏)
58	57	fveq2d 6838	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑏) → (𝐿‘𝑠) = (𝐿‘𝑏))
59		simpllr 775	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑏 ∈ 𝐶)
60		fvexd 6849	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) ∈ V)
61	56, 58, 59, 60	fvmptd 6948	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = (𝐿‘𝑏))
62	61	eqcomd 2742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏))
63		simprl 770	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐))
64		simpr 484	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑐) → 𝑠 = 𝑐)
65	64	fveq2d 6838	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑐) → (𝐿‘𝑠) = (𝐿‘𝑐))
66		simplr 768	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑐 ∈ 𝐶)
67		fvexd 6849	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑐) ∈ V)
68	56, 65, 66, 67	fvmptd 6948	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) = (𝐿‘𝑐))
69	63, 68	eqtrd 2771	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = (𝐿‘𝑐))
70	62, 69	eqtrd 2771	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) = (𝐿‘𝑐))
71	70	eqcomd 2742	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑐) = (𝐿‘𝑏))
72	12	nnnn0d 12462	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 ∈ ℕ0)
73	72	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝑅 ∈ ℕ0)
74	73	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑅 ∈ ℕ0)
75	74	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℕ0)
76		fz0ssnn0 13538	. . . . . . . . . . . . . . . . . 18 ⊢ (0...𝐵) ⊆ ℕ0
77	76	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (0...𝐵) ⊆ ℕ0)
78	77, 77	jca 511	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((0...𝐵) ⊆ ℕ0 ∧ (0...𝐵) ⊆ ℕ0))
79		eqid 2736	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (ℤ/nℤ‘𝑅) = (ℤ/nℤ‘𝑅)
80	14, 10, 16, 12, 18, 27, 28, 79	hashscontpowcl 42374	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
81	80	nn0red 12463	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ)
82	80	nn0ge0d 12465	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
83	81, 82	resqrtcld 15341	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ)
84	83	flcld 13718	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ)
85	81, 82	sqrtge0d 15344	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → 0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
86		0zd 12500	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → 0 ∈ ℤ)
87		flge 13725	. . . . . . . . . . . . . . . . . . . . . . . . . . 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 12501	. . . . . . . . . . . . . . . . . . . . . . . 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 2821	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (𝐵 ∈ ℕ0 ↔ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℕ0))
95	92, 94	mpbird 257	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝐵 ∈ ℕ0)
96	95	nn0ge0d 12465	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 0 ≤ 𝐵)
97	95	nn0zd 12513	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝐵 ∈ ℤ)
98		eluz 12765	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((0 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐵 ∈ (ℤ≥‘0) ↔ 0 ≤ 𝐵))
99	86, 97, 98	syl2anc 584	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝐵 ∈ (ℤ≥‘0) ↔ 0 ≤ 𝐵))
100	96, 99	mpbird 257	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝐵 ∈ (ℤ≥‘0))
101		fzn0 13454	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((0...𝐵) ≠ ∅ ↔ 𝐵 ∈ (ℤ≥‘0))
102	100, 101	sylibr 234	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (0...𝐵) ≠ ∅)
103	102, 102	jca 511	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅))
104		xpnz 6117	. . . . . . . . . . . . . . . . . . 19 ⊢ (((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅) ↔ ((0...𝐵) × (0...𝐵)) ≠ ∅)
105	104	biimpi 216	. . . . . . . . . . . . . . . . . 18 ⊢ (((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅) → ((0...𝐵) × (0...𝐵)) ≠ ∅)
106	103, 105	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ≠ ∅)
107		ssxpb 6132	. . . . . . . . . . . . . . . . 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 6061	. . . . . . . . . . . . . . 15 ⊢ (((0...𝐵) × (0...𝐵)) ⊆ (ℕ0 × ℕ0) → (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ (𝐸 “ (ℕ0 × ℕ0)))
111	109, 110	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ (𝐸 “ (ℕ0 × ℕ0)))
112		nfv 1915	. . . . . . . . . . . . . . 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 42373	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐸:(ℕ0 × ℕ0)–1-1→ℕ)
118		f1f 6730	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐸:(ℕ0 × ℕ0)–1-1→ℕ → 𝐸:(ℕ0 × ℕ0)⟶ℕ)
119	117, 118	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐸:(ℕ0 × ℕ0)⟶ℕ)
120	119	ffnd 6663	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐸 Fn (ℕ0 × ℕ0))
121	120	fnfund 6593	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → Fun 𝐸)
122	119	ffvelcdmda 7029	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑜 ∈ (ℕ0 × ℕ0)) → (𝐸‘𝑜) ∈ ℕ)
123	112, 121, 122	funimassd 6900	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℕ)
124	111, 123	sstrd 3944	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ ℕ)
125	37	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐶 = (𝐸 “ ((0...𝐵) × (0...𝐵))))
126	125	sseq1d 3965	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐶 ⊆ ℕ ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ ℕ))
127	124, 126	mpbird 257	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐶 ⊆ ℕ)
128	127	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝐶 ⊆ ℕ)
129		simpr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ 𝐶)
130	128, 129	sseldd 3934	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ ℕ)
131	130	nnzd 12514	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ ℤ)
132	131	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑐 ∈ ℤ)
133		simplr 768	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ 𝐶)
134	128, 133	sseldd 3934	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ ℕ)
135	134	nnzd 12514	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ ℤ)
136	135	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑏 ∈ ℤ)
137	79, 28	zndvds 21504	. . . . . . . 8 ⊢ ((𝑅 ∈ ℕ0 ∧ 𝑐 ∈ ℤ ∧ 𝑏 ∈ ℤ) → ((𝐿‘𝑐) = (𝐿‘𝑏) ↔ 𝑅 ∥ (𝑐 − 𝑏)))
138	75, 132, 136, 137	syl3anc 1373	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝐿‘𝑐) = (𝐿‘𝑏) ↔ 𝑅 ∥ (𝑐 − 𝑏)))
139	71, 138	mpbid 232	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∥ (𝑐 − 𝑏))
140	75	nn0zd 12513	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℤ)
141	132, 136	zsubcld 12601	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑐 − 𝑏) ∈ ℤ)
142		divides 16181	. . . . . . . 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 12160	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 ∈ ℝ)
149	134	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℕ)
150	149	nnred 12160	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℝ)
151	148, 150	resubcld 11565	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) ∈ ℝ)
152	12	nnrpd 12947	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ ℝ+)
153	152	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝑅 ∈ ℝ+)
154	153	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑅 ∈ ℝ+)
155	154	adantr 480	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℝ+)
156	155	adantr 480	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℝ+)
157	156	rpred 12949	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℝ)
158	51	adantr 480	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 < 𝑐)
159	150, 148	posdifd 11724	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑏 < 𝑐 ↔ 0 < (𝑐 − 𝑏)))
160	158, 159	mpbid 232	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < (𝑐 − 𝑏))
161	156	rpgt0d 12952	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < 𝑅)
162	151, 157, 160, 161	divgt0d 12077	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < ((𝑐 − 𝑏) / 𝑅))
163	157	recnd 11160	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℂ)
164	146	zred 12596	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℝ)
165	164	recnd 11160	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℂ)
166	163, 165	mulcomd 11153	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑅 · 𝑑) = (𝑑 · 𝑅))
167		simprr 772	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 · 𝑅) = (𝑐 − 𝑏))
168	166, 167	eqtrd 2771	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑅 · 𝑑) = (𝑐 − 𝑏))
169	151	recnd 11160	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) ∈ ℂ)
170	161	gt0ne0d 11701	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ≠ 0)
171	169, 163, 165, 170	divmuld 11939	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (((𝑐 − 𝑏) / 𝑅) = 𝑑 ↔ (𝑅 · 𝑑) = (𝑐 − 𝑏)))
172	168, 171	mpbird 257	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → ((𝑐 − 𝑏) / 𝑅) = 𝑑)
173	162, 172	breqtrd 5124	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < 𝑑)
174	146, 173	jca 511	. . . . . 6 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 ∈ ℤ ∧ 0 < 𝑑))
175		elnnz 12498	. . . . . 6 ⊢ (𝑑 ∈ ℕ ↔ (𝑑 ∈ ℤ ∧ 0 < 𝑑))
176	174, 175	sylibr 234	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℕ)
177	167	eqcomd 2742	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) = (𝑑 · 𝑅))
178	148	recnd 11160	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 ∈ ℂ)
179	150	recnd 11160	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℂ)
180	167, 169	eqeltrd 2836	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 · 𝑅) ∈ ℂ)
181	178, 179, 180	subaddd 11510	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → ((𝑐 − 𝑏) = (𝑑 · 𝑅) ↔ (𝑏 + (𝑑 · 𝑅)) = 𝑐))
182	177, 181	mpbid 232	. . . . . 6 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑏 + (𝑑 · 𝑅)) = 𝑐)
183	182	eqcomd 2742	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 = (𝑏 + (𝑑 · 𝑅)))
184	145, 176, 183	reximssdv 3154	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))
185	51, 184	jca 511	. . 3 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))))
186		fzfid 13896	. . . . . . 7 ⊢ (𝜑 → (0...𝐵) ∈ Fin)
187		xpfi 9220	. . . . . . 7 ⊢ (((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin) → ((0...𝐵) × (0...𝐵)) ∈ Fin)
188	186, 186, 187	syl2anc 584	. . . . . 6 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ∈ Fin)
189		imafi 9215	. . . . . 6 ⊢ ((Fun 𝐸 ∧ ((0...𝐵) × (0...𝐵)) ∈ Fin) → (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin)
190	121, 188, 189	syl2anc 584	. . . . 5 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin)
191	125	eleq1d 2821	. . . . 5 ⊢ (𝜑 → (𝐶 ∈ Fin ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin))
192	190, 191	mpbird 257	. . . 4 ⊢ (𝜑 → 𝐶 ∈ Fin)
193	79	zncrng 21499	. . . . . . . . . 10 ⊢ (𝑅 ∈ ℕ0 → (ℤ/nℤ‘𝑅) ∈ CRing)
194	72, 193	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (ℤ/nℤ‘𝑅) ∈ CRing)
195		crngring 20180	. . . . . . . . 9 ⊢ ((ℤ/nℤ‘𝑅) ∈ CRing → (ℤ/nℤ‘𝑅) ∈ Ring)
196	194, 195	syl 17	. . . . . . . 8 ⊢ (𝜑 → (ℤ/nℤ‘𝑅) ∈ Ring)
197	28	zrhrhm 21466	. . . . . . . 8 ⊢ ((ℤ/nℤ‘𝑅) ∈ Ring → 𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)))
198	196, 197	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)))
199	198	imaexd 7858	. . . . . 6 ⊢ (𝜑 → (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ V)
200		hashclb 14281	. . . . . 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 14279	. . . . . . . . . . . . 13 ⊢ ((𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ Fin → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
204	202, 203	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
205	204	nn0red 12463	. . . . . . . . . . 11 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ)
206	204	nn0ge0d 12465	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
207		sqrtmsq 15193	. . . . . . . . . . 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 2742	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) = (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
210	205, 206	jca 511	. . . . . . . . . . 11 ⊢ (𝜑 → ((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
211		sqrtmul 15182	. . . . . . . . . . 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 15341	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ)
214	213	flcld 13718	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ)
215	205, 206	sqrtge0d 15344	. . . . . . . . . . . . . . . . 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 12463	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐵 ∈ ℝ)
222		1red 11133	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℝ)
223	221, 222	readdcld 11161	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 + 1) ∈ ℝ)
224		flltp1 13720	. . . . . . . . . . . . 13 ⊢ ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
225	213, 224	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
226	93	oveq1d 7373	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 + 1) = ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
227	225, 226	breqtrrd 5126	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < (𝐵 + 1))
228	213, 223, 213, 223, 215, 227, 215, 227	ltmul12ad 12083	. . . . . . . . . 10 ⊢ (𝜑 → ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) · (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) < ((𝐵 + 1) · (𝐵 + 1)))
229	212, 228	eqbrtrd 5120	. . . . . . . . 9 ⊢ (𝜑 → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) < ((𝐵 + 1) · (𝐵 + 1)))
230	209, 229	eqbrtrd 5120	. . . . . . . 8 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < ((𝐵 + 1) · (𝐵 + 1)))
231		hashfz0 14355	. . . . . . . . . 10 ⊢ (𝐵 ∈ ℕ0 → (♯‘(0...𝐵)) = (𝐵 + 1))
232	220, 231	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(0...𝐵)) = (𝐵 + 1))
233	232, 232	oveq12d 7376	. . . . . . . 8 ⊢ (𝜑 → ((♯‘(0...𝐵)) · (♯‘(0...𝐵))) = ((𝐵 + 1) · (𝐵 + 1)))
234	230, 233	breqtrrd 5126	. . . . . . 7 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
235	186, 186	jca 511	. . . . . . . 8 ⊢ (𝜑 → ((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin))
236		hashxp 14357	. . . . . . . 8 ⊢ (((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin) → (♯‘((0...𝐵) × (0...𝐵))) = ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
237	235, 236	syl 17	. . . . . . 7 ⊢ (𝜑 → (♯‘((0...𝐵) × (0...𝐵))) = ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
238	234, 237	breqtrrd 5126	. . . . . 6 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘((0...𝐵) × (0...𝐵))))
239		ovexd 7393	. . . . . . . . . . 11 ⊢ (𝜑 → (0...𝐵) ∈ V)
240	239, 239	jca 511	. . . . . . . . . 10 ⊢ (𝜑 → ((0...𝐵) ∈ V ∧ (0...𝐵) ∈ V))
241		xpexg 7695	. . . . . . . . . 10 ⊢ (((0...𝐵) ∈ V ∧ (0...𝐵) ∈ V) → ((0...𝐵) × (0...𝐵)) ∈ V)
242	240, 241	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ∈ V)
243	242	mptexd 7170	. . . . . . . 8 ⊢ (𝜑 → (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) ∈ V)
244	120	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝐸 Fn (ℕ0 × ℕ0))
245	109	sselda 3933	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝑤 ∈ (ℕ0 × ℕ0))
246		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝑤 ∈ ((0...𝐵) × (0...𝐵)))
247	244, 245, 246	fnfvimad 7180	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → (𝐸‘𝑤) ∈ (𝐸 “ ((0...𝐵) × (0...𝐵))))
248		eqid 2736	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤))
249	247, 248	fmptd 7059	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))⟶(𝐸 “ ((0...𝐵) × (0...𝐵))))
250	119, 109	feqresmpt 6903	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸 ↾ ((0...𝐵) × (0...𝐵))) = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)))
251	250	feq1d 6644	. . . . . . . . . . . . 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 6738	. . . . . . . . . . . 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 2737	. . . . . . . . . . . 12 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) = ((0...𝐵) × (0...𝐵)))
256		eqidd 2737	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) = (𝐸 “ ((0...𝐵) × (0...𝐵))))
257	250, 255, 256	f1eq123d 6766	. . . . . . . . . . 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 5637	. . . . . . . . . . . 12 ⊢ (𝐸 “ ((0...𝐵) × (0...𝐵))) = ran (𝐸 ↾ ((0...𝐵) × (0...𝐵)))
260	259	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) = ran (𝐸 ↾ ((0...𝐵) × (0...𝐵))))
261	250	rneqd 5887	. . . . . . . . . . 11 ⊢ (𝜑 → ran (𝐸 ↾ ((0...𝐵) × (0...𝐵))) = ran (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)))
262	260, 261	eqtr2d 2772	. . . . . . . . . 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 6783	. . . . . . . . 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 6762	. . . . . . . 8 ⊢ (𝑢 = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) → (𝑢:((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))) ↔ (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵)))))
267	243, 265, 266	spcedv 3552	. . . . . . 7 ⊢ (𝜑 → ∃𝑢 𝑢:((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))))
268		hasheqf1oi 14274	. . . . . . . 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 5124	. . . . 5 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵)))))
272	125	fveq2d 6838	. . . . 5 ⊢ (𝜑 → (♯‘𝐶) = (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵)))))
273	271, 272	breqtrrd 5126	. . . 4 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘𝐶))
274		zringbas 21408	. . . . . . . . . 10 ⊢ ℤ = (Base‘ℤring)
275		eqid 2736	. . . . . . . . . 10 ⊢ (Base‘(ℤ/nℤ‘𝑅)) = (Base‘(ℤ/nℤ‘𝑅))
276	274, 275	rhmf 20420	. . . . . . . . 9 ⊢ (𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)) → 𝐿:ℤ⟶(Base‘(ℤ/nℤ‘𝑅)))
277	198, 276	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐿:ℤ⟶(Base‘(ℤ/nℤ‘𝑅)))
278	277	ffnd 6663	. . . . . . 7 ⊢ (𝜑 → 𝐿 Fn ℤ)
279	278	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → 𝐿 Fn ℤ)
280		resss 5960	. . . . . . . . . . . 12 ⊢ (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸
281	280	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸)
282		rnss 5888	. . . . . . . . . . 11 ⊢ ((𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸 → ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
283	281, 282	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
284		df-ima 5637	. . . . . . . . . . . 12 ⊢ (𝐸 “ (ℕ0 × ℕ0)) = ran (𝐸 ↾ (ℕ0 × ℕ0))
285	284	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) = ran (𝐸 ↾ (ℕ0 × ℕ0)))
286	285	sseq1d 3965	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐸 “ (ℕ0 × ℕ0)) ⊆ ran 𝐸 ↔ ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸))
287	283, 286	mpbird 257	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
288		frn 6669	. . . . . . . . . 10 ⊢ (𝐸:(ℕ0 × ℕ0)⟶ℕ → ran 𝐸 ⊆ ℕ)
289	119, 288	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ran 𝐸 ⊆ ℕ)
290	287, 289	sstrd 3944	. . . . . . . 8 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℕ)
291		nnssz 12510	. . . . . . . . 9 ⊢ ℕ ⊆ ℤ
292	291	a1i 11	. . . . . . . 8 ⊢ (𝜑 → ℕ ⊆ ℤ)
293	290, 292	sstrd 3944	. . . . . . 7 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ)
294	293	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ)
295	125	sseq1d 3965	. . . . . . . . 9 ⊢ (𝜑 → (𝐶 ⊆ (𝐸 “ (ℕ0 × ℕ0)) ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ (𝐸 “ (ℕ0 × ℕ0))))
296	111, 295	mpbird 257	. . . . . . . 8 ⊢ (𝜑 → 𝐶 ⊆ (𝐸 “ (ℕ0 × ℕ0)))
297	296	sseld 3932	. . . . . . 7 ⊢ (𝜑 → (𝑡 ∈ 𝐶 → 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0))))
298	297	imp 406	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0)))
299		fnfvima 7179	. . . . . 6 ⊢ ((𝐿 Fn ℤ ∧ (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ ∧ 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0))) → (𝐿‘𝑡) ∈ (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
300	279, 294, 298, 299	syl3anc 1373	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → (𝐿‘𝑡) ∈ (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
301		eqid 2736	. . . . 5 ⊢ (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))
302	300, 301	fmptd 7059	. . . 4 ⊢ (𝜑 → (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)):𝐶⟶(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
303		nnssre 12149	. . . . . 6 ⊢ ℕ ⊆ ℝ
304	303	a1i 11	. . . . 5 ⊢ (𝜑 → ℕ ⊆ ℝ)
305	127, 304	sstrd 3944	. . . 4 ⊢ (𝜑 → 𝐶 ⊆ ℝ)
306	192, 202, 273, 302, 305	hashnexinjle 42383	. . 3 ⊢ (𝜑 → ∃𝑏 ∈ 𝐶 ∃𝑐 ∈ 𝐶 (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐))
307	185, 306	reximddv2 3195	. 2 ⊢ (𝜑 → ∃𝑏 ∈ 𝐶 ∃𝑐 ∈ 𝐶 (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))))
308	50, 307	r19.29vva 3196	1 ⊢ (𝜑 → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1541  ∃wex 1780   ∈ wcel 2113   ≠ wne 2932  ∀wral 3051  ∃wrex 3060  Vcvv 3440   ⊆ wss 3901  ∅c0 4285   class class class wbr 5098  {copab 5160   ↦ cmpt 5179   × cxp 5622  ran crn 5625   ↾ cres 5626   “ cima 5627  Fun wfun 6486   Fn wfn 6487  ⟶wf 6488  –1-1→wf1 6489  –1-1-onto→wf1o 6491  ‘cfv 6492  (class class class)co 7358   ∈ cmpo 7360   ↑_m cmap 8763  Fincfn 8883  ℂcc 11024  ℝcr 11025  0cc0 11026  1c1 11027   + caddc 11029   · cmul 11031   < clt 11166   ≤ cle 11167   − cmin 11364   / cdiv 11794  ℕcn 12145  ℕ₀cn0 12401  ℤcz 12488  ℤ_≥cuz 12751  ℝ⁺crp 12905  ...cfz 13423  ⌊cfl 13710  ↑cexp 13984  ♯chash 14253  √csqrt 15156   ∥ cdvds 16179   gcd cgcd 16421  ℙcprime 16598  Basecbs 17136  +_gcplusg 17177   Σ_g cgsu 17360  -_gcsg 18865  ._gcmg 18997  mulGrpcmgp 20075  Ringcrg 20168  CRingccrg 20169   RingHom crh 20405   RingIso crs 20406  Fieldcfield 20663  ℤ_ringczring 21401  ℤRHomczrh 21454  chrcchr 21456  ℤ/nℤczn 21457  algSccascl 21807  var₁cv1 22116  Poly₁cpl1 22117  eval₁ce1 22258   PrimRoots cprimroots 42345

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-rep 5224  ax-sep 5241  ax-nul 5251  ax-pow 5310  ax-pr 5377  ax-un 7680  ax-cnex 11082  ax-resscn 11083  ax-1cn 11084  ax-icn 11085  ax-addcl 11086  ax-addrcl 11087  ax-mulcl 11088  ax-mulrcl 11089  ax-mulcom 11090  ax-addass 11091  ax-mulass 11092  ax-distr 11093  ax-i2m1 11094  ax-1ne0 11095  ax-1rid 11096  ax-rnegex 11097  ax-rrecex 11098  ax-cnre 11099  ax-pre-lttri 11100  ax-pre-lttrn 11101  ax-pre-ltadd 11102  ax-pre-mulgt0 11103  ax-pre-sup 11104  ax-addf 11105  ax-mulf 11106

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3350  df-reu 3351  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-tp 4585  df-op 4587  df-uni 4864  df-int 4903  df-iun 4948  df-iin 4949  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-of 7622  df-ofr 7623  df-om 7809  df-1st 7933  df-2nd 7934  df-supp 8103  df-tpos 8168  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-2o 8398  df-oadd 8401  df-er 8635  df-ec 8637  df-qs 8641  df-map 8765  df-pm 8766  df-ixp 8836  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9265  df-sup 9345  df-inf 9346  df-oi 9415  df-dju 9813  df-card 9851  df-pnf 11168  df-mnf 11169  df-xr 11170  df-ltxr 11171  df-le 11172  df-sub 11366  df-neg 11367  df-div 11795  df-nn 12146  df-2 12208  df-3 12209  df-4 12210  df-5 12211  df-6 12212  df-7 12213  df-8 12214  df-9 12215  df-n0 12402  df-xnn0 12475  df-z 12489  df-dec 12608  df-uz 12752  df-q 12862  df-rp 12906  df-fz 13424  df-fzo 13571  df-fl 13712  df-mod 13790  df-seq 13925  df-exp 13985  df-fac 14197  df-bc 14226  df-hash 14254  df-cj 15022  df-re 15023  df-im 15024  df-sqrt 15158  df-abs 15159  df-dvds 16180  df-gcd 16422  df-prm 16599  df-phi 16693  df-pc 16765  df-struct 17074  df-sets 17091  df-slot 17109  df-ndx 17121  df-base 17137  df-ress 17158  df-plusg 17190  df-mulr 17191  df-starv 17192  df-sca 17193  df-vsca 17194  df-ip 17195  df-tset 17196  df-ple 17197  df-ds 17199  df-unif 17200  df-hom 17201  df-cco 17202  df-0g 17361  df-gsum 17362  df-prds 17367  df-pws 17369  df-imas 17429  df-qus 17430  df-mre 17505  df-mrc 17506  df-acs 17508  df-mgm 18565  df-sgrp 18644  df-mnd 18660  df-mhm 18708  df-submnd 18709  df-grp 18866  df-minusg 18867  df-sbg 18868  df-mulg 18998  df-subg 19053  df-nsg 19054  df-eqg 19055  df-ghm 19142  df-cntz 19246  df-od 19457  df-cmn 19711  df-abl 19712  df-mgp 20076  df-rng 20088  df-ur 20117  df-srg 20122  df-ring 20170  df-cring 20171  df-oppr 20273  df-dvdsr 20293  df-unit 20294  df-invr 20324  df-dvr 20337  df-rhm 20408  df-rim 20409  df-nzr 20446  df-subrng 20479  df-subrg 20503  df-rlreg 20627  df-domn 20628  df-idom 20629  df-drng 20664  df-field 20665  df-lmod 20813  df-lss 20883  df-lsp 20923  df-sra 21125  df-rgmod 21126  df-lidl 21163  df-rsp 21164  df-2idl 21205  df-cnfld 21310  df-zring 21402  df-zrh 21458  df-chr 21460  df-zn 21461  df-assa 21808  df-asp 21809  df-ascl 21810  df-psr 21865  df-mvr 21866  df-mpl 21867  df-opsr 21869  df-evls 22029  df-evl 22030  df-psr1 22120  df-vr1 22121  df-ply1 22122  df-coe1 22123  df-evl1 22260  df-mdeg 26016  df-deg1 26017  df-mon1 26092  df-uc1p 26093  df-q1p 26094  df-r1p 26095  df-primroots 42346

This theorem is referenced by:  aks6d1c7lem2  42435