Theorem cnfcom 9636

Description: Any ordinal 𝐵 is equinumerous to the leading term of its Cantor normal form. Here we show that bijection explicitly. (Contributed by Mario Carneiro, 30-May-2015.) (Revised by AV, 3-Jul-2019.)

Hypotheses

Ref	Expression
cnfcom.s	⊢ 𝑆 = dom (ω CNF 𝐴)
cnfcom.a	⊢ (𝜑 → 𝐴 ∈ On)
cnfcom.b	⊢ (𝜑 → 𝐵 ∈ (ω ↑o 𝐴))
cnfcom.f	⊢ 𝐹 = (◡(ω CNF 𝐴)‘𝐵)
cnfcom.g	⊢ 𝐺 = OrdIso( E , (𝐹 supp ∅))
cnfcom.h	⊢ 𝐻 = seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (𝑀 +o 𝑧)), ∅)
cnfcom.t	⊢ 𝑇 = seqω((𝑘 ∈ V, 𝑓 ∈ V ↦ 𝐾), ∅)
cnfcom.m	⊢ 𝑀 = ((ω ↑o (𝐺‘𝑘)) ·o (𝐹‘(𝐺‘𝑘)))
cnfcom.k	⊢ 𝐾 = ((𝑥 ∈ 𝑀 ↦ (dom 𝑓 +o 𝑥)) ∪ ◡(𝑥 ∈ dom 𝑓 ↦ (𝑀 +o 𝑥)))
cnfcom.1	⊢ (𝜑 → 𝐼 ∈ dom 𝐺)

Assertion

Ref	Expression
cnfcom	⊢ (𝜑 → (𝑇‘suc 𝐼):(𝐻‘suc 𝐼)–1-1-onto→((ω ↑o (𝐺‘𝐼)) ·o (𝐹‘(𝐺‘𝐼))))

Distinct variable groups:   𝑥,𝑘,𝑧,𝐴   𝑘,𝐼,𝑥,𝑧   𝑥,𝑀   𝑓,𝑘,𝑥,𝑧,𝐹   𝑧,𝑇   𝑓,𝐺,𝑘,𝑥,𝑧   𝑓,𝐻,𝑥   𝑆,𝑘,𝑧

Allowed substitution hints:   𝜑(𝑥,𝑧,𝑓,𝑘)   𝐴(𝑓)   𝐵(𝑥,𝑧,𝑓,𝑘)   𝑆(𝑥,𝑓)   𝑇(𝑥,𝑓,𝑘)   𝐻(𝑧,𝑘)   𝐼(𝑓)   𝐾(𝑥,𝑧,𝑓,𝑘)   𝑀(𝑧,𝑓,𝑘)

Proof of Theorem cnfcom

Dummy variables 𝑤 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		cnfcom.1	. 2 ⊢ (𝜑 → 𝐼 ∈ dom 𝐺)
2		cnfcom.s	. . . . . 6 ⊢ 𝑆 = dom (ω CNF 𝐴)
3		omelon 9582	. . . . . . 7 ⊢ ω ∈ On
4	3	a1i 11	. . . . . 6 ⊢ (𝜑 → ω ∈ On)
5		cnfcom.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ On)
6		cnfcom.g	. . . . . 6 ⊢ 𝐺 = OrdIso( E , (𝐹 supp ∅))
7		cnfcom.f	. . . . . . 7 ⊢ 𝐹 = (◡(ω CNF 𝐴)‘𝐵)
8	2, 4, 5	cantnff1o 9632	. . . . . . . . 9 ⊢ (𝜑 → (ω CNF 𝐴):𝑆–1-1-onto→(ω ↑o 𝐴))
9		f1ocnv 6796	. . . . . . . . 9 ⊢ ((ω CNF 𝐴):𝑆–1-1-onto→(ω ↑o 𝐴) → ◡(ω CNF 𝐴):(ω ↑o 𝐴)–1-1-onto→𝑆)
10		f1of 6784	. . . . . . . . 9 ⊢ (◡(ω CNF 𝐴):(ω ↑o 𝐴)–1-1-onto→𝑆 → ◡(ω CNF 𝐴):(ω ↑o 𝐴)⟶𝑆)
11	8, 9, 10	3syl 18	. . . . . . . 8 ⊢ (𝜑 → ◡(ω CNF 𝐴):(ω ↑o 𝐴)⟶𝑆)
12		cnfcom.b	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ∈ (ω ↑o 𝐴))
13	11, 12	ffvelcdmd 7036	. . . . . . 7 ⊢ (𝜑 → (◡(ω CNF 𝐴)‘𝐵) ∈ 𝑆)
14	7, 13	eqeltrid 2842	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ 𝑆)
15	2, 4, 5, 6, 14	cantnfcl 9603	. . . . 5 ⊢ (𝜑 → ( E We (𝐹 supp ∅) ∧ dom 𝐺 ∈ ω))
16	15	simprd 496	. . . 4 ⊢ (𝜑 → dom 𝐺 ∈ ω)
17		elnn 7813	. . . 4 ⊢ ((𝐼 ∈ dom 𝐺 ∧ dom 𝐺 ∈ ω) → 𝐼 ∈ ω)
18	1, 16, 17	syl2anc 584	. . 3 ⊢ (𝜑 → 𝐼 ∈ ω)
19		eleq1 2825	. . . . . 6 ⊢ (𝑤 = 𝐼 → (𝑤 ∈ dom 𝐺 ↔ 𝐼 ∈ dom 𝐺))
20		suceq 6383	. . . . . . . 8 ⊢ (𝑤 = 𝐼 → suc 𝑤 = suc 𝐼)
21	20	fveq2d 6846	. . . . . . 7 ⊢ (𝑤 = 𝐼 → (𝑇‘suc 𝑤) = (𝑇‘suc 𝐼))
22	20	fveq2d 6846	. . . . . . 7 ⊢ (𝑤 = 𝐼 → (𝐻‘suc 𝑤) = (𝐻‘suc 𝐼))
23		fveq2 6842	. . . . . . . . 9 ⊢ (𝑤 = 𝐼 → (𝐺‘𝑤) = (𝐺‘𝐼))
24	23	oveq2d 7373	. . . . . . . 8 ⊢ (𝑤 = 𝐼 → (ω ↑o (𝐺‘𝑤)) = (ω ↑o (𝐺‘𝐼)))
25		2fveq3 6847	. . . . . . . 8 ⊢ (𝑤 = 𝐼 → (𝐹‘(𝐺‘𝑤)) = (𝐹‘(𝐺‘𝐼)))
26	24, 25	oveq12d 7375	. . . . . . 7 ⊢ (𝑤 = 𝐼 → ((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))) = ((ω ↑o (𝐺‘𝐼)) ·o (𝐹‘(𝐺‘𝐼))))
27	21, 22, 26	f1oeq123d 6778	. . . . . 6 ⊢ (𝑤 = 𝐼 → ((𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))) ↔ (𝑇‘suc 𝐼):(𝐻‘suc 𝐼)–1-1-onto→((ω ↑o (𝐺‘𝐼)) ·o (𝐹‘(𝐺‘𝐼)))))
28	19, 27	imbi12d 344	. . . . 5 ⊢ (𝑤 = 𝐼 → ((𝑤 ∈ dom 𝐺 → (𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤)))) ↔ (𝐼 ∈ dom 𝐺 → (𝑇‘suc 𝐼):(𝐻‘suc 𝐼)–1-1-onto→((ω ↑o (𝐺‘𝐼)) ·o (𝐹‘(𝐺‘𝐼))))))
29	28	imbi2d 340	. . . 4 ⊢ (𝑤 = 𝐼 → ((𝜑 → (𝑤 ∈ dom 𝐺 → (𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))))) ↔ (𝜑 → (𝐼 ∈ dom 𝐺 → (𝑇‘suc 𝐼):(𝐻‘suc 𝐼)–1-1-onto→((ω ↑o (𝐺‘𝐼)) ·o (𝐹‘(𝐺‘𝐼)))))))
30		eleq1 2825	. . . . . 6 ⊢ (𝑤 = ∅ → (𝑤 ∈ dom 𝐺 ↔ ∅ ∈ dom 𝐺))
31		suceq 6383	. . . . . . . 8 ⊢ (𝑤 = ∅ → suc 𝑤 = suc ∅)
32	31	fveq2d 6846	. . . . . . 7 ⊢ (𝑤 = ∅ → (𝑇‘suc 𝑤) = (𝑇‘suc ∅))
33	31	fveq2d 6846	. . . . . . 7 ⊢ (𝑤 = ∅ → (𝐻‘suc 𝑤) = (𝐻‘suc ∅))
34		fveq2 6842	. . . . . . . . 9 ⊢ (𝑤 = ∅ → (𝐺‘𝑤) = (𝐺‘∅))
35	34	oveq2d 7373	. . . . . . . 8 ⊢ (𝑤 = ∅ → (ω ↑o (𝐺‘𝑤)) = (ω ↑o (𝐺‘∅)))
36		2fveq3 6847	. . . . . . . 8 ⊢ (𝑤 = ∅ → (𝐹‘(𝐺‘𝑤)) = (𝐹‘(𝐺‘∅)))
37	35, 36	oveq12d 7375	. . . . . . 7 ⊢ (𝑤 = ∅ → ((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))) = ((ω ↑o (𝐺‘∅)) ·o (𝐹‘(𝐺‘∅))))
38	32, 33, 37	f1oeq123d 6778	. . . . . 6 ⊢ (𝑤 = ∅ → ((𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))) ↔ (𝑇‘suc ∅):(𝐻‘suc ∅)–1-1-onto→((ω ↑o (𝐺‘∅)) ·o (𝐹‘(𝐺‘∅)))))
39	30, 38	imbi12d 344	. . . . 5 ⊢ (𝑤 = ∅ → ((𝑤 ∈ dom 𝐺 → (𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤)))) ↔ (∅ ∈ dom 𝐺 → (𝑇‘suc ∅):(𝐻‘suc ∅)–1-1-onto→((ω ↑o (𝐺‘∅)) ·o (𝐹‘(𝐺‘∅))))))
40		eleq1 2825	. . . . . 6 ⊢ (𝑤 = 𝑦 → (𝑤 ∈ dom 𝐺 ↔ 𝑦 ∈ dom 𝐺))
41		suceq 6383	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → suc 𝑤 = suc 𝑦)
42	41	fveq2d 6846	. . . . . . 7 ⊢ (𝑤 = 𝑦 → (𝑇‘suc 𝑤) = (𝑇‘suc 𝑦))
43	41	fveq2d 6846	. . . . . . 7 ⊢ (𝑤 = 𝑦 → (𝐻‘suc 𝑤) = (𝐻‘suc 𝑦))
44		fveq2 6842	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → (𝐺‘𝑤) = (𝐺‘𝑦))
45	44	oveq2d 7373	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → (ω ↑o (𝐺‘𝑤)) = (ω ↑o (𝐺‘𝑦)))
46		2fveq3 6847	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → (𝐹‘(𝐺‘𝑤)) = (𝐹‘(𝐺‘𝑦)))
47	45, 46	oveq12d 7375	. . . . . . 7 ⊢ (𝑤 = 𝑦 → ((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))) = ((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))
48	42, 43, 47	f1oeq123d 6778	. . . . . 6 ⊢ (𝑤 = 𝑦 → ((𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))) ↔ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦)))))
49	40, 48	imbi12d 344	. . . . 5 ⊢ (𝑤 = 𝑦 → ((𝑤 ∈ dom 𝐺 → (𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤)))) ↔ (𝑦 ∈ dom 𝐺 → (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))))
50		eleq1 2825	. . . . . 6 ⊢ (𝑤 = suc 𝑦 → (𝑤 ∈ dom 𝐺 ↔ suc 𝑦 ∈ dom 𝐺))
51		suceq 6383	. . . . . . . 8 ⊢ (𝑤 = suc 𝑦 → suc 𝑤 = suc suc 𝑦)
52	51	fveq2d 6846	. . . . . . 7 ⊢ (𝑤 = suc 𝑦 → (𝑇‘suc 𝑤) = (𝑇‘suc suc 𝑦))
53	51	fveq2d 6846	. . . . . . 7 ⊢ (𝑤 = suc 𝑦 → (𝐻‘suc 𝑤) = (𝐻‘suc suc 𝑦))
54		fveq2 6842	. . . . . . . . 9 ⊢ (𝑤 = suc 𝑦 → (𝐺‘𝑤) = (𝐺‘suc 𝑦))
55	54	oveq2d 7373	. . . . . . . 8 ⊢ (𝑤 = suc 𝑦 → (ω ↑o (𝐺‘𝑤)) = (ω ↑o (𝐺‘suc 𝑦)))
56		2fveq3 6847	. . . . . . . 8 ⊢ (𝑤 = suc 𝑦 → (𝐹‘(𝐺‘𝑤)) = (𝐹‘(𝐺‘suc 𝑦)))
57	55, 56	oveq12d 7375	. . . . . . 7 ⊢ (𝑤 = suc 𝑦 → ((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))) = ((ω ↑o (𝐺‘suc 𝑦)) ·o (𝐹‘(𝐺‘suc 𝑦))))
58	52, 53, 57	f1oeq123d 6778	. . . . . 6 ⊢ (𝑤 = suc 𝑦 → ((𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))) ↔ (𝑇‘suc suc 𝑦):(𝐻‘suc suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘suc 𝑦)) ·o (𝐹‘(𝐺‘suc 𝑦)))))
59	50, 58	imbi12d 344	. . . . 5 ⊢ (𝑤 = suc 𝑦 → ((𝑤 ∈ dom 𝐺 → (𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤)))) ↔ (suc 𝑦 ∈ dom 𝐺 → (𝑇‘suc suc 𝑦):(𝐻‘suc suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘suc 𝑦)) ·o (𝐹‘(𝐺‘suc 𝑦))))))
60	5	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → 𝐴 ∈ On)
61	12	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → 𝐵 ∈ (ω ↑o 𝐴))
62		cnfcom.h	. . . . . . 7 ⊢ 𝐻 = seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (𝑀 +o 𝑧)), ∅)
63		cnfcom.t	. . . . . . 7 ⊢ 𝑇 = seqω((𝑘 ∈ V, 𝑓 ∈ V ↦ 𝐾), ∅)
64		cnfcom.m	. . . . . . 7 ⊢ 𝑀 = ((ω ↑o (𝐺‘𝑘)) ·o (𝐹‘(𝐺‘𝑘)))
65		cnfcom.k	. . . . . . 7 ⊢ 𝐾 = ((𝑥 ∈ 𝑀 ↦ (dom 𝑓 +o 𝑥)) ∪ ◡(𝑥 ∈ dom 𝑓 ↦ (𝑀 +o 𝑥)))
66		simpr 485	. . . . . . 7 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ∅ ∈ dom 𝐺)
67	3	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ω ∈ On)
68		suppssdm 8108	. . . . . . . . . . 11 ⊢ (𝐹 supp ∅) ⊆ dom 𝐹
69	2, 4, 5	cantnfs 9602	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹 ∈ 𝑆 ↔ (𝐹:𝐴⟶ω ∧ 𝐹 finSupp ∅)))
70	14, 69	mpbid 231	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐹:𝐴⟶ω ∧ 𝐹 finSupp ∅))
71	70	simpld 495	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:𝐴⟶ω)
72	68, 71	fssdm 6688	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ 𝐴)
73		onss 7719	. . . . . . . . . . 11 ⊢ (𝐴 ∈ On → 𝐴 ⊆ On)
74	5, 73	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ⊆ On)
75	72, 74	sstrd 3954	. . . . . . . . 9 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ On)
76	6	oif 9466	. . . . . . . . . 10 ⊢ 𝐺:dom 𝐺⟶(𝐹 supp ∅)
77	76	ffvelcdmi 7034	. . . . . . . . 9 ⊢ (∅ ∈ dom 𝐺 → (𝐺‘∅) ∈ (𝐹 supp ∅))
78		ssel2 3939	. . . . . . . . 9 ⊢ (((𝐹 supp ∅) ⊆ On ∧ (𝐺‘∅) ∈ (𝐹 supp ∅)) → (𝐺‘∅) ∈ On)
79	75, 77, 78	syl2an 596	. . . . . . . 8 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐺‘∅) ∈ On)
80		peano1 7825	. . . . . . . . 9 ⊢ ∅ ∈ ω
81	80	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ∅ ∈ ω)
82		oen0 8533	. . . . . . . 8 ⊢ (((ω ∈ On ∧ (𝐺‘∅) ∈ On) ∧ ∅ ∈ ω) → ∅ ∈ (ω ↑o (𝐺‘∅)))
83	67, 79, 81, 82	syl21anc 836	. . . . . . 7 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ∅ ∈ (ω ↑o (𝐺‘∅)))
84		0ex 5264	. . . . . . . . 9 ⊢ ∅ ∈ V
85	63	seqom0g 8402	. . . . . . . . 9 ⊢ (∅ ∈ V → (𝑇‘∅) = ∅)
86	84, 85	ax-mp 5	. . . . . . . 8 ⊢ (𝑇‘∅) = ∅
87		f1o0 6821	. . . . . . . . . 10 ⊢ ∅:∅–1-1-onto→∅
88	62	seqom0g 8402	. . . . . . . . . . 11 ⊢ (∅ ∈ V → (𝐻‘∅) = ∅)
89		f1oeq2 6773	. . . . . . . . . . 11 ⊢ ((𝐻‘∅) = ∅ → (∅:(𝐻‘∅)–1-1-onto→∅ ↔ ∅:∅–1-1-onto→∅))
90	84, 88, 89	mp2b 10	. . . . . . . . . 10 ⊢ (∅:(𝐻‘∅)–1-1-onto→∅ ↔ ∅:∅–1-1-onto→∅)
91	87, 90	mpbir 230	. . . . . . . . 9 ⊢ ∅:(𝐻‘∅)–1-1-onto→∅
92		f1oeq1 6772	. . . . . . . . 9 ⊢ ((𝑇‘∅) = ∅ → ((𝑇‘∅):(𝐻‘∅)–1-1-onto→∅ ↔ ∅:(𝐻‘∅)–1-1-onto→∅))
93	91, 92	mpbiri 257	. . . . . . . 8 ⊢ ((𝑇‘∅) = ∅ → (𝑇‘∅):(𝐻‘∅)–1-1-onto→∅)
94	86, 93	mp1i 13	. . . . . . 7 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝑇‘∅):(𝐻‘∅)–1-1-onto→∅)
95	2, 60, 61, 7, 6, 62, 63, 64, 65, 66, 83, 94	cnfcomlem 9635	. . . . . 6 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝑇‘suc ∅):(𝐻‘suc ∅)–1-1-onto→((ω ↑o (𝐺‘∅)) ·o (𝐹‘(𝐺‘∅))))
96	95	ex 413	. . . . 5 ⊢ (𝜑 → (∅ ∈ dom 𝐺 → (𝑇‘suc ∅):(𝐻‘suc ∅)–1-1-onto→((ω ↑o (𝐺‘∅)) ·o (𝐹‘(𝐺‘∅)))))
97	6	oicl 9465	. . . . . . . . . 10 ⊢ Ord dom 𝐺
98		ordtr 6331	. . . . . . . . . 10 ⊢ (Ord dom 𝐺 → Tr dom 𝐺)
99	97, 98	ax-mp 5	. . . . . . . . 9 ⊢ Tr dom 𝐺
100		trsuc 6404	. . . . . . . . 9 ⊢ ((Tr dom 𝐺 ∧ suc 𝑦 ∈ dom 𝐺) → 𝑦 ∈ dom 𝐺)
101	99, 100	mpan 688	. . . . . . . 8 ⊢ (suc 𝑦 ∈ dom 𝐺 → 𝑦 ∈ dom 𝐺)
102	101	imim1i 63	. . . . . . 7 ⊢ ((𝑦 ∈ dom 𝐺 → (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦)))) → (suc 𝑦 ∈ dom 𝐺 → (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦)))))
103	5	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → 𝐴 ∈ On)
104	12	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → 𝐵 ∈ (ω ↑o 𝐴))
105		simprl 769	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → suc 𝑦 ∈ dom 𝐺)
106	74	ad2antrr 724	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → 𝐴 ⊆ On)
107	72	ad2antrr 724	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐹 supp ∅) ⊆ 𝐴)
108	76	ffvelcdmi 7034	. . . . . . . . . . . . . . . . 17 ⊢ (suc 𝑦 ∈ dom 𝐺 → (𝐺‘suc 𝑦) ∈ (𝐹 supp ∅))
109	108	ad2antrl 726	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐺‘suc 𝑦) ∈ (𝐹 supp ∅))
110	107, 109	sseldd 3945	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐺‘suc 𝑦) ∈ 𝐴)
111	106, 110	sseldd 3945	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐺‘suc 𝑦) ∈ On)
112		eloni 6327	. . . . . . . . . . . . . 14 ⊢ ((𝐺‘suc 𝑦) ∈ On → Ord (𝐺‘suc 𝑦))
113	111, 112	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → Ord (𝐺‘suc 𝑦))
114		vex 3449	. . . . . . . . . . . . . . 15 ⊢ 𝑦 ∈ V
115	114	sucid 6399	. . . . . . . . . . . . . 14 ⊢ 𝑦 ∈ suc 𝑦
116		ovexd 7392	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝐹 supp ∅) ∈ V)
117	15	simpld 495	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → E We (𝐹 supp ∅))
118	6	oiiso 9473	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐹 supp ∅) ∈ V ∧ E We (𝐹 supp ∅)) → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
119	116, 117, 118	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
120	119	ad2antrr 724	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
121	101	ad2antrl 726	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → 𝑦 ∈ dom 𝐺)
122		isorel 7271	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)) ∧ (𝑦 ∈ dom 𝐺 ∧ suc 𝑦 ∈ dom 𝐺)) → (𝑦 E suc 𝑦 ↔ (𝐺‘𝑦) E (𝐺‘suc 𝑦)))
123	120, 121, 105, 122	syl12anc 835	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝑦 E suc 𝑦 ↔ (𝐺‘𝑦) E (𝐺‘suc 𝑦)))
124	114	sucex 7741	. . . . . . . . . . . . . . . 16 ⊢ suc 𝑦 ∈ V
125	124	epeli 5539	. . . . . . . . . . . . . . 15 ⊢ (𝑦 E suc 𝑦 ↔ 𝑦 ∈ suc 𝑦)
126		fvex 6855	. . . . . . . . . . . . . . . 16 ⊢ (𝐺‘suc 𝑦) ∈ V
127	126	epeli 5539	. . . . . . . . . . . . . . 15 ⊢ ((𝐺‘𝑦) E (𝐺‘suc 𝑦) ↔ (𝐺‘𝑦) ∈ (𝐺‘suc 𝑦))
128	123, 125, 127	3bitr3g 312	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝑦 ∈ suc 𝑦 ↔ (𝐺‘𝑦) ∈ (𝐺‘suc 𝑦)))
129	115, 128	mpbii 232	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐺‘𝑦) ∈ (𝐺‘suc 𝑦))
130		ordsucss 7753	. . . . . . . . . . . . 13 ⊢ (Ord (𝐺‘suc 𝑦) → ((𝐺‘𝑦) ∈ (𝐺‘suc 𝑦) → suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦)))
131	113, 129, 130	sylc 65	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦))
132	76	ffvelcdmi 7034	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ dom 𝐺 → (𝐺‘𝑦) ∈ (𝐹 supp ∅))
133	121, 132	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐺‘𝑦) ∈ (𝐹 supp ∅))
134	107, 133	sseldd 3945	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐺‘𝑦) ∈ 𝐴)
135	106, 134	sseldd 3945	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐺‘𝑦) ∈ On)
136		onsuc 7746	. . . . . . . . . . . . . 14 ⊢ ((𝐺‘𝑦) ∈ On → suc (𝐺‘𝑦) ∈ On)
137	135, 136	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → suc (𝐺‘𝑦) ∈ On)
138	3	a1i 11	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → ω ∈ On)
139	80	a1i 11	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → ∅ ∈ ω)
140		oewordi 8538	. . . . . . . . . . . . 13 ⊢ (((suc (𝐺‘𝑦) ∈ On ∧ (𝐺‘suc 𝑦) ∈ On ∧ ω ∈ On) ∧ ∅ ∈ ω) → (suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦) → (ω ↑o suc (𝐺‘𝑦)) ⊆ (ω ↑o (𝐺‘suc 𝑦))))
141	137, 111, 138, 139, 140	syl31anc 1373	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦) → (ω ↑o suc (𝐺‘𝑦)) ⊆ (ω ↑o (𝐺‘suc 𝑦))))
142	131, 141	mpd 15	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (ω ↑o suc (𝐺‘𝑦)) ⊆ (ω ↑o (𝐺‘suc 𝑦)))
143	71	ad2antrr 724	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → 𝐹:𝐴⟶ω)
144	143, 134	ffvelcdmd 7036	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐹‘(𝐺‘𝑦)) ∈ ω)
145		nnon 7808	. . . . . . . . . . . . . . 15 ⊢ ((𝐹‘(𝐺‘𝑦)) ∈ ω → (𝐹‘(𝐺‘𝑦)) ∈ On)
146	144, 145	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝐹‘(𝐺‘𝑦)) ∈ On)
147		oecl 8483	. . . . . . . . . . . . . . 15 ⊢ ((ω ∈ On ∧ (𝐺‘𝑦) ∈ On) → (ω ↑o (𝐺‘𝑦)) ∈ On)
148	138, 135, 147	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (ω ↑o (𝐺‘𝑦)) ∈ On)
149		oen0 8533	. . . . . . . . . . . . . . 15 ⊢ (((ω ∈ On ∧ (𝐺‘𝑦) ∈ On) ∧ ∅ ∈ ω) → ∅ ∈ (ω ↑o (𝐺‘𝑦)))
150	138, 135, 139, 149	syl21anc 836	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → ∅ ∈ (ω ↑o (𝐺‘𝑦)))
151		omord2 8514	. . . . . . . . . . . . . 14 ⊢ ((((𝐹‘(𝐺‘𝑦)) ∈ On ∧ ω ∈ On ∧ (ω ↑o (𝐺‘𝑦)) ∈ On) ∧ ∅ ∈ (ω ↑o (𝐺‘𝑦))) → ((𝐹‘(𝐺‘𝑦)) ∈ ω ↔ ((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))) ∈ ((ω ↑o (𝐺‘𝑦)) ·o ω)))
152	146, 138, 148, 150, 151	syl31anc 1373	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → ((𝐹‘(𝐺‘𝑦)) ∈ ω ↔ ((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))) ∈ ((ω ↑o (𝐺‘𝑦)) ·o ω)))
153	144, 152	mpbid 231	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → ((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))) ∈ ((ω ↑o (𝐺‘𝑦)) ·o ω))
154		oesuc 8473	. . . . . . . . . . . . 13 ⊢ ((ω ∈ On ∧ (𝐺‘𝑦) ∈ On) → (ω ↑o suc (𝐺‘𝑦)) = ((ω ↑o (𝐺‘𝑦)) ·o ω))
155	138, 135, 154	syl2anc 584	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (ω ↑o suc (𝐺‘𝑦)) = ((ω ↑o (𝐺‘𝑦)) ·o ω))
156	153, 155	eleqtrrd 2841	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → ((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))) ∈ (ω ↑o suc (𝐺‘𝑦)))
157	142, 156	sseldd 3945	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → ((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))) ∈ (ω ↑o (𝐺‘suc 𝑦)))
158		simprr 771	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))
159	2, 103, 104, 7, 6, 62, 63, 64, 65, 105, 157, 158	cnfcomlem 9635	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))))) → (𝑇‘suc suc 𝑦):(𝐻‘suc suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘suc 𝑦)) ·o (𝐹‘(𝐺‘suc 𝑦))))
160	159	exp32 421	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (suc 𝑦 ∈ dom 𝐺 → ((𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦))) → (𝑇‘suc suc 𝑦):(𝐻‘suc suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘suc 𝑦)) ·o (𝐹‘(𝐺‘suc 𝑦))))))
161	160	a2d 29	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → ((suc 𝑦 ∈ dom 𝐺 → (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦)))) → (suc 𝑦 ∈ dom 𝐺 → (𝑇‘suc suc 𝑦):(𝐻‘suc suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘suc 𝑦)) ·o (𝐹‘(𝐺‘suc 𝑦))))))
162	102, 161	syl5 34	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → ((𝑦 ∈ dom 𝐺 → (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦)))) → (suc 𝑦 ∈ dom 𝐺 → (𝑇‘suc suc 𝑦):(𝐻‘suc suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘suc 𝑦)) ·o (𝐹‘(𝐺‘suc 𝑦))))))
163	162	expcom 414	. . . . 5 ⊢ (𝑦 ∈ ω → (𝜑 → ((𝑦 ∈ dom 𝐺 → (𝑇‘suc 𝑦):(𝐻‘suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘𝑦)) ·o (𝐹‘(𝐺‘𝑦)))) → (suc 𝑦 ∈ dom 𝐺 → (𝑇‘suc suc 𝑦):(𝐻‘suc suc 𝑦)–1-1-onto→((ω ↑o (𝐺‘suc 𝑦)) ·o (𝐹‘(𝐺‘suc 𝑦)))))))
164	39, 49, 59, 96, 163	finds2 7837	. . . 4 ⊢ (𝑤 ∈ ω → (𝜑 → (𝑤 ∈ dom 𝐺 → (𝑇‘suc 𝑤):(𝐻‘suc 𝑤)–1-1-onto→((ω ↑o (𝐺‘𝑤)) ·o (𝐹‘(𝐺‘𝑤))))))
165	29, 164	vtoclga 3534	. . 3 ⊢ (𝐼 ∈ ω → (𝜑 → (𝐼 ∈ dom 𝐺 → (𝑇‘suc 𝐼):(𝐻‘suc 𝐼)–1-1-onto→((ω ↑o (𝐺‘𝐼)) ·o (𝐹‘(𝐺‘𝐼))))))
166	18, 165	mpcom 38	. 2 ⊢ (𝜑 → (𝐼 ∈ dom 𝐺 → (𝑇‘suc 𝐼):(𝐻‘suc 𝐼)–1-1-onto→((ω ↑o (𝐺‘𝐼)) ·o (𝐹‘(𝐺‘𝐼)))))
167	1, 166	mpd 15	1 ⊢ (𝜑 → (𝑇‘suc 𝐼):(𝐻‘suc 𝐼)–1-1-onto→((ω ↑o (𝐺‘𝐼)) ·o (𝐹‘(𝐺‘𝐼))))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541   ∈ wcel 2106  Vcvv 3445   ∪ cun 3908   ⊆ wss 3910  ∅c0 4282   class class class wbr 5105   ↦ cmpt 5188  Tr wtr 5222   E cep 5536   We wwe 5587  ^◡ccnv 5632  dom cdm 5633  Ord word 6316  Oncon0 6317  suc csuc 6319  ⟶wf 6492  –1-1-onto→wf1o 6495  ‘cfv 6496   Isom wiso 6497  (class class class)co 7357   ∈ cmpo 7359  ωcom 7802   supp csupp 8092  seq_ωcseqom 8393   +_o coa 8409   ·_o comu 8410   ↑_o coe 8411   finSupp cfsupp 9305  OrdIsocoi 9445   CNF ccnf 9597

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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672  ax-inf2 9577

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-ral 3065  df-rex 3074  df-rmo 3353  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-pss 3929  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-int 4908  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-tr 5223  df-id 5531  df-eprel 5537  df-po 5545  df-so 5546  df-fr 5588  df-se 5589  df-we 5590  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-pred 6253  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-isom 6505  df-riota 7313  df-ov 7360  df-oprab 7361  df-mpo 7362  df-om 7803  df-1st 7921  df-2nd 7922  df-supp 8093  df-frecs 8212  df-wrecs 8243  df-recs 8317  df-rdg 8356  df-seqom 8394  df-1o 8412  df-2o 8413  df-oadd 8416  df-omul 8417  df-oexp 8418  df-er 8648  df-map 8767  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9306  df-oi 9446  df-cnf 9598

This theorem is referenced by:  cnfcom2  9638