Theorem aks6d1c2 42586

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 771	. . . . 5 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → 𝑏 < 𝑐)
3	1, 2	jca 511	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐))
4		simprr 773	. . . 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 735	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝐾 ∈ Field)
10		aks6d1c2a.4	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∈ ℙ)
11	10	ad5antr 735	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑃 ∈ ℙ)
12		aks6d1c2a.5	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ ℕ)
13	12	ad5antr 735	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑅 ∈ ℕ)
14		aks6d1c2a.6	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
15	14	ad5antr 735	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑁 ∈ ℕ)
16		aks6d1c2a.7	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∥ 𝑁)
17	16	ad5antr 735	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑃 ∥ 𝑁)
18		aks6d1c2a.8	. . . . . . . 8 ⊢ (𝜑 → (𝑁 gcd 𝑅) = 1)
19	18	ad5antr 735	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (𝑁 gcd 𝑅) = 1)
20		0nn0 12446	. . . . . . . . 9 ⊢ 0 ∈ ℕ0
21	20	a1i 11	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) ∧ 𝑗 ∈ (0...𝐴)) → 0 ∈ ℕ0)
22		eqid 2737	. . . . . . . 8 ⊢ (𝑗 ∈ (0...𝐴) ↦ 0) = (𝑗 ∈ (0...𝐴) ↦ 0)
23	21, 22	fmptd 7061	. . . . . . 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 735	. . . . . . 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 735	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → ∀𝑎 ∈ (1...𝐴)𝑁 ∼ ((var1‘𝐾)(+g‘(Poly1‘𝐾))((algSc‘(Poly1‘𝐾))‘((ℤRHom‘𝐾)‘𝑎))))
31		aks6d1c2a.15	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ (Base‘𝐾) ↦ (𝑃(.g‘(mulGrp‘𝐾))𝑥)) ∈ (𝐾 RingIso 𝐾))
32	31	ad5antr 735	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (𝑥 ∈ (Base‘𝐾) ↦ (𝑃(.g‘(mulGrp‘𝐾))𝑥)) ∈ (𝐾 RingIso 𝐾))
33		aks6d1c2a.16	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅))
34	33	ad5antr 735	. . . . . . 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 786	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑏 ∈ 𝐶)
39		simp-4r 784	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑐 ∈ 𝐶)
40		simpllr 776	. . . . . . 7 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → 𝑏 < 𝑐)
41		eqid 2737	. . . . . . 7 ⊢ (.g‘(mulGrp‘(Poly1‘𝐾))) = (.g‘(mulGrp‘(Poly1‘𝐾)))
42		eqid 2737	. . . . . . 7 ⊢ (var1‘𝐾) = (var1‘𝐾)
43		eqid 2737	. . . . . . 7 ⊢ ((𝑐(.g‘(mulGrp‘(Poly1‘𝐾)))(var1‘𝐾))(-g‘(Poly1‘𝐾))(𝑏(.g‘(mulGrp‘(Poly1‘𝐾)))(var1‘𝐾))) = ((𝑐(.g‘(mulGrp‘(Poly1‘𝐾)))(var1‘𝐾))(-g‘(Poly1‘𝐾))(𝑏(.g‘(mulGrp‘(Poly1‘𝐾)))(var1‘𝐾)))
44		simplr 769	. . . . . . 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 42583	. . . . . 6 ⊢ ((((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) ∧ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))
47	46	ex 412	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ 𝑑 ∈ ℕ) → (𝑐 = (𝑏 + (𝑑 · 𝑅)) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵)))
48	47	rexlimdva 3139	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) → (∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵)))
49	48	imp 406	. . 3 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ 𝑏 < 𝑐) ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))
50	5, 49	syl 17	. 2 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))) → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))
51		simprr 773	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑏 < 𝑐)
52		nfcv 2899	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑠(𝐿‘𝑡)
53		nfcv 2899	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑡(𝐿‘𝑠)
54		fveq2 6835	. . . . . . . . . . . . 13 ⊢ (𝑡 = 𝑠 → (𝐿‘𝑡) = (𝐿‘𝑠))
55	52, 53, 54	cbvmpt 5188	. . . . . . . . . . . 12 ⊢ (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑠 ∈ 𝐶 ↦ (𝐿‘𝑠))
56	55	a1i 11	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑠 ∈ 𝐶 ↦ (𝐿‘𝑠)))
57		simpr 484	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑏) → 𝑠 = 𝑏)
58	57	fveq2d 6839	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑏) → (𝐿‘𝑠) = (𝐿‘𝑏))
59		simpllr 776	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑏 ∈ 𝐶)
60		fvexd 6850	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) ∈ V)
61	56, 58, 59, 60	fvmptd 6950	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = (𝐿‘𝑏))
62	61	eqcomd 2743	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏))
63		simprl 771	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐))
64		simpr 484	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑐) → 𝑠 = 𝑐)
65	64	fveq2d 6839	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ 𝑠 = 𝑐) → (𝐿‘𝑠) = (𝐿‘𝑐))
66		simplr 769	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑐 ∈ 𝐶)
67		fvexd 6850	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑐) ∈ V)
68	56, 65, 66, 67	fvmptd 6950	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) = (𝐿‘𝑐))
69	63, 68	eqtrd 2772	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = (𝐿‘𝑐))
70	62, 69	eqtrd 2772	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑏) = (𝐿‘𝑐))
71	70	eqcomd 2743	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝐿‘𝑐) = (𝐿‘𝑏))
72	12	nnnn0d 12492	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 ∈ ℕ0)
73	72	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝑅 ∈ ℕ0)
74	73	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑅 ∈ ℕ0)
75	74	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℕ0)
76		fz0ssnn0 13570	. . . . . . . . . . . . . . . . . 18 ⊢ (0...𝐵) ⊆ ℕ0
77	76	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (0...𝐵) ⊆ ℕ0)
78	77, 77	jca 511	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((0...𝐵) ⊆ ℕ0 ∧ (0...𝐵) ⊆ ℕ0))
79		eqid 2737	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (ℤ/nℤ‘𝑅) = (ℤ/nℤ‘𝑅)
80	14, 10, 16, 12, 18, 27, 28, 79	hashscontpowcl 42576	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
81	80	nn0red 12493	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ)
82	80	nn0ge0d 12495	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
83	81, 82	resqrtcld 15374	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ)
84	83	flcld 13751	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ)
85	81, 82	sqrtge0d 15377	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → 0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
86		0zd 12530	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝜑 → 0 ∈ ℤ)
87		flge 13758	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ ∧ 0 ∈ ℤ) → (0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ↔ 0 ≤ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))))
88	83, 86, 87	syl2anc 585	. . . . . . . . . . . . . . . . . . . . . . . . . 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 12531	. . . . . . . . . . . . . . . . . . . . . . . 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 2822	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (𝐵 ∈ ℕ0 ↔ (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℕ0))
95	92, 94	mpbird 257	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝐵 ∈ ℕ0)
96	95	nn0ge0d 12495	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 0 ≤ 𝐵)
97	95	nn0zd 12543	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝐵 ∈ ℤ)
98		eluz 12796	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((0 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐵 ∈ (ℤ≥‘0) ↔ 0 ≤ 𝐵))
99	86, 97, 98	syl2anc 585	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝐵 ∈ (ℤ≥‘0) ↔ 0 ≤ 𝐵))
100	96, 99	mpbird 257	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝐵 ∈ (ℤ≥‘0))
101		fzn0 13486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((0...𝐵) ≠ ∅ ↔ 𝐵 ∈ (ℤ≥‘0))
102	100, 101	sylibr 234	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (0...𝐵) ≠ ∅)
103	102, 102	jca 511	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅))
104		xpnz 6118	. . . . . . . . . . . . . . . . . . 19 ⊢ (((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅) ↔ ((0...𝐵) × (0...𝐵)) ≠ ∅)
105	104	biimpi 216	. . . . . . . . . . . . . . . . . 18 ⊢ (((0...𝐵) ≠ ∅ ∧ (0...𝐵) ≠ ∅) → ((0...𝐵) × (0...𝐵)) ≠ ∅)
106	103, 105	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ≠ ∅)
107		ssxpb 6133	. . . . . . . . . . . . . . . . 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 1916	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑜𝜑
113		aks6d1c2a.20	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝑄 ∈ ℙ ∧ 𝑄 ∥ 𝑁 ∧ 𝑃 ≠ 𝑄))
114	113	simp1d 1143	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑄 ∈ ℙ)
115	113	simp2d 1144	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑄 ∥ 𝑁)
116	113	simp3d 1145	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑃 ≠ 𝑄)
117	14, 10, 16, 27, 114, 115, 116	aks6d1c2p2 42575	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐸:(ℕ0 × ℕ0)–1-1→ℕ)
118		f1f 6731	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐸:(ℕ0 × ℕ0)–1-1→ℕ → 𝐸:(ℕ0 × ℕ0)⟶ℕ)
119	117, 118	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐸:(ℕ0 × ℕ0)⟶ℕ)
120	119	ffnd 6664	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐸 Fn (ℕ0 × ℕ0))
121	120	fnfund 6594	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → Fun 𝐸)
122	119	ffvelcdmda 7031	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑜 ∈ (ℕ0 × ℕ0)) → (𝐸‘𝑜) ∈ ℕ)
123	112, 121, 122	funimassd 6901	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℕ)
124	111, 123	sstrd 3933	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ ℕ)
125	37	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐶 = (𝐸 “ ((0...𝐵) × (0...𝐵))))
126	125	sseq1d 3954	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐶 ⊆ ℕ ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ ℕ))
127	124, 126	mpbird 257	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐶 ⊆ ℕ)
128	127	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝐶 ⊆ ℕ)
129		simpr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ 𝐶)
130	128, 129	sseldd 3923	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ ℕ)
131	130	nnzd 12544	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ ℤ)
132	131	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑐 ∈ ℤ)
133		simplr 769	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ 𝐶)
134	128, 133	sseldd 3923	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ ℕ)
135	134	nnzd 12544	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑏 ∈ ℤ)
136	135	adantr 480	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑏 ∈ ℤ)
137	79, 28	zndvds 21542	. . . . . . . 8 ⊢ ((𝑅 ∈ ℕ0 ∧ 𝑐 ∈ ℤ ∧ 𝑏 ∈ ℤ) → ((𝐿‘𝑐) = (𝐿‘𝑏) ↔ 𝑅 ∥ (𝑐 − 𝑏)))
138	75, 132, 136, 137	syl3anc 1374	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ((𝐿‘𝑐) = (𝐿‘𝑏) ↔ 𝑅 ∥ (𝑐 − 𝑏)))
139	71, 138	mpbid 232	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∥ (𝑐 − 𝑏))
140	75	nn0zd 12543	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℤ)
141	132, 136	zsubcld 12632	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑐 − 𝑏) ∈ ℤ)
142		divides 16217	. . . . . . . 8 ⊢ ((𝑅 ∈ ℤ ∧ (𝑐 − 𝑏) ∈ ℤ) → (𝑅 ∥ (𝑐 − 𝑏) ↔ ∃𝑑 ∈ ℤ (𝑑 · 𝑅) = (𝑐 − 𝑏)))
143	140, 141, 142	syl2anc 585	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑅 ∥ (𝑐 − 𝑏) ↔ ∃𝑑 ∈ ℤ (𝑑 · 𝑅) = (𝑐 − 𝑏)))
144	143	biimpd 229	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑅 ∥ (𝑐 − 𝑏) → ∃𝑑 ∈ ℤ (𝑑 · 𝑅) = (𝑐 − 𝑏)))
145	139, 144	mpd 15	. . . . 5 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ∃𝑑 ∈ ℤ (𝑑 · 𝑅) = (𝑐 − 𝑏))
146		simprl 771	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℤ)
147	130	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 ∈ ℕ)
148	147	nnred 12183	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 ∈ ℝ)
149	134	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℕ)
150	149	nnred 12183	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℝ)
151	148, 150	resubcld 11572	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) ∈ ℝ)
152	12	nnrpd 12978	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ ℝ+)
153	152	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝑅 ∈ ℝ+)
154	153	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) → 𝑅 ∈ ℝ+)
155	154	adantr 480	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → 𝑅 ∈ ℝ+)
156	155	adantr 480	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℝ+)
157	156	rpred 12980	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℝ)
158	51	adantr 480	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 < 𝑐)
159	150, 148	posdifd 11731	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑏 < 𝑐 ↔ 0 < (𝑐 − 𝑏)))
160	158, 159	mpbid 232	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < (𝑐 − 𝑏))
161	156	rpgt0d 12983	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < 𝑅)
162	151, 157, 160, 161	divgt0d 12085	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < ((𝑐 − 𝑏) / 𝑅))
163	157	recnd 11167	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ∈ ℂ)
164	146	zred 12627	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℝ)
165	164	recnd 11167	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℂ)
166	163, 165	mulcomd 11160	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑅 · 𝑑) = (𝑑 · 𝑅))
167		simprr 773	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 · 𝑅) = (𝑐 − 𝑏))
168	166, 167	eqtrd 2772	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑅 · 𝑑) = (𝑐 − 𝑏))
169	151	recnd 11167	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) ∈ ℂ)
170	161	gt0ne0d 11708	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑅 ≠ 0)
171	169, 163, 165, 170	divmuld 11947	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (((𝑐 − 𝑏) / 𝑅) = 𝑑 ↔ (𝑅 · 𝑑) = (𝑐 − 𝑏)))
172	168, 171	mpbird 257	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → ((𝑐 − 𝑏) / 𝑅) = 𝑑)
173	162, 172	breqtrd 5112	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 0 < 𝑑)
174	146, 173	jca 511	. . . . . 6 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 ∈ ℤ ∧ 0 < 𝑑))
175		elnnz 12528	. . . . . 6 ⊢ (𝑑 ∈ ℕ ↔ (𝑑 ∈ ℤ ∧ 0 < 𝑑))
176	174, 175	sylibr 234	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑑 ∈ ℕ)
177	167	eqcomd 2743	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑐 − 𝑏) = (𝑑 · 𝑅))
178	148	recnd 11167	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 ∈ ℂ)
179	150	recnd 11167	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑏 ∈ ℂ)
180	167, 169	eqeltrd 2837	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑑 · 𝑅) ∈ ℂ)
181	178, 179, 180	subaddd 11517	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → ((𝑐 − 𝑏) = (𝑑 · 𝑅) ↔ (𝑏 + (𝑑 · 𝑅)) = 𝑐))
182	177, 181	mpbid 232	. . . . . 6 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → (𝑏 + (𝑑 · 𝑅)) = 𝑐)
183	182	eqcomd 2743	. . . . 5 ⊢ (((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) ∧ (𝑑 ∈ ℤ ∧ (𝑑 · 𝑅) = (𝑐 − 𝑏))) → 𝑐 = (𝑏 + (𝑑 · 𝑅)))
184	145, 176, 183	reximssdv 3156	. . . 4 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅)))
185	51, 184	jca 511	. . 3 ⊢ ((((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑐 ∈ 𝐶) ∧ (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐)) → (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))))
186		fzfid 13929	. . . . . . 7 ⊢ (𝜑 → (0...𝐵) ∈ Fin)
187		xpfi 9224	. . . . . . 7 ⊢ (((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin) → ((0...𝐵) × (0...𝐵)) ∈ Fin)
188	186, 186, 187	syl2anc 585	. . . . . 6 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ∈ Fin)
189		imafi 9219	. . . . . 6 ⊢ ((Fun 𝐸 ∧ ((0...𝐵) × (0...𝐵)) ∈ Fin) → (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin)
190	121, 188, 189	syl2anc 585	. . . . 5 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin)
191	125	eleq1d 2822	. . . . 5 ⊢ (𝜑 → (𝐶 ∈ Fin ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ∈ Fin))
192	190, 191	mpbird 257	. . . 4 ⊢ (𝜑 → 𝐶 ∈ Fin)
193	79	zncrng 21537	. . . . . . . . . 10 ⊢ (𝑅 ∈ ℕ0 → (ℤ/nℤ‘𝑅) ∈ CRing)
194	72, 193	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (ℤ/nℤ‘𝑅) ∈ CRing)
195		crngring 20220	. . . . . . . . 9 ⊢ ((ℤ/nℤ‘𝑅) ∈ CRing → (ℤ/nℤ‘𝑅) ∈ Ring)
196	194, 195	syl 17	. . . . . . . 8 ⊢ (𝜑 → (ℤ/nℤ‘𝑅) ∈ Ring)
197	28	zrhrhm 21504	. . . . . . . 8 ⊢ ((ℤ/nℤ‘𝑅) ∈ Ring → 𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)))
198	196, 197	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)))
199	198	imaexd 7861	. . . . . 6 ⊢ (𝜑 → (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ V)
200		hashclb 14314	. . . . . 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 14312	. . . . . . . . . . . . 13 ⊢ ((𝐿 “ (𝐸 “ (ℕ0 × ℕ0))) ∈ Fin → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
204	202, 203	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℕ0)
205	204	nn0red 12493	. . . . . . . . . . 11 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ)
206	204	nn0ge0d 12495	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
207		sqrtmsq 15226	. . . . . . . . . . 11 ⊢ (((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) = (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
208	205, 206, 207	syl2anc 585	. . . . . . . . . 10 ⊢ (𝜑 → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) = (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))
209	208	eqcomd 2743	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) = (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
210	205, 206	jca 511	. . . . . . . . . . 11 ⊢ (𝜑 → ((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
211		sqrtmul 15215	. . . . . . . . . . 11 ⊢ ((((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∧ ((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) ∈ ℝ ∧ 0 ≤ (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) = ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) · (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
212	210, 210, 211	syl2anc 585	. . . . . . . . . 10 ⊢ (𝜑 → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) = ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) · (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))))
213	205, 206	resqrtcld 15374	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ)
214	213	flcld 13751	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) ∈ ℤ)
215	205, 206	sqrtge0d 15377	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 0 ≤ (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))))
216	213, 86, 87	syl2anc 585	. . . . . . . . . . . . . . . . 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 12493	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐵 ∈ ℝ)
222		1red 11139	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℝ)
223	221, 222	readdcld 11168	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 + 1) ∈ ℝ)
224		flltp1 13753	. . . . . . . . . . . . 13 ⊢ ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) ∈ ℝ → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
225	213, 224	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
226	93	oveq1d 7376	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 + 1) = ((⌊‘(√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) + 1))
227	225, 226	breqtrrd 5114	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) < (𝐵 + 1))
228	213, 223, 213, 223, 215, 227, 215, 227	ltmul12ad 12091	. . . . . . . . . 10 ⊢ (𝜑 → ((√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))) · (√‘(♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) < ((𝐵 + 1) · (𝐵 + 1)))
229	212, 228	eqbrtrd 5108	. . . . . . . . 9 ⊢ (𝜑 → (√‘((♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) · (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))))) < ((𝐵 + 1) · (𝐵 + 1)))
230	209, 229	eqbrtrd 5108	. . . . . . . 8 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < ((𝐵 + 1) · (𝐵 + 1)))
231		hashfz0 14388	. . . . . . . . . 10 ⊢ (𝐵 ∈ ℕ0 → (♯‘(0...𝐵)) = (𝐵 + 1))
232	220, 231	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(0...𝐵)) = (𝐵 + 1))
233	232, 232	oveq12d 7379	. . . . . . . 8 ⊢ (𝜑 → ((♯‘(0...𝐵)) · (♯‘(0...𝐵))) = ((𝐵 + 1) · (𝐵 + 1)))
234	230, 233	breqtrrd 5114	. . . . . . 7 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
235	186, 186	jca 511	. . . . . . . 8 ⊢ (𝜑 → ((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin))
236		hashxp 14390	. . . . . . . 8 ⊢ (((0...𝐵) ∈ Fin ∧ (0...𝐵) ∈ Fin) → (♯‘((0...𝐵) × (0...𝐵))) = ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
237	235, 236	syl 17	. . . . . . 7 ⊢ (𝜑 → (♯‘((0...𝐵) × (0...𝐵))) = ((♯‘(0...𝐵)) · (♯‘(0...𝐵))))
238	234, 237	breqtrrd 5114	. . . . . 6 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘((0...𝐵) × (0...𝐵))))
239		ovexd 7396	. . . . . . . . . . 11 ⊢ (𝜑 → (0...𝐵) ∈ V)
240	239, 239	jca 511	. . . . . . . . . 10 ⊢ (𝜑 → ((0...𝐵) ∈ V ∧ (0...𝐵) ∈ V))
241		xpexg 7698	. . . . . . . . . 10 ⊢ (((0...𝐵) ∈ V ∧ (0...𝐵) ∈ V) → ((0...𝐵) × (0...𝐵)) ∈ V)
242	240, 241	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) ∈ V)
243	242	mptexd 7173	. . . . . . . 8 ⊢ (𝜑 → (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) ∈ V)
244	120	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝐸 Fn (ℕ0 × ℕ0))
245	109	sselda 3922	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝑤 ∈ (ℕ0 × ℕ0))
246		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → 𝑤 ∈ ((0...𝐵) × (0...𝐵)))
247	244, 245, 246	fnfvimad 7183	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ ((0...𝐵) × (0...𝐵))) → (𝐸‘𝑤) ∈ (𝐸 “ ((0...𝐵) × (0...𝐵))))
248		eqid 2737	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤))
249	247, 248	fmptd 7061	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))⟶(𝐸 “ ((0...𝐵) × (0...𝐵))))
250	119, 109	feqresmpt 6904	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸 ↾ ((0...𝐵) × (0...𝐵))) = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)))
251	250	feq1d 6645	. . . . . . . . . . . . 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 6739	. . . . . . . . . . . 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 1374	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 ↾ ((0...𝐵) × (0...𝐵))):((0...𝐵) × (0...𝐵))–1-1→(𝐸 “ ((0...𝐵) × (0...𝐵))))
255		eqidd 2738	. . . . . . . . . . . 12 ⊢ (𝜑 → ((0...𝐵) × (0...𝐵)) = ((0...𝐵) × (0...𝐵)))
256		eqidd 2738	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) = (𝐸 “ ((0...𝐵) × (0...𝐵))))
257	250, 255, 256	f1eq123d 6767	. . . . . . . . . . 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 5638	. . . . . . . . . . . 12 ⊢ (𝐸 “ ((0...𝐵) × (0...𝐵))) = ran (𝐸 ↾ ((0...𝐵) × (0...𝐵)))
260	259	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 “ ((0...𝐵) × (0...𝐵))) = ran (𝐸 ↾ ((0...𝐵) × (0...𝐵))))
261	250	rneqd 5888	. . . . . . . . . . 11 ⊢ (𝜑 → ran (𝐸 ↾ ((0...𝐵) × (0...𝐵))) = ran (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)))
262	260, 261	eqtr2d 2773	. . . . . . . . . 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 6784	. . . . . . . . 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 6763	. . . . . . . 8 ⊢ (𝑢 = (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)) → (𝑢:((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))) ↔ (𝑤 ∈ ((0...𝐵) × (0...𝐵)) ↦ (𝐸‘𝑤)):((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵)))))
267	243, 265, 266	spcedv 3541	. . . . . . 7 ⊢ (𝜑 → ∃𝑢 𝑢:((0...𝐵) × (0...𝐵))–1-1-onto→(𝐸 “ ((0...𝐵) × (0...𝐵))))
268		hasheqf1oi 14307	. . . . . . . 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 5112	. . . . 5 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵)))))
272	125	fveq2d 6839	. . . . 5 ⊢ (𝜑 → (♯‘𝐶) = (♯‘(𝐸 “ ((0...𝐵) × (0...𝐵)))))
273	271, 272	breqtrrd 5114	. . . 4 ⊢ (𝜑 → (♯‘(𝐿 “ (𝐸 “ (ℕ0 × ℕ0)))) < (♯‘𝐶))
274		zringbas 21446	. . . . . . . . . 10 ⊢ ℤ = (Base‘ℤring)
275		eqid 2737	. . . . . . . . . 10 ⊢ (Base‘(ℤ/nℤ‘𝑅)) = (Base‘(ℤ/nℤ‘𝑅))
276	274, 275	rhmf 20458	. . . . . . . . 9 ⊢ (𝐿 ∈ (ℤring RingHom (ℤ/nℤ‘𝑅)) → 𝐿:ℤ⟶(Base‘(ℤ/nℤ‘𝑅)))
277	198, 276	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐿:ℤ⟶(Base‘(ℤ/nℤ‘𝑅)))
278	277	ffnd 6664	. . . . . . 7 ⊢ (𝜑 → 𝐿 Fn ℤ)
279	278	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → 𝐿 Fn ℤ)
280		resss 5961	. . . . . . . . . . . 12 ⊢ (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸
281	280	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸)
282		rnss 5889	. . . . . . . . . . 11 ⊢ ((𝐸 ↾ (ℕ0 × ℕ0)) ⊆ 𝐸 → ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
283	281, 282	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
284		df-ima 5638	. . . . . . . . . . . 12 ⊢ (𝐸 “ (ℕ0 × ℕ0)) = ran (𝐸 ↾ (ℕ0 × ℕ0))
285	284	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) = ran (𝐸 ↾ (ℕ0 × ℕ0)))
286	285	sseq1d 3954	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐸 “ (ℕ0 × ℕ0)) ⊆ ran 𝐸 ↔ ran (𝐸 ↾ (ℕ0 × ℕ0)) ⊆ ran 𝐸))
287	283, 286	mpbird 257	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ran 𝐸)
288		frn 6670	. . . . . . . . . 10 ⊢ (𝐸:(ℕ0 × ℕ0)⟶ℕ → ran 𝐸 ⊆ ℕ)
289	119, 288	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ran 𝐸 ⊆ ℕ)
290	287, 289	sstrd 3933	. . . . . . . 8 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℕ)
291		nnssz 12540	. . . . . . . . 9 ⊢ ℕ ⊆ ℤ
292	291	a1i 11	. . . . . . . 8 ⊢ (𝜑 → ℕ ⊆ ℤ)
293	290, 292	sstrd 3933	. . . . . . 7 ⊢ (𝜑 → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ)
294	293	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ)
295	125	sseq1d 3954	. . . . . . . . 9 ⊢ (𝜑 → (𝐶 ⊆ (𝐸 “ (ℕ0 × ℕ0)) ↔ (𝐸 “ ((0...𝐵) × (0...𝐵))) ⊆ (𝐸 “ (ℕ0 × ℕ0))))
296	111, 295	mpbird 257	. . . . . . . 8 ⊢ (𝜑 → 𝐶 ⊆ (𝐸 “ (ℕ0 × ℕ0)))
297	296	sseld 3921	. . . . . . 7 ⊢ (𝜑 → (𝑡 ∈ 𝐶 → 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0))))
298	297	imp 406	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0)))
299		fnfvima 7182	. . . . . 6 ⊢ ((𝐿 Fn ℤ ∧ (𝐸 “ (ℕ0 × ℕ0)) ⊆ ℤ ∧ 𝑡 ∈ (𝐸 “ (ℕ0 × ℕ0))) → (𝐿‘𝑡) ∈ (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
300	279, 294, 298, 299	syl3anc 1374	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐶) → (𝐿‘𝑡) ∈ (𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
301		eqid 2737	. . . . 5 ⊢ (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)) = (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))
302	300, 301	fmptd 7061	. . . 4 ⊢ (𝜑 → (𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡)):𝐶⟶(𝐿 “ (𝐸 “ (ℕ0 × ℕ0))))
303		nnssre 12172	. . . . . 6 ⊢ ℕ ⊆ ℝ
304	303	a1i 11	. . . . 5 ⊢ (𝜑 → ℕ ⊆ ℝ)
305	127, 304	sstrd 3933	. . . 4 ⊢ (𝜑 → 𝐶 ⊆ ℝ)
306	192, 202, 273, 302, 305	hashnexinjle 42585	. . 3 ⊢ (𝜑 → ∃𝑏 ∈ 𝐶 ∃𝑐 ∈ 𝐶 (((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑏) = ((𝑡 ∈ 𝐶 ↦ (𝐿‘𝑡))‘𝑐) ∧ 𝑏 < 𝑐))
307	185, 306	reximddv2 3197	. 2 ⊢ (𝜑 → ∃𝑏 ∈ 𝐶 ∃𝑐 ∈ 𝐶 (𝑏 < 𝑐 ∧ ∃𝑑 ∈ ℕ 𝑐 = (𝑏 + (𝑑 · 𝑅))))
308	50, 307	r19.29vva 3198	1 ⊢ (𝜑 → (♯‘(𝐻 “ (ℕ0 ↑m (0...𝐴)))) ≤ (𝑁↑𝐵))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   = wceq 1542  ∃wex 1781   ∈ wcel 2114   ≠ wne 2933  ∀wral 3052  ∃wrex 3062  Vcvv 3430   ⊆ wss 3890  ∅c0 4274   class class class wbr 5086  {copab 5148   ↦ cmpt 5167   × cxp 5623  ran crn 5626   ↾ cres 5627   “ cima 5628  Fun wfun 6487   Fn wfn 6488  ⟶wf 6489  –1-1→wf1 6490  –1-1-onto→wf1o 6492  ‘cfv 6493  (class class class)co 7361   ∈ cmpo 7363   ↑_m cmap 8767  Fincfn 8887  ℂcc 11030  ℝcr 11031  0cc0 11032  1c1 11033   + caddc 11035   · cmul 11037   < clt 11173   ≤ cle 11174   − cmin 11371   / cdiv 11801  ℕcn 12168  ℕ₀cn0 12431  ℤcz 12518  ℤ_≥cuz 12782  ℝ⁺crp 12936  ...cfz 13455  ⌊cfl 13743  ↑cexp 14017  ♯chash 14286  √csqrt 15189   ∥ cdvds 16215   gcd cgcd 16457  ℙcprime 16634  Basecbs 17173  +_gcplusg 17214   Σ_g cgsu 17397  -_gcsg 18905  ._gcmg 19037  mulGrpcmgp 20115  Ringcrg 20208  CRingccrg 20209   RingHom crh 20443   RingIso crs 20444  Fieldcfield 20701  ℤ_ringczring 21439  ℤRHomczrh 21492  chrcchr 21494  ℤ/nℤczn 21495  algSccascl 21845  var₁cv1 22152  Poly₁cpl1 22153  eval₁ce1 22292   PrimRoots cprimroots 42547

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5303  ax-pr 5371  ax-un 7683  ax-cnex 11088  ax-resscn 11089  ax-1cn 11090  ax-icn 11091  ax-addcl 11092  ax-addrcl 11093  ax-mulcl 11094  ax-mulrcl 11095  ax-mulcom 11096  ax-addass 11097  ax-mulass 11098  ax-distr 11099  ax-i2m1 11100  ax-1ne0 11101  ax-1rid 11102  ax-rnegex 11103  ax-rrecex 11104  ax-cnre 11105  ax-pre-lttri 11106  ax-pre-lttrn 11107  ax-pre-ltadd 11108  ax-pre-mulgt0 11109  ax-pre-sup 11110  ax-addf 11111  ax-mulf 11112

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-iin 4937  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-se 5579  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6260  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-isom 6502  df-riota 7318  df-ov 7364  df-oprab 7365  df-mpo 7366  df-of 7625  df-ofr 7626  df-om 7812  df-1st 7936  df-2nd 7937  df-supp 8105  df-tpos 8170  df-frecs 8225  df-wrecs 8256  df-recs 8305  df-rdg 8343  df-1o 8399  df-2o 8400  df-oadd 8403  df-er 8637  df-ec 8639  df-qs 8643  df-map 8769  df-pm 8770  df-ixp 8840  df-en 8888  df-dom 8889  df-sdom 8890  df-fin 8891  df-fsupp 9269  df-sup 9349  df-inf 9350  df-oi 9419  df-dju 9819  df-card 9857  df-pnf 11175  df-mnf 11176  df-xr 11177  df-ltxr 11178  df-le 11179  df-sub 11373  df-neg 11374  df-div 11802  df-nn 12169  df-2 12238  df-3 12239  df-4 12240  df-5 12241  df-6 12242  df-7 12243  df-8 12244  df-9 12245  df-n0 12432  df-xnn0 12505  df-z 12519  df-dec 12639  df-uz 12783  df-q 12893  df-rp 12937  df-fz 13456  df-fzo 13603  df-fl 13745  df-mod 13823  df-seq 13958  df-exp 14018  df-fac 14230  df-bc 14259  df-hash 14287  df-cj 15055  df-re 15056  df-im 15057  df-sqrt 15191  df-abs 15192  df-dvds 16216  df-gcd 16458  df-prm 16635  df-phi 16730  df-pc 16802  df-struct 17111  df-sets 17128  df-slot 17146  df-ndx 17158  df-base 17174  df-ress 17195  df-plusg 17227  df-mulr 17228  df-starv 17229  df-sca 17230  df-vsca 17231  df-ip 17232  df-tset 17233  df-ple 17234  df-ds 17236  df-unif 17237  df-hom 17238  df-cco 17239  df-0g 17398  df-gsum 17399  df-prds 17404  df-pws 17406  df-imas 17466  df-qus 17467  df-mre 17542  df-mrc 17543  df-acs 17545  df-mgm 18602  df-sgrp 18681  df-mnd 18697  df-mhm 18745  df-submnd 18746  df-grp 18906  df-minusg 18907  df-sbg 18908  df-mulg 19038  df-subg 19093  df-nsg 19094  df-eqg 19095  df-ghm 19182  df-cntz 19286  df-od 19497  df-cmn 19751  df-abl 19752  df-mgp 20116  df-rng 20128  df-ur 20157  df-srg 20162  df-ring 20210  df-cring 20211  df-oppr 20311  df-dvdsr 20331  df-unit 20332  df-invr 20362  df-dvr 20375  df-rhm 20446  df-rim 20447  df-nzr 20484  df-subrng 20517  df-subrg 20541  df-rlreg 20665  df-domn 20666  df-idom 20667  df-drng 20702  df-field 20703  df-lmod 20851  df-lss 20921  df-lsp 20961  df-sra 21163  df-rgmod 21164  df-lidl 21201  df-rsp 21202  df-2idl 21243  df-cnfld 21348  df-zring 21440  df-zrh 21496  df-chr 21498  df-zn 21499  df-assa 21846  df-asp 21847  df-ascl 21848  df-psr 21902  df-mvr 21903  df-mpl 21904  df-opsr 21906  df-evls 22065  df-evl 22066  df-psr1 22156  df-vr1 22157  df-ply1 22158  df-coe1 22159  df-evl1 22294  df-mdeg 26033  df-deg1 26034  df-mon1 26109  df-uc1p 26110  df-q1p 26111  df-r1p 26112  df-primroots 42548

This theorem is referenced by:  aks6d1c7lem2  42637