cantnflt - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > cantnflt		Structured version Visualization version GIF version

Theorem cantnflt 9584

Description: An upper bound on the partial sums of the CNF function. Since each term dominates all previous terms, by induction we can bound the whole sum with any exponent 𝐴 ↑_o 𝐶 where 𝐶 is larger than any exponent (𝐺‘𝑥), 𝑥 ∈ 𝐾 which has been summed so far. (Contributed by Mario Carneiro, 28-May-2015.) (Revised by AV, 29-Jun-2019.)

**Hypotheses**
Ref	Expression
cantnfs.s	⊢ 𝑆 = dom (𝐴 CNF 𝐵)
cantnfs.a	⊢ (𝜑 → 𝐴 ∈ On)
cantnfs.b	⊢ (𝜑 → 𝐵 ∈ On)
cantnfcl.g	⊢ 𝐺 = OrdIso( E , (𝐹 supp ∅))
cantnfcl.f	⊢ (𝜑 → 𝐹 ∈ 𝑆)
cantnfval.h	⊢ 𝐻 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝐺‘𝑘)) ·_o (𝐹‘(𝐺‘𝑘))) +_o 𝑧)), ∅)
cantnflt.a	⊢ (𝜑 → ∅ ∈ 𝐴)
cantnflt.k	⊢ (𝜑 → 𝐾 ∈ suc dom 𝐺)
cantnflt.c	⊢ (𝜑 → 𝐶 ∈ On)
cantnflt.s	⊢ (𝜑 → (𝐺 “ 𝐾) ⊆ 𝐶)

**Assertion**
Ref	Expression
cantnflt	⊢ (𝜑 → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶))

Distinct variable groups: 𝑧,𝑘,𝐵 𝑧,𝐶 𝐴,𝑘,𝑧 𝑘,𝐹,𝑧 𝑆,𝑘,𝑧 𝑘,𝐺,𝑧 𝑘,𝐾,𝑧 𝜑,𝑘,𝑧 Allowed substitution hints: 𝐶(𝑘) 𝐻(𝑧,𝑘)

Proof of Theorem cantnflt Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		cantnfs.a	. . . 4 ⊢ (𝜑 → 𝐴 ∈ On)
2		cantnflt.c	. . . 4 ⊢ (𝜑 → 𝐶 ∈ On)
3		cantnflt.a	. . . 4 ⊢ (𝜑 → ∅ ∈ 𝐴)
4		oen0 8512	. . . 4 ⊢ (((𝐴 ∈ On ∧ 𝐶 ∈ On) ∧ ∅ ∈ 𝐴) → ∅ ∈ (𝐴 ↑_o 𝐶))
5	1, 2, 3, 4	syl21anc 843	. . 3 ⊢ (𝜑 → ∅ ∈ (𝐴 ↑_o 𝐶))
6		fveq2 6827	. . . . 5 ⊢ (𝐾 = ∅ → (𝐻‘𝐾) = (𝐻‘∅))
7		0ex 5229	. . . . . 6 ⊢ ∅ ∈ V
8		cantnfval.h	. . . . . . 7 ⊢ 𝐻 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝐺‘𝑘)) ·_o (𝐹‘(𝐺‘𝑘))) +_o 𝑧)), ∅)
9	8	seqom0g 8385	. . . . . 6 ⊢ (∅ ∈ V → (𝐻‘∅) = ∅)
10	7, 9	ax-mp 5	. . . . 5 ⊢ (𝐻‘∅) = ∅
11	6, 10	eqtrdi 2790	. . . 4 ⊢ (𝐾 = ∅ → (𝐻‘𝐾) = ∅)
12	11	eleq1d 2824	. . 3 ⊢ (𝐾 = ∅ → ((𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶) ↔ ∅ ∈ (𝐴 ↑_o 𝐶)))
13	5, 12	syl5ibrcom 248	. 2 ⊢ (𝜑 → (𝐾 = ∅ → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶)))
14	2	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐶 ∈ On)
15		eloni 6320	. . . . . . 7 ⊢ (𝐶 ∈ On → Ord 𝐶)
16	14, 15	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → Ord 𝐶)
17		cantnflt.s	. . . . . . . 8 ⊢ (𝜑 → (𝐺 “ 𝐾) ⊆ 𝐶)
18	17	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺 “ 𝐾) ⊆ 𝐶)
19		cantnfcl.g	. . . . . . . . . 10 ⊢ 𝐺 = OrdIso( E , (𝐹 supp ∅))
20	19	oif 9435	. . . . . . . . 9 ⊢ 𝐺:dom 𝐺⟶(𝐹 supp ∅)
21		ffn 6655	. . . . . . . . 9 ⊢ (𝐺:dom 𝐺⟶(𝐹 supp ∅) → 𝐺 Fn dom 𝐺)
22	20, 21	mp1i 13	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐺 Fn dom 𝐺)
23		cantnflt.k	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾 ∈ suc dom 𝐺)
24	19	oicl 9434	. . . . . . . . . . . . 13 ⊢ Ord dom 𝐺
25		ordsuc 7754	. . . . . . . . . . . . 13 ⊢ (Ord dom 𝐺 ↔ Ord suc dom 𝐺)
26	24, 25	mpbi 231	. . . . . . . . . . . 12 ⊢ Ord suc dom 𝐺
27		ordelon 6334	. . . . . . . . . . . 12 ⊢ ((Ord suc dom 𝐺 ∧ 𝐾 ∈ suc dom 𝐺) → 𝐾 ∈ On)
28	26, 23, 27	sylancr 593	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐾 ∈ On)
29		ordsssuc 6401	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ On ∧ Ord dom 𝐺) → (𝐾 ⊆ dom 𝐺 ↔ 𝐾 ∈ suc dom 𝐺))
30	28, 24, 29	sylancl 592	. . . . . . . . . 10 ⊢ (𝜑 → (𝐾 ⊆ dom 𝐺 ↔ 𝐾 ∈ suc dom 𝐺))
31	23, 30	mpbird 258	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ⊆ dom 𝐺)
32	31	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐾 ⊆ dom 𝐺)
33		vex 3435	. . . . . . . . . 10 ⊢ 𝑥 ∈ V
34	33	sucid 6394	. . . . . . . . 9 ⊢ 𝑥 ∈ suc 𝑥
35		simprr 778	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐾 = suc 𝑥)
36	34, 35	eleqtrrid 2846	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝑥 ∈ 𝐾)
37		fnfvima 7177	. . . . . . . 8 ⊢ ((𝐺 Fn dom 𝐺 ∧ 𝐾 ⊆ dom 𝐺 ∧ 𝑥 ∈ 𝐾) → (𝐺‘𝑥) ∈ (𝐺 “ 𝐾))
38	22, 32, 36, 37	syl3anc 1379	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺‘𝑥) ∈ (𝐺 “ 𝐾))
39	18, 38	sseldd 3916	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺‘𝑥) ∈ 𝐶)
40		ordsucss 7758	. . . . . 6 ⊢ (Ord 𝐶 → ((𝐺‘𝑥) ∈ 𝐶 → suc (𝐺‘𝑥) ⊆ 𝐶))
41	16, 39, 40	sylc 65	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → suc (𝐺‘𝑥) ⊆ 𝐶)
42		suppssdm 8117	. . . . . . . . . . 11 ⊢ (𝐹 supp ∅) ⊆ dom 𝐹
43		cantnfcl.f	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹 ∈ 𝑆)
44		cantnfs.s	. . . . . . . . . . . . . 14 ⊢ 𝑆 = dom (𝐴 CNF 𝐵)
45		cantnfs.b	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐵 ∈ On)
46	44, 1, 45	cantnfs 9578	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹 ∈ 𝑆 ↔ (𝐹:𝐵⟶𝐴 ∧ 𝐹 finSupp ∅)))
47	43, 46	mpbid 233	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐹:𝐵⟶𝐴 ∧ 𝐹 finSupp ∅))
48	47	simpld 495	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:𝐵⟶𝐴)
49	42, 48	fssdm 6674	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ 𝐵)
50		onss 7728	. . . . . . . . . . 11 ⊢ (𝐵 ∈ On → 𝐵 ⊆ On)
51	45, 50	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ⊆ On)
52	49, 51	sstrd 3925	. . . . . . . . 9 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ On)
53	52	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐹 supp ∅) ⊆ On)
54	23	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐾 ∈ suc dom 𝐺)
55	35, 54	eqeltrrd 2840	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → suc 𝑥 ∈ suc dom 𝐺)
56		ordsucelsuc 7762	. . . . . . . . . . 11 ⊢ (Ord dom 𝐺 → (𝑥 ∈ dom 𝐺 ↔ suc 𝑥 ∈ suc dom 𝐺))
57	24, 56	ax-mp 5	. . . . . . . . . 10 ⊢ (𝑥 ∈ dom 𝐺 ↔ suc 𝑥 ∈ suc dom 𝐺)
58	55, 57	sylibr 235	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝑥 ∈ dom 𝐺)
59	20	ffvelcdmi 7024	. . . . . . . . 9 ⊢ (𝑥 ∈ dom 𝐺 → (𝐺‘𝑥) ∈ (𝐹 supp ∅))
60	58, 59	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺‘𝑥) ∈ (𝐹 supp ∅))
61	53, 60	sseldd 3916	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺‘𝑥) ∈ On)
62		onsuc 7753	. . . . . . 7 ⊢ ((𝐺‘𝑥) ∈ On → suc (𝐺‘𝑥) ∈ On)
63	61, 62	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → suc (𝐺‘𝑥) ∈ On)
64	1	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐴 ∈ On)
65	3	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → ∅ ∈ 𝐴)
66		oewordi 8517	. . . . . 6 ⊢ (((suc (𝐺‘𝑥) ∈ On ∧ 𝐶 ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (suc (𝐺‘𝑥) ⊆ 𝐶 → (𝐴 ↑_o suc (𝐺‘𝑥)) ⊆ (𝐴 ↑_o 𝐶)))
67	63, 14, 64, 65, 66	syl31anc 1381	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (suc (𝐺‘𝑥) ⊆ 𝐶 → (𝐴 ↑_o suc (𝐺‘𝑥)) ⊆ (𝐴 ↑_o 𝐶)))
68	41, 67	mpd 15	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐴 ↑_o suc (𝐺‘𝑥)) ⊆ (𝐴 ↑_o 𝐶))
69	35	fveq2d 6831	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐻‘𝐾) = (𝐻‘suc 𝑥))
70		simprl 776	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝑥 ∈ ω)
71		simpl 483	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝜑)
72		eleq1 2827	. . . . . . . 8 ⊢ (𝑥 = ∅ → (𝑥 ∈ dom 𝐺 ↔ ∅ ∈ dom 𝐺))
73		suceq 6378	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → suc 𝑥 = suc ∅)
74	73	fveq2d 6831	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝐻‘suc 𝑥) = (𝐻‘suc ∅))
75		fveq2 6827	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → (𝐺‘𝑥) = (𝐺‘∅))
76		suceq 6378	. . . . . . . . . . 11 ⊢ ((𝐺‘𝑥) = (𝐺‘∅) → suc (𝐺‘𝑥) = suc (𝐺‘∅))
77	75, 76	syl 17	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → suc (𝐺‘𝑥) = suc (𝐺‘∅))
78	77	oveq2d 7372	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝐴 ↑_o suc (𝐺‘𝑥)) = (𝐴 ↑_o suc (𝐺‘∅)))
79	74, 78	eleq12d 2833	. . . . . . . 8 ⊢ (𝑥 = ∅ → ((𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)) ↔ (𝐻‘suc ∅) ∈ (𝐴 ↑_o suc (𝐺‘∅))))
80	72, 79	imbi12d 345	. . . . . . 7 ⊢ (𝑥 = ∅ → ((𝑥 ∈ dom 𝐺 → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥))) ↔ (∅ ∈ dom 𝐺 → (𝐻‘suc ∅) ∈ (𝐴 ↑_o suc (𝐺‘∅)))))
81		eleq1 2827	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ dom 𝐺 ↔ 𝑦 ∈ dom 𝐺))
82		suceq 6378	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → suc 𝑥 = suc 𝑦)
83	82	fveq2d 6831	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝐻‘suc 𝑥) = (𝐻‘suc 𝑦))
84		fveq2 6827	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝐺‘𝑥) = (𝐺‘𝑦))
85		suceq 6378	. . . . . . . . . . 11 ⊢ ((𝐺‘𝑥) = (𝐺‘𝑦) → suc (𝐺‘𝑥) = suc (𝐺‘𝑦))
86	84, 85	syl 17	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → suc (𝐺‘𝑥) = suc (𝐺‘𝑦))
87	86	oveq2d 7372	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝐴 ↑_o suc (𝐺‘𝑥)) = (𝐴 ↑_o suc (𝐺‘𝑦)))
88	83, 87	eleq12d 2833	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)) ↔ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))))
89	81, 88	imbi12d 345	. . . . . . 7 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ dom 𝐺 → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥))) ↔ (𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))))
90		eleq1 2827	. . . . . . . 8 ⊢ (𝑥 = suc 𝑦 → (𝑥 ∈ dom 𝐺 ↔ suc 𝑦 ∈ dom 𝐺))
91		suceq 6378	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → suc 𝑥 = suc suc 𝑦)
92	91	fveq2d 6831	. . . . . . . . 9 ⊢ (𝑥 = suc 𝑦 → (𝐻‘suc 𝑥) = (𝐻‘suc suc 𝑦))
93		fveq2 6827	. . . . . . . . . . 11 ⊢ (𝑥 = suc 𝑦 → (𝐺‘𝑥) = (𝐺‘suc 𝑦))
94		suceq 6378	. . . . . . . . . . 11 ⊢ ((𝐺‘𝑥) = (𝐺‘suc 𝑦) → suc (𝐺‘𝑥) = suc (𝐺‘suc 𝑦))
95	93, 94	syl 17	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → suc (𝐺‘𝑥) = suc (𝐺‘suc 𝑦))
96	95	oveq2d 7372	. . . . . . . . 9 ⊢ (𝑥 = suc 𝑦 → (𝐴 ↑_o suc (𝐺‘𝑥)) = (𝐴 ↑_o suc (𝐺‘suc 𝑦)))
97	92, 96	eleq12d 2833	. . . . . . . 8 ⊢ (𝑥 = suc 𝑦 → ((𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)) ↔ (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦))))
98	90, 97	imbi12d 345	. . . . . . 7 ⊢ (𝑥 = suc 𝑦 → ((𝑥 ∈ dom 𝐺 → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥))) ↔ (suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))))
99	48	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → 𝐹:𝐵⟶𝐴)
100	20	ffvelcdmi 7024	. . . . . . . . . . . 12 ⊢ (∅ ∈ dom 𝐺 → (𝐺‘∅) ∈ (𝐹 supp ∅))
101	49	sselda 3915	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝐺‘∅) ∈ (𝐹 supp ∅)) → (𝐺‘∅) ∈ 𝐵)
102	100, 101	sylan2 599	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐺‘∅) ∈ 𝐵)
103	99, 102	ffvelcdmd 7026	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐹‘(𝐺‘∅)) ∈ 𝐴)
104	1	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → 𝐴 ∈ On)
105		onelon 6335	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ On ∧ (𝐹‘(𝐺‘∅)) ∈ 𝐴) → (𝐹‘(𝐺‘∅)) ∈ On)
106	104, 103, 105	syl2anc 590	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐹‘(𝐺‘∅)) ∈ On)
107	52	sselda 3915	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝐺‘∅) ∈ (𝐹 supp ∅)) → (𝐺‘∅) ∈ On)
108	100, 107	sylan2 599	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐺‘∅) ∈ On)
109		oecl 8462	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ On ∧ (𝐺‘∅) ∈ On) → (𝐴 ↑_o (𝐺‘∅)) ∈ On)
110	104, 108, 109	syl2anc 590	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐴 ↑_o (𝐺‘∅)) ∈ On)
111	3	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ∅ ∈ 𝐴)
112		oen0 8512	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ On ∧ (𝐺‘∅) ∈ On) ∧ ∅ ∈ 𝐴) → ∅ ∈ (𝐴 ↑_o (𝐺‘∅)))
113	104, 108, 111, 112	syl21anc 843	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ∅ ∈ (𝐴 ↑_o (𝐺‘∅)))
114		omord2 8492	. . . . . . . . . . 11 ⊢ ((((𝐹‘(𝐺‘∅)) ∈ On ∧ 𝐴 ∈ On ∧ (𝐴 ↑_o (𝐺‘∅)) ∈ On) ∧ ∅ ∈ (𝐴 ↑_o (𝐺‘∅))) → ((𝐹‘(𝐺‘∅)) ∈ 𝐴 ↔ ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴)))
115	106, 104, 110, 113, 114	syl31anc 1381	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ((𝐹‘(𝐺‘∅)) ∈ 𝐴 ↔ ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴)))
116	103, 115	mpbid 233	. . . . . . . . 9 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴))
117		peano1 7829	. . . . . . . . . . . 12 ⊢ ∅ ∈ ω
118	117	a1i 11	. . . . . . . . . . 11 ⊢ (∅ ∈ dom 𝐺 → ∅ ∈ ω)
119	44, 1, 45, 19, 43, 8	cantnfsuc 9582	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ ω) → (𝐻‘suc ∅) = (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o (𝐻‘∅)))
120	118, 119	sylan2 599	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐻‘suc ∅) = (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o (𝐻‘∅)))
121	10	oveq2i 7367	. . . . . . . . . . 11 ⊢ (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o (𝐻‘∅)) = (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o ∅)
122		omcl 8461	. . . . . . . . . . . . 13 ⊢ (((𝐴 ↑_o (𝐺‘∅)) ∈ On ∧ (𝐹‘(𝐺‘∅)) ∈ On) → ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ On)
123	110, 106, 122	syl2anc 590	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ On)
124		oa0 8441	. . . . . . . . . . . 12 ⊢ (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ On → (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o ∅) = ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))))
125	123, 124	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o ∅) = ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))))
126	121, 125	eqtrid 2786	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o (𝐻‘∅)) = ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))))
127	120, 126	eqtrd 2774	. . . . . . . . 9 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐻‘suc ∅) = ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))))
128		oesuc 8452	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ (𝐺‘∅) ∈ On) → (𝐴 ↑_o suc (𝐺‘∅)) = ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴))
129	104, 108, 128	syl2anc 590	. . . . . . . . 9 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐴 ↑_o suc (𝐺‘∅)) = ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴))
130	116, 127, 129	3eltr4d 2854	. . . . . . . 8 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐻‘suc ∅) ∈ (𝐴 ↑_o suc (𝐺‘∅)))
131	130	ex 413	. . . . . . 7 ⊢ (𝜑 → (∅ ∈ dom 𝐺 → (𝐻‘suc ∅) ∈ (𝐴 ↑_o suc (𝐺‘∅))))
132		ordtr 6324	. . . . . . . . . . . 12 ⊢ (Ord dom 𝐺 → Tr dom 𝐺)
133	24, 132	ax-mp 5	. . . . . . . . . . 11 ⊢ Tr dom 𝐺
134		trsuc 6399	. . . . . . . . . . 11 ⊢ ((Tr dom 𝐺 ∧ suc 𝑦 ∈ dom 𝐺) → 𝑦 ∈ dom 𝐺)
135	133, 134	mpan 696	. . . . . . . . . 10 ⊢ (suc 𝑦 ∈ dom 𝐺 → 𝑦 ∈ dom 𝐺)
136	135	imim1i 63	. . . . . . . . 9 ⊢ ((𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))) → (suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))))
137	1	ad2antrr 732	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → 𝐴 ∈ On)
138		eloni 6320	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ On → Ord 𝐴)
139	137, 138	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → Ord 𝐴)
140	48	ad2antrr 732	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → 𝐹:𝐵⟶𝐴)
141	49	ad2antrr 732	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐹 supp ∅) ⊆ 𝐵)
142	20	ffvelcdmi 7024	. . . . . . . . . . . . . . . . . 18 ⊢ (suc 𝑦 ∈ dom 𝐺 → (𝐺‘suc 𝑦) ∈ (𝐹 supp ∅))
143	142	ad2antrl 734	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘suc 𝑦) ∈ (𝐹 supp ∅))
144	141, 143	sseldd 3916	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘suc 𝑦) ∈ 𝐵)
145	140, 144	ffvelcdmd 7026	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐹‘(𝐺‘suc 𝑦)) ∈ 𝐴)
146		ordsucss 7758	. . . . . . . . . . . . . . 15 ⊢ (Ord 𝐴 → ((𝐹‘(𝐺‘suc 𝑦)) ∈ 𝐴 → suc (𝐹‘(𝐺‘suc 𝑦)) ⊆ 𝐴))
147	139, 145, 146	sylc 65	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc (𝐹‘(𝐺‘suc 𝑦)) ⊆ 𝐴)
148		onelon 6335	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ On ∧ (𝐹‘(𝐺‘suc 𝑦)) ∈ 𝐴) → (𝐹‘(𝐺‘suc 𝑦)) ∈ On)
149	137, 145, 148	syl2anc 590	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐹‘(𝐺‘suc 𝑦)) ∈ On)
150		onsuc 7753	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹‘(𝐺‘suc 𝑦)) ∈ On → suc (𝐹‘(𝐺‘suc 𝑦)) ∈ On)
151	149, 150	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc (𝐹‘(𝐺‘suc 𝑦)) ∈ On)
152	52	ad2antrr 732	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐹 supp ∅) ⊆ On)
153	152, 143	sseldd 3916	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘suc 𝑦) ∈ On)
154		oecl 8462	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ On ∧ (𝐺‘suc 𝑦) ∈ On) → (𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On)
155	137, 153, 154	syl2anc 590	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On)
156		omwordi 8496	. . . . . . . . . . . . . . 15 ⊢ ((suc (𝐹‘(𝐺‘suc 𝑦)) ∈ On ∧ 𝐴 ∈ On ∧ (𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On) → (suc (𝐹‘(𝐺‘suc 𝑦)) ⊆ 𝐴 → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) ⊆ ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o 𝐴)))
157	151, 137, 155, 156	syl3anc 1379	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (suc (𝐹‘(𝐺‘suc 𝑦)) ⊆ 𝐴 → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) ⊆ ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o 𝐴)))
158	147, 157	mpd 15	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) ⊆ ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o 𝐴))
159		oesuc 8452	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ On ∧ (𝐺‘suc 𝑦) ∈ On) → (𝐴 ↑_o suc (𝐺‘suc 𝑦)) = ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o 𝐴))
160	137, 153, 159	syl2anc 590	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐴 ↑_o suc (𝐺‘suc 𝑦)) = ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o 𝐴))
161	158, 160	sseqtrrd 3952	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) ⊆ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))
162		eloni 6320	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐺‘suc 𝑦) ∈ On → Ord (𝐺‘suc 𝑦))
163	153, 162	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → Ord (𝐺‘suc 𝑦))
164		vex 3435	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑦 ∈ V
165	164	sucid 6394	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝑦 ∈ suc 𝑦
166	164	sucex 7749	. . . . . . . . . . . . . . . . . . . . 21 ⊢ suc 𝑦 ∈ V
167	166	epeli 5520	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 E suc 𝑦 ↔ 𝑦 ∈ suc 𝑦)
168	165, 167	mpbir 232	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑦 E suc 𝑦
169		ovexd 7391	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝐹 supp ∅) ∈ V)
170	44, 1, 45, 19, 43	cantnfcl 9579	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → ( E We (𝐹 supp ∅) ∧ dom 𝐺 ∈ ω))
171	170	simpld 495	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → E We (𝐹 supp ∅))
172	19	oiiso 9442	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝐹 supp ∅) ∈ V ∧ E We (𝐹 supp ∅)) → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
173	169, 171, 172	syl2anc 590	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
174	173	ad2antrr 732	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
175	135	ad2antrl 734	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → 𝑦 ∈ dom 𝐺)
176		simprl 776	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc 𝑦 ∈ dom 𝐺)
177		isorel 7270	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)) ∧ (𝑦 ∈ dom 𝐺 ∧ suc 𝑦 ∈ dom 𝐺)) → (𝑦 E suc 𝑦 ↔ (𝐺‘𝑦) E (𝐺‘suc 𝑦)))
178	174, 175, 176, 177	syl12anc 842	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝑦 E suc 𝑦 ↔ (𝐺‘𝑦) E (𝐺‘suc 𝑦)))
179	168, 178	mpbii 234	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘𝑦) E (𝐺‘suc 𝑦))
180		fvex 6840	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐺‘suc 𝑦) ∈ V
181	180	epeli 5520	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐺‘𝑦) E (𝐺‘suc 𝑦) ↔ (𝐺‘𝑦) ∈ (𝐺‘suc 𝑦))
182	179, 181	sylib 219	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘𝑦) ∈ (𝐺‘suc 𝑦))
183		ordsucss 7758	. . . . . . . . . . . . . . . . 17 ⊢ (Ord (𝐺‘suc 𝑦) → ((𝐺‘𝑦) ∈ (𝐺‘suc 𝑦) → suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦)))
184	163, 182, 183	sylc 65	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦))
185	20	ffvelcdmi 7024	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 ∈ dom 𝐺 → (𝐺‘𝑦) ∈ (𝐹 supp ∅))
186	175, 185	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘𝑦) ∈ (𝐹 supp ∅))
187	152, 186	sseldd 3916	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘𝑦) ∈ On)
188		onsuc 7753	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐺‘𝑦) ∈ On → suc (𝐺‘𝑦) ∈ On)
189	187, 188	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc (𝐺‘𝑦) ∈ On)
190	3	ad2antrr 732	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ∅ ∈ 𝐴)
191		oewordi 8517	. . . . . . . . . . . . . . . . 17 ⊢ (((suc (𝐺‘𝑦) ∈ On ∧ (𝐺‘suc 𝑦) ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦) → (𝐴 ↑_o suc (𝐺‘𝑦)) ⊆ (𝐴 ↑_o (𝐺‘suc 𝑦))))
192	189, 153, 137, 190, 191	syl31anc 1381	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦) → (𝐴 ↑_o suc (𝐺‘𝑦)) ⊆ (𝐴 ↑_o (𝐺‘suc 𝑦))))
193	184, 192	mpd 15	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐴 ↑_o suc (𝐺‘𝑦)) ⊆ (𝐴 ↑_o (𝐺‘suc 𝑦)))
194		simprr 778	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))
195	193, 194	sseldd 3916	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o (𝐺‘suc 𝑦)))
196		peano2 7830	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ω → suc 𝑦 ∈ ω)
197	196	ad2antlr 733	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc 𝑦 ∈ ω)
198	8	cantnfvalf 9577	. . . . . . . . . . . . . . . . 17 ⊢ 𝐻:ω⟶On
199	198	ffvelcdmi 7024	. . . . . . . . . . . . . . . 16 ⊢ (suc 𝑦 ∈ ω → (𝐻‘suc 𝑦) ∈ On)
200	197, 199	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc 𝑦) ∈ On)
201		omcl 8461	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On ∧ (𝐹‘(𝐺‘suc 𝑦)) ∈ On) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) ∈ On)
202	155, 149, 201	syl2anc 590	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) ∈ On)
203		oaord 8472	. . . . . . . . . . . . . . 15 ⊢ (((𝐻‘suc 𝑦) ∈ On ∧ (𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On ∧ ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) ∈ On) → ((𝐻‘suc 𝑦) ∈ (𝐴 ↑_o (𝐺‘suc 𝑦)) ↔ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)) ∈ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐴 ↑_o (𝐺‘suc 𝑦)))))
204	200, 155, 202, 203	syl3anc 1379	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ((𝐻‘suc 𝑦) ∈ (𝐴 ↑_o (𝐺‘suc 𝑦)) ↔ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)) ∈ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐴 ↑_o (𝐺‘suc 𝑦)))))
205	195, 204	mpbid 233	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)) ∈ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐴 ↑_o (𝐺‘suc 𝑦))))
206	44, 1, 45, 19, 43, 8	cantnfsuc 9582	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ suc 𝑦 ∈ ω) → (𝐻‘suc suc 𝑦) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)))
207	196, 206	sylan2 599	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (𝐻‘suc suc 𝑦) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)))
208	207	adantr 481	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc suc 𝑦) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)))
209		omsuc 8451	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On ∧ (𝐹‘(𝐺‘suc 𝑦)) ∈ On) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐴 ↑_o (𝐺‘suc 𝑦))))
210	155, 149, 209	syl2anc 590	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐴 ↑_o (𝐺‘suc 𝑦))))
211	205, 208, 210	3eltr4d 2854	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc suc 𝑦) ∈ ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))))
212	161, 211	sseldd 3916	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))
213	212	exp32 421	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (suc 𝑦 ∈ dom 𝐺 → ((𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)) → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))))
214	213	a2d 29	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → ((suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))) → (suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))))
215	136, 214	syl5 34	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → ((𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))) → (suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))))
216	215	expcom 414	. . . . . . 7 ⊢ (𝑦 ∈ ω → (𝜑 → ((𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))) → (suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦))))))
217	80, 89, 98, 131, 216	finds2 7838	. . . . . 6 ⊢ (𝑥 ∈ ω → (𝜑 → (𝑥 ∈ dom 𝐺 → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)))))
218	70, 71, 58, 217	syl3c 66	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)))
219	69, 218	eqeltrd 2839	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐻‘𝐾) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)))
220	68, 219	sseldd 3916	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶))
221	220	rexlimdvaa 3141	. 2 ⊢ (𝜑 → (∃𝑥 ∈ ω 𝐾 = suc 𝑥 → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶)))
222		peano2 7830	. . . . 5 ⊢ (dom 𝐺 ∈ ω → suc dom 𝐺 ∈ ω)
223	170, 222	simpl2im 508	. . . 4 ⊢ (𝜑 → suc dom 𝐺 ∈ ω)
224		elnn 7817	. . . 4 ⊢ ((𝐾 ∈ suc dom 𝐺 ∧ suc dom 𝐺 ∈ ω) → 𝐾 ∈ ω)
225	23, 223, 224	syl2anc 590	. . 3 ⊢ (𝜑 → 𝐾 ∈ ω)
226		nn0suc 7834	. . 3 ⊢ (𝐾 ∈ ω → (𝐾 = ∅ ∨ ∃𝑥 ∈ ω 𝐾 = suc 𝑥))
227	225, 226	syl 17	. 2 ⊢ (𝜑 → (𝐾 = ∅ ∨ ∃𝑥 ∈ ω 𝐾 = suc 𝑥))
228	13, 221, 227	mpjaod 866	1 ⊢ (𝜑 → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 207 ∧ wa 396 ∨ wo 853 = wceq 1547 ∈ wcel 2119 ∃wrex 3063 Vcvv 3431 ⊆ wss 3883 ∅c0 4261 class class class wbr 5072 Tr wtr 5179 E cep 5517 We wwe 5570 dom cdm 5618 “ cima 5621 Ord word 6309 Oncon0 6310 suc csuc 6312 Fn wfn 6480 ⟶wf 6481 ‘cfv 6485 Isom wiso 6486 (class class class)co 7356 ∈ cmpo 7358 ωcom 7806 supp csupp 8100 seq_ωcseqom 8376 +_o coa 8392 ·_o comu 8393 ↑_o coe 8394 finSupp cfsupp 9264 OrdIsocoi 9414 CNF ccnf 9573

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-10 2152 ax-11 2168 ax-12 2189 ax-ext 2711 ax-rep 5199 ax-sep 5218 ax-nul 5228 ax-pow 5294 ax-pr 5362 ax-un 7678

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3or 1093 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-nf 1791 df-sb 2074 df-mo 2543 df-eu 2573 df-clab 2718 df-cleq 2731 df-clel 2814 df-nfc 2888 df-ne 2935 df-ral 3054 df-rex 3064 df-rmo 3344 df-reu 3345 df-rab 3392 df-v 3433 df-sbc 3724 df-csb 3832 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3903 df-nul 4262 df-if 4455 df-pw 4531 df-sn 4556 df-pr 4558 df-op 4562 df-uni 4839 df-iun 4923 df-br 5073 df-opab 5135 df-mpt 5154 df-tr 5180 df-id 5513 df-eprel 5518 df-po 5526 df-so 5527 df-fr 5571 df-se 5572 df-we 5573 df-xp 5624 df-rel 5625 df-cnv 5626 df-co 5627 df-dm 5628 df-rn 5629 df-res 5630 df-ima 5631 df-pred 6252 df-ord 6313 df-on 6314 df-lim 6315 df-suc 6316 df-iota 6441 df-fun 6487 df-fn 6488 df-f 6489 df-f1 6490 df-fo 6491 df-f1o 6492 df-fv 6493 df-isom 6494 df-riota 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-om 7807 df-1st 7931 df-2nd 7932 df-supp 8101 df-frecs 8221 df-wrecs 8252 df-recs 8301 df-rdg 8339 df-seqom 8377 df-1o 8395 df-2o 8396 df-oadd 8399 df-omul 8400 df-oexp 8401 df-map 8765 df-en 8884 df-dom 8885 df-sdom 8886 df-fin 8887 df-fsupp 9265 df-oi 9415 df-cnf 9574

This theorem is referenced by: cantnflt2 9585 cnfcomlem 9611

W3C validator