ctinfomlemom - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > ctinfomlemom		GIF version

Theorem ctinfomlemom 12427

Description: Lemma for ctinfom 12428. Converting between ω and ℕ₀. (Contributed by Jim Kingdon, 10-Aug-2023.)

**Hypotheses**
Ref	Expression
ctinfom.n	⊢ 𝑁 = frec((𝑥 ∈ ℤ ↦ (𝑥 + 1)), 0)
ctinfom.g	⊢ 𝐺 = (𝐹 ∘ ^◡𝑁)
ctinfom.f	⊢ (𝜑 → 𝐹:ω–onto→𝐴)
ctinfom.inf	⊢ (𝜑 → ∀𝑛 ∈ ω ∃𝑘 ∈ ω ¬ (𝐹‘𝑘) ∈ (𝐹 “ 𝑛))

**Assertion**
Ref	Expression
ctinfomlemom	⊢ (𝜑 → (𝐺:ℕ₀–onto→𝐴 ∧ ∀𝑚 ∈ ℕ₀ ∃𝑗 ∈ ℕ₀ ∀𝑖 ∈ (0...𝑚)(𝐺‘𝑗) ≠ (𝐺‘𝑖)))

Distinct variable groups: 𝑖,𝐹,𝑥 𝑛,𝐹 𝑗,𝐺,𝑘 𝑖,𝑁,𝑗,𝑘 𝑛,𝑁,𝑘 𝑥,𝑁,𝑘 𝑖,𝑚,𝑗,𝑘 𝜑,𝑖,𝑘,𝑚,𝑥 𝑚,𝑛 Allowed substitution hints: 𝜑(𝑗,𝑛) 𝐴(𝑥,𝑖,𝑗,𝑘,𝑚,𝑛) 𝐹(𝑗,𝑘,𝑚) 𝐺(𝑥,𝑖,𝑚,𝑛) 𝑁(𝑚)

**Proof of Theorem ctinfomlemom**
Step	Hyp	Ref	Expression
1		ctinfom.f	. . . 4 ⊢ (𝜑 → 𝐹:ω–onto→𝐴)
2		ctinfom.n	. . . . . . 7 ⊢ 𝑁 = frec((𝑥 ∈ ℤ ↦ (𝑥 + 1)), 0)
3	2	frechashgf1o 10427	. . . . . 6 ⊢ 𝑁:ω–1-1-onto→ℕ₀
4		f1ocnv 5474	. . . . . 6 ⊢ (𝑁:ω–1-1-onto→ℕ₀ → ^◡𝑁:ℕ₀–1-1-onto→ω)
5	3, 4	ax-mp 5	. . . . 5 ⊢ ^◡𝑁:ℕ₀–1-1-onto→ω
6		f1ofo 5468	. . . . 5 ⊢ (^◡𝑁:ℕ₀–1-1-onto→ω → ^◡𝑁:ℕ₀–onto→ω)
7	5, 6	ax-mp 5	. . . 4 ⊢ ^◡𝑁:ℕ₀–onto→ω
8		foco 5448	. . . 4 ⊢ ((𝐹:ω–onto→𝐴 ∧ ^◡𝑁:ℕ₀–onto→ω) → (𝐹 ∘ ^◡𝑁):ℕ₀–onto→𝐴)
9	1, 7, 8	sylancl 413	. . 3 ⊢ (𝜑 → (𝐹 ∘ ^◡𝑁):ℕ₀–onto→𝐴)
10		ctinfom.g	. . . 4 ⊢ 𝐺 = (𝐹 ∘ ^◡𝑁)
11		foeq1 5434	. . . 4 ⊢ (𝐺 = (𝐹 ∘ ^◡𝑁) → (𝐺:ℕ₀–onto→𝐴 ↔ (𝐹 ∘ ^◡𝑁):ℕ₀–onto→𝐴))
12	10, 11	ax-mp 5	. . 3 ⊢ (𝐺:ℕ₀–onto→𝐴 ↔ (𝐹 ∘ ^◡𝑁):ℕ₀–onto→𝐴)
13	9, 12	sylibr 134	. 2 ⊢ (𝜑 → 𝐺:ℕ₀–onto→𝐴)
14		imaeq2 4966	. . . . . . . 8 ⊢ (𝑛 = suc (^◡𝑁‘𝑚) → (𝐹 “ 𝑛) = (𝐹 “ suc (^◡𝑁‘𝑚)))
15	14	eleq2d 2247	. . . . . . 7 ⊢ (𝑛 = suc (^◡𝑁‘𝑚) → ((𝐹‘𝑘) ∈ (𝐹 “ 𝑛) ↔ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚))))
16	15	notbid 667	. . . . . 6 ⊢ (𝑛 = suc (^◡𝑁‘𝑚) → (¬ (𝐹‘𝑘) ∈ (𝐹 “ 𝑛) ↔ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚))))
17	16	rexbidv 2478	. . . . 5 ⊢ (𝑛 = suc (^◡𝑁‘𝑚) → (∃𝑘 ∈ ω ¬ (𝐹‘𝑘) ∈ (𝐹 “ 𝑛) ↔ ∃𝑘 ∈ ω ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚))))
18		ctinfom.inf	. . . . . 6 ⊢ (𝜑 → ∀𝑛 ∈ ω ∃𝑘 ∈ ω ¬ (𝐹‘𝑘) ∈ (𝐹 “ 𝑛))
19	18	adantr 276	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ₀) → ∀𝑛 ∈ ω ∃𝑘 ∈ ω ¬ (𝐹‘𝑘) ∈ (𝐹 “ 𝑛))
20		f1of 5461	. . . . . . . . 9 ⊢ (^◡𝑁:ℕ₀–1-1-onto→ω → ^◡𝑁:ℕ₀⟶ω)
21	5, 20	ax-mp 5	. . . . . . . 8 ⊢ ^◡𝑁:ℕ₀⟶ω
22	21	a1i 9	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ₀) → ^◡𝑁:ℕ₀⟶ω)
23		simpr 110	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ₀) → 𝑚 ∈ ℕ₀)
24	22, 23	ffvelcdmd 5652	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ₀) → (^◡𝑁‘𝑚) ∈ ω)
25		peano2 4594	. . . . . 6 ⊢ ((^◡𝑁‘𝑚) ∈ ω → suc (^◡𝑁‘𝑚) ∈ ω)
26	24, 25	syl 14	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ₀) → suc (^◡𝑁‘𝑚) ∈ ω)
27	17, 19, 26	rspcdva 2846	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ₀) → ∃𝑘 ∈ ω ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))
28		f1of 5461	. . . . . . . 8 ⊢ (𝑁:ω–1-1-onto→ℕ₀ → 𝑁:ω⟶ℕ₀)
29	3, 28	ax-mp 5	. . . . . . 7 ⊢ 𝑁:ω⟶ℕ₀
30	29	a1i 9	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) → 𝑁:ω⟶ℕ₀)
31		simprl 529	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) → 𝑘 ∈ ω)
32	30, 31	ffvelcdmd 5652	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) → (𝑁‘𝑘) ∈ ℕ₀)
33	10	fveq1i 5516	. . . . . . . . . . 11 ⊢ (𝐺‘(𝑁‘𝑘)) = ((𝐹 ∘ ^◡𝑁)‘(𝑁‘𝑘))
34	32	adantr 276	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝑁‘𝑘) ∈ ℕ₀)
35		fvco3 5587	. . . . . . . . . . . 12 ⊢ ((^◡𝑁:ℕ₀⟶ω ∧ (𝑁‘𝑘) ∈ ℕ₀) → ((𝐹 ∘ ^◡𝑁)‘(𝑁‘𝑘)) = (𝐹‘(^◡𝑁‘(𝑁‘𝑘))))
36	21, 34, 35	sylancr 414	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ((𝐹 ∘ ^◡𝑁)‘(𝑁‘𝑘)) = (𝐹‘(^◡𝑁‘(𝑁‘𝑘))))
37	33, 36	eqtrid 2222	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝐺‘(𝑁‘𝑘)) = (𝐹‘(^◡𝑁‘(𝑁‘𝑘))))
38	31	adantr 276	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → 𝑘 ∈ ω)
39		f1ocnvfv1 5777	. . . . . . . . . . . . 13 ⊢ ((𝑁:ω–1-1-onto→ℕ₀ ∧ 𝑘 ∈ ω) → (^◡𝑁‘(𝑁‘𝑘)) = 𝑘)
40	3, 39	mpan 424	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ω → (^◡𝑁‘(𝑁‘𝑘)) = 𝑘)
41	40	fveq2d 5519	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ω → (𝐹‘(^◡𝑁‘(𝑁‘𝑘))) = (𝐹‘𝑘))
42	38, 41	syl 14	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝐹‘(^◡𝑁‘(𝑁‘𝑘))) = (𝐹‘𝑘))
43	37, 42	eqtrd 2210	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝐺‘(𝑁‘𝑘)) = (𝐹‘𝑘))
44		simplrr 536	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))
45	43, 44	eqneltrd 2273	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ¬ (𝐺‘(𝑁‘𝑘)) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))
46		simpr 110	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) ∧ (𝐺‘(𝑁‘𝑘)) = (𝐺‘𝑖)) → (𝐺‘(𝑁‘𝑘)) = (𝐺‘𝑖))
47	10	fveq1i 5516	. . . . . . . . . . . 12 ⊢ (𝐺‘𝑖) = ((𝐹 ∘ ^◡𝑁)‘𝑖)
48		elfznn0 10113	. . . . . . . . . . . . . 14 ⊢ (𝑖 ∈ (0...𝑚) → 𝑖 ∈ ℕ₀)
49	48	adantl 277	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → 𝑖 ∈ ℕ₀)
50		fvco3 5587	. . . . . . . . . . . . 13 ⊢ ((^◡𝑁:ℕ₀⟶ω ∧ 𝑖 ∈ ℕ₀) → ((𝐹 ∘ ^◡𝑁)‘𝑖) = (𝐹‘(^◡𝑁‘𝑖)))
51	21, 49, 50	sylancr 414	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ((𝐹 ∘ ^◡𝑁)‘𝑖) = (𝐹‘(^◡𝑁‘𝑖)))
52	47, 51	eqtrid 2222	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝐺‘𝑖) = (𝐹‘(^◡𝑁‘𝑖)))
53		elfzle2 10027	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ (0...𝑚) → 𝑖 ≤ 𝑚)
54	53	adantl 277	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → 𝑖 ≤ 𝑚)
55		0zd 9264	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → 0 ∈ ℤ)
56	21	a1i 9	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ^◡𝑁:ℕ₀⟶ω)
57	56, 49	ffvelcdmd 5652	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (^◡𝑁‘𝑖) ∈ ω)
58	24	ad2antrr 488	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (^◡𝑁‘𝑚) ∈ ω)
59	55, 2, 57, 58	frec2uzled 10428	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ((^◡𝑁‘𝑖) ⊆ (^◡𝑁‘𝑚) ↔ (𝑁‘(^◡𝑁‘𝑖)) ≤ (𝑁‘(^◡𝑁‘𝑚))))
60		f1ocnvfv2 5778	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁:ω–1-1-onto→ℕ₀ ∧ 𝑖 ∈ ℕ₀) → (𝑁‘(^◡𝑁‘𝑖)) = 𝑖)
61	3, 49, 60	sylancr 414	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝑁‘(^◡𝑁‘𝑖)) = 𝑖)
62	23	ad2antrr 488	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → 𝑚 ∈ ℕ₀)
63		f1ocnvfv2 5778	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁:ω–1-1-onto→ℕ₀ ∧ 𝑚 ∈ ℕ₀) → (𝑁‘(^◡𝑁‘𝑚)) = 𝑚)
64	3, 62, 63	sylancr 414	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝑁‘(^◡𝑁‘𝑚)) = 𝑚)
65	61, 64	breq12d 4016	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ((𝑁‘(^◡𝑁‘𝑖)) ≤ (𝑁‘(^◡𝑁‘𝑚)) ↔ 𝑖 ≤ 𝑚))
66	59, 65	bitrd 188	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ((^◡𝑁‘𝑖) ⊆ (^◡𝑁‘𝑚) ↔ 𝑖 ≤ 𝑚))
67	54, 66	mpbird 167	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (^◡𝑁‘𝑖) ⊆ (^◡𝑁‘𝑚))
68		nnsssuc 6502	. . . . . . . . . . . . . 14 ⊢ (((^◡𝑁‘𝑖) ∈ ω ∧ (^◡𝑁‘𝑚) ∈ ω) → ((^◡𝑁‘𝑖) ⊆ (^◡𝑁‘𝑚) ↔ (^◡𝑁‘𝑖) ∈ suc (^◡𝑁‘𝑚)))
69	57, 58, 68	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ((^◡𝑁‘𝑖) ⊆ (^◡𝑁‘𝑚) ↔ (^◡𝑁‘𝑖) ∈ suc (^◡𝑁‘𝑚)))
70	67, 69	mpbid 147	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (^◡𝑁‘𝑖) ∈ suc (^◡𝑁‘𝑚))
71	1	ad3antrrr 492	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → 𝐹:ω–onto→𝐴)
72		fof 5438	. . . . . . . . . . . . . . 15 ⊢ (𝐹:ω–onto→𝐴 → 𝐹:ω⟶𝐴)
73	71, 72	syl 14	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → 𝐹:ω⟶𝐴)
74	73	ffund 5369	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → Fun 𝐹)
75	73	fdmd 5372	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → dom 𝐹 = ω)
76	57, 75	eleqtrrd 2257	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (^◡𝑁‘𝑖) ∈ dom 𝐹)
77		funfvima 5748	. . . . . . . . . . . . 13 ⊢ ((Fun 𝐹 ∧ (^◡𝑁‘𝑖) ∈ dom 𝐹) → ((^◡𝑁‘𝑖) ∈ suc (^◡𝑁‘𝑚) → (𝐹‘(^◡𝑁‘𝑖)) ∈ (𝐹 “ suc (^◡𝑁‘𝑚))))
78	74, 76, 77	syl2anc 411	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ((^◡𝑁‘𝑖) ∈ suc (^◡𝑁‘𝑚) → (𝐹‘(^◡𝑁‘𝑖)) ∈ (𝐹 “ suc (^◡𝑁‘𝑚))))
79	70, 78	mpd 13	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝐹‘(^◡𝑁‘𝑖)) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))
80	52, 79	eqeltrd 2254	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝐺‘𝑖) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))
81	80	adantr 276	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) ∧ (𝐺‘(𝑁‘𝑘)) = (𝐺‘𝑖)) → (𝐺‘𝑖) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))
82	46, 81	eqeltrd 2254	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) ∧ (𝐺‘(𝑁‘𝑘)) = (𝐺‘𝑖)) → (𝐺‘(𝑁‘𝑘)) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))
83	45, 82	mtand 665	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → ¬ (𝐺‘(𝑁‘𝑘)) = (𝐺‘𝑖))
84	83	neqned 2354	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) ∧ 𝑖 ∈ (0...𝑚)) → (𝐺‘(𝑁‘𝑘)) ≠ (𝐺‘𝑖))
85	84	ralrimiva 2550	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) → ∀𝑖 ∈ (0...𝑚)(𝐺‘(𝑁‘𝑘)) ≠ (𝐺‘𝑖))
86		fveq2 5515	. . . . . . . 8 ⊢ (𝑗 = (𝑁‘𝑘) → (𝐺‘𝑗) = (𝐺‘(𝑁‘𝑘)))
87	86	neeq1d 2365	. . . . . . 7 ⊢ (𝑗 = (𝑁‘𝑘) → ((𝐺‘𝑗) ≠ (𝐺‘𝑖) ↔ (𝐺‘(𝑁‘𝑘)) ≠ (𝐺‘𝑖)))
88	87	ralbidv 2477	. . . . . 6 ⊢ (𝑗 = (𝑁‘𝑘) → (∀𝑖 ∈ (0...𝑚)(𝐺‘𝑗) ≠ (𝐺‘𝑖) ↔ ∀𝑖 ∈ (0...𝑚)(𝐺‘(𝑁‘𝑘)) ≠ (𝐺‘𝑖)))
89	88	rspcev 2841	. . . . 5 ⊢ (((𝑁‘𝑘) ∈ ℕ₀ ∧ ∀𝑖 ∈ (0...𝑚)(𝐺‘(𝑁‘𝑘)) ≠ (𝐺‘𝑖)) → ∃𝑗 ∈ ℕ₀ ∀𝑖 ∈ (0...𝑚)(𝐺‘𝑗) ≠ (𝐺‘𝑖))
90	32, 85, 89	syl2anc 411	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ₀) ∧ (𝑘 ∈ ω ∧ ¬ (𝐹‘𝑘) ∈ (𝐹 “ suc (^◡𝑁‘𝑚)))) → ∃𝑗 ∈ ℕ₀ ∀𝑖 ∈ (0...𝑚)(𝐺‘𝑗) ≠ (𝐺‘𝑖))
91	27, 90	rexlimddv 2599	. . 3 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ₀) → ∃𝑗 ∈ ℕ₀ ∀𝑖 ∈ (0...𝑚)(𝐺‘𝑗) ≠ (𝐺‘𝑖))
92	91	ralrimiva 2550	. 2 ⊢ (𝜑 → ∀𝑚 ∈ ℕ₀ ∃𝑗 ∈ ℕ₀ ∀𝑖 ∈ (0...𝑚)(𝐺‘𝑗) ≠ (𝐺‘𝑖))
93	13, 92	jca 306	1 ⊢ (𝜑 → (𝐺:ℕ₀–onto→𝐴 ∧ ∀𝑚 ∈ ℕ₀ ∃𝑗 ∈ ℕ₀ ∀𝑖 ∈ (0...𝑚)(𝐺‘𝑗) ≠ (𝐺‘𝑖)))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ↔ wb 105 = wceq 1353 ∈ wcel 2148 ≠ wne 2347 ∀wral 2455 ∃wrex 2456 ⊆ wss 3129 class class class wbr 4003 ↦ cmpt 4064 suc csuc 4365 ωcom 4589 ^◡ccnv 4625 dom cdm 4626 “ cima 4629 ∘ ccom 4630 Fun wfun 5210 ⟶wf 5212 –onto→wfo 5214 –1-1-onto→wf1o 5215 ‘cfv 5216 (class class class)co 5874 freccfrec 6390 0cc0 7810 1c1 7811 + caddc 7813 ≤ cle 7992 ℕ₀cn0 9175 ℤcz 9252 ...cfz 10007

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 106 ax-ia2 107 ax-ia3 108 ax-in1 614 ax-in2 615 ax-io 709 ax-5 1447 ax-7 1448 ax-gen 1449 ax-ie1 1493 ax-ie2 1494 ax-8 1504 ax-10 1505 ax-11 1506 ax-i12 1507 ax-bndl 1509 ax-4 1510 ax-17 1526 ax-i9 1530 ax-ial 1534 ax-i5r 1535 ax-13 2150 ax-14 2151 ax-ext 2159 ax-coll 4118 ax-sep 4121 ax-nul 4129 ax-pow 4174 ax-pr 4209 ax-un 4433 ax-setind 4536 ax-iinf 4587 ax-cnex 7901 ax-resscn 7902 ax-1cn 7903 ax-1re 7904 ax-icn 7905 ax-addcl 7906 ax-addrcl 7907 ax-mulcl 7908 ax-addcom 7910 ax-addass 7912 ax-distr 7914 ax-i2m1 7915 ax-0lt1 7916 ax-0id 7918 ax-rnegex 7919 ax-cnre 7921 ax-pre-ltirr 7922 ax-pre-ltwlin 7923 ax-pre-lttrn 7924 ax-pre-ltadd 7926

This theorem depends on definitions: df-bi 117 df-3or 979 df-3an 980 df-tru 1356 df-fal 1359 df-nf 1461 df-sb 1763 df-eu 2029 df-mo 2030 df-clab 2164 df-cleq 2170 df-clel 2173 df-nfc 2308 df-ne 2348 df-nel 2443 df-ral 2460 df-rex 2461 df-reu 2462 df-rab 2464 df-v 2739 df-sbc 2963 df-csb 3058 df-dif 3131 df-un 3133 df-in 3135 df-ss 3142 df-nul 3423 df-pw 3577 df-sn 3598 df-pr 3599 df-op 3601 df-uni 3810 df-int 3845 df-iun 3888 df-br 4004 df-opab 4065 df-mpt 4066 df-tr 4102 df-id 4293 df-iord 4366 df-on 4368 df-ilim 4369 df-suc 4371 df-iom 4590 df-xp 4632 df-rel 4633 df-cnv 4634 df-co 4635 df-dm 4636 df-rn 4637 df-res 4638 df-ima 4639 df-iota 5178 df-fun 5218 df-fn 5219 df-f 5220 df-f1 5221 df-fo 5222 df-f1o 5223 df-fv 5224 df-riota 5830 df-ov 5877 df-oprab 5878 df-mpo 5879 df-recs 6305 df-frec 6391 df-pnf 7993 df-mnf 7994 df-xr 7995 df-ltxr 7996 df-le 7997 df-sub 8129 df-neg 8130 df-inn 8919 df-n0 9176 df-z 9253 df-uz 9528 df-fz 10008

This theorem is referenced by: ctinfom 12428

W3C validator