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 9627

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 8556	. . . 4 ⊢ (((𝐴 ∈ On ∧ 𝐶 ∈ On) ∧ ∅ ∈ 𝐴) → ∅ ∈ (𝐴 ↑_o 𝐶))
5	1, 2, 3, 4	syl21anc 848	. . 3 ⊢ (𝜑 → ∅ ∈ (𝐴 ↑_o 𝐶))
6		fveq2 6867	. . . . 5 ⊢ (𝐾 = ∅ → (𝐻‘𝐾) = (𝐻‘∅))
7		0ex 5257	. . . . . 6 ⊢ ∅ ∈ V
8		cantnfval.h	. . . . . . 7 ⊢ 𝐻 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝐺‘𝑘)) ·_o (𝐹‘(𝐺‘𝑘))) +_o 𝑧)), ∅)
9	8	seqom0g 8427	. . . . . 6 ⊢ (∅ ∈ V → (𝐻‘∅) = ∅)
10	7, 9	ax-mp 5	. . . . 5 ⊢ (𝐻‘∅) = ∅
11	6, 10	eqtrdi 2813	. . . 4 ⊢ (𝐾 = ∅ → (𝐻‘𝐾) = ∅)
12	11	eleq1d 2847	. . 3 ⊢ (𝐾 = ∅ → ((𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶) ↔ ∅ ∈ (𝐴 ↑_o 𝐶)))
13	5, 12	syl5ibrcom 249	. 2 ⊢ (𝜑 → (𝐾 = ∅ → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶)))
14	2	adantr 484	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐶 ∈ On)
15		eloni 6356	. . . . . . 7 ⊢ (𝐶 ∈ On → Ord 𝐶)
16	14, 15	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → Ord 𝐶)
17		cantnflt.s	. . . . . . . 8 ⊢ (𝜑 → (𝐺 “ 𝐾) ⊆ 𝐶)
18	17	adantr 484	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺 “ 𝐾) ⊆ 𝐶)
19		cantnfcl.g	. . . . . . . . . 10 ⊢ 𝐺 = OrdIso( E , (𝐹 supp ∅))
20	19	oif 9478	. . . . . . . . 9 ⊢ 𝐺:dom 𝐺⟶(𝐹 supp ∅)
21		ffn 6691	. . . . . . . . 9 ⊢ (𝐺:dom 𝐺⟶(𝐹 supp ∅) → 𝐺 Fn dom 𝐺)
22	20, 21	mp1i 13	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐺 Fn dom 𝐺)
23		cantnflt.k	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾 ∈ suc dom 𝐺)
24	19	oicl 9477	. . . . . . . . . . . . 13 ⊢ Ord dom 𝐺
25		ordsuc 7794	. . . . . . . . . . . . 13 ⊢ (Ord dom 𝐺 ↔ Ord suc dom 𝐺)
26	24, 25	mpbi 232	. . . . . . . . . . . 12 ⊢ Ord suc dom 𝐺
27		ordelon 6370	. . . . . . . . . . . 12 ⊢ ((Ord suc dom 𝐺 ∧ 𝐾 ∈ suc dom 𝐺) → 𝐾 ∈ On)
28	26, 23, 27	sylancr 596	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐾 ∈ On)
29		ordsssuc 6437	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ On ∧ Ord dom 𝐺) → (𝐾 ⊆ dom 𝐺 ↔ 𝐾 ∈ suc dom 𝐺))
30	28, 24, 29	sylancl 595	. . . . . . . . . 10 ⊢ (𝜑 → (𝐾 ⊆ dom 𝐺 ↔ 𝐾 ∈ suc dom 𝐺))
31	23, 30	mpbird 259	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ⊆ dom 𝐺)
32	31	adantr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐾 ⊆ dom 𝐺)
33		vex 3458	. . . . . . . . . 10 ⊢ 𝑥 ∈ V
34	33	sucid 6430	. . . . . . . . 9 ⊢ 𝑥 ∈ suc 𝑥
35		simprr 782	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐾 = suc 𝑥)
36	34, 35	eleqtrrid 2869	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝑥 ∈ 𝐾)
37		fnfvima 7217	. . . . . . . 8 ⊢ ((𝐺 Fn dom 𝐺 ∧ 𝐾 ⊆ dom 𝐺 ∧ 𝑥 ∈ 𝐾) → (𝐺‘𝑥) ∈ (𝐺 “ 𝐾))
38	22, 32, 36, 37	syl3anc 1390	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺‘𝑥) ∈ (𝐺 “ 𝐾))
39	18, 38	sseldd 3937	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺‘𝑥) ∈ 𝐶)
40		ordsucss 7798	. . . . . 6 ⊢ (Ord 𝐶 → ((𝐺‘𝑥) ∈ 𝐶 → suc (𝐺‘𝑥) ⊆ 𝐶))
41	16, 39, 40	sylc 65	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → suc (𝐺‘𝑥) ⊆ 𝐶)
42		suppssdm 8157	. . . . . . . . . . 11 ⊢ (𝐹 supp ∅) ⊆ dom 𝐹
43		cantnfcl.f	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹 ∈ 𝑆)
44		cantnfs.s	. . . . . . . . . . . . . 14 ⊢ 𝑆 = dom (𝐴 CNF 𝐵)
45		cantnfs.b	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐵 ∈ On)
46	44, 1, 45	cantnfs 9621	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹 ∈ 𝑆 ↔ (𝐹:𝐵⟶𝐴 ∧ 𝐹 finSupp ∅)))
47	43, 46	mpbid 234	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐹:𝐵⟶𝐴 ∧ 𝐹 finSupp ∅))
48	47	simpld 498	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:𝐵⟶𝐴)
49	42, 48	fssdm 6711	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ 𝐵)
50		onss 7768	. . . . . . . . . . 11 ⊢ (𝐵 ∈ On → 𝐵 ⊆ On)
51	45, 50	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ⊆ On)
52	49, 51	sstrd 3946	. . . . . . . . 9 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ On)
53	52	adantr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐹 supp ∅) ⊆ On)
54	23	adantr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐾 ∈ suc dom 𝐺)
55	35, 54	eqeltrrd 2863	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → suc 𝑥 ∈ suc dom 𝐺)
56		ordsucelsuc 7802	. . . . . . . . . . 11 ⊢ (Ord dom 𝐺 → (𝑥 ∈ dom 𝐺 ↔ suc 𝑥 ∈ suc dom 𝐺))
57	24, 56	ax-mp 5	. . . . . . . . . 10 ⊢ (𝑥 ∈ dom 𝐺 ↔ suc 𝑥 ∈ suc dom 𝐺)
58	55, 57	sylibr 236	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝑥 ∈ dom 𝐺)
59	20	ffvelcdmi 7064	. . . . . . . . 9 ⊢ (𝑥 ∈ dom 𝐺 → (𝐺‘𝑥) ∈ (𝐹 supp ∅))
60	58, 59	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺‘𝑥) ∈ (𝐹 supp ∅))
61	53, 60	sseldd 3937	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐺‘𝑥) ∈ On)
62		onsuc 7793	. . . . . . 7 ⊢ ((𝐺‘𝑥) ∈ On → suc (𝐺‘𝑥) ∈ On)
63	61, 62	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → suc (𝐺‘𝑥) ∈ On)
64	1	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝐴 ∈ On)
65	3	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → ∅ ∈ 𝐴)
66		oewordi 8561	. . . . . 6 ⊢ (((suc (𝐺‘𝑥) ∈ On ∧ 𝐶 ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (suc (𝐺‘𝑥) ⊆ 𝐶 → (𝐴 ↑_o suc (𝐺‘𝑥)) ⊆ (𝐴 ↑_o 𝐶)))
67	63, 14, 64, 65, 66	syl31anc 1392	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (suc (𝐺‘𝑥) ⊆ 𝐶 → (𝐴 ↑_o suc (𝐺‘𝑥)) ⊆ (𝐴 ↑_o 𝐶)))
68	41, 67	mpd 15	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐴 ↑_o suc (𝐺‘𝑥)) ⊆ (𝐴 ↑_o 𝐶))
69	35	fveq2d 6871	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐻‘𝐾) = (𝐻‘suc 𝑥))
70		simprl 780	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝑥 ∈ ω)
71		simpl 486	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → 𝜑)
72		eleq1 2850	. . . . . . . 8 ⊢ (𝑥 = ∅ → (𝑥 ∈ dom 𝐺 ↔ ∅ ∈ dom 𝐺))
73		suceq 6414	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → suc 𝑥 = suc ∅)
74	73	fveq2d 6871	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝐻‘suc 𝑥) = (𝐻‘suc ∅))
75		fveq2 6867	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → (𝐺‘𝑥) = (𝐺‘∅))
76		suceq 6414	. . . . . . . . . . 11 ⊢ ((𝐺‘𝑥) = (𝐺‘∅) → suc (𝐺‘𝑥) = suc (𝐺‘∅))
77	75, 76	syl 17	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → suc (𝐺‘𝑥) = suc (𝐺‘∅))
78	77	oveq2d 7412	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝐴 ↑_o suc (𝐺‘𝑥)) = (𝐴 ↑_o suc (𝐺‘∅)))
79	74, 78	eleq12d 2856	. . . . . . . 8 ⊢ (𝑥 = ∅ → ((𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)) ↔ (𝐻‘suc ∅) ∈ (𝐴 ↑_o suc (𝐺‘∅))))
80	72, 79	imbi12d 346	. . . . . . 7 ⊢ (𝑥 = ∅ → ((𝑥 ∈ dom 𝐺 → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥))) ↔ (∅ ∈ dom 𝐺 → (𝐻‘suc ∅) ∈ (𝐴 ↑_o suc (𝐺‘∅)))))
81		eleq1 2850	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ dom 𝐺 ↔ 𝑦 ∈ dom 𝐺))
82		suceq 6414	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → suc 𝑥 = suc 𝑦)
83	82	fveq2d 6871	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝐻‘suc 𝑥) = (𝐻‘suc 𝑦))
84		fveq2 6867	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝐺‘𝑥) = (𝐺‘𝑦))
85		suceq 6414	. . . . . . . . . . 11 ⊢ ((𝐺‘𝑥) = (𝐺‘𝑦) → suc (𝐺‘𝑥) = suc (𝐺‘𝑦))
86	84, 85	syl 17	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → suc (𝐺‘𝑥) = suc (𝐺‘𝑦))
87	86	oveq2d 7412	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝐴 ↑_o suc (𝐺‘𝑥)) = (𝐴 ↑_o suc (𝐺‘𝑦)))
88	83, 87	eleq12d 2856	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)) ↔ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))))
89	81, 88	imbi12d 346	. . . . . . 7 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ dom 𝐺 → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥))) ↔ (𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))))
90		eleq1 2850	. . . . . . . 8 ⊢ (𝑥 = suc 𝑦 → (𝑥 ∈ dom 𝐺 ↔ suc 𝑦 ∈ dom 𝐺))
91		suceq 6414	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → suc 𝑥 = suc suc 𝑦)
92	91	fveq2d 6871	. . . . . . . . 9 ⊢ (𝑥 = suc 𝑦 → (𝐻‘suc 𝑥) = (𝐻‘suc suc 𝑦))
93		fveq2 6867	. . . . . . . . . . 11 ⊢ (𝑥 = suc 𝑦 → (𝐺‘𝑥) = (𝐺‘suc 𝑦))
94		suceq 6414	. . . . . . . . . . 11 ⊢ ((𝐺‘𝑥) = (𝐺‘suc 𝑦) → suc (𝐺‘𝑥) = suc (𝐺‘suc 𝑦))
95	93, 94	syl 17	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → suc (𝐺‘𝑥) = suc (𝐺‘suc 𝑦))
96	95	oveq2d 7412	. . . . . . . . 9 ⊢ (𝑥 = suc 𝑦 → (𝐴 ↑_o suc (𝐺‘𝑥)) = (𝐴 ↑_o suc (𝐺‘suc 𝑦)))
97	92, 96	eleq12d 2856	. . . . . . . 8 ⊢ (𝑥 = suc 𝑦 → ((𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)) ↔ (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦))))
98	90, 97	imbi12d 346	. . . . . . 7 ⊢ (𝑥 = suc 𝑦 → ((𝑥 ∈ dom 𝐺 → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥))) ↔ (suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))))
99	48	adantr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → 𝐹:𝐵⟶𝐴)
100	20	ffvelcdmi 7064	. . . . . . . . . . . 12 ⊢ (∅ ∈ dom 𝐺 → (𝐺‘∅) ∈ (𝐹 supp ∅))
101	49	sselda 3936	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝐺‘∅) ∈ (𝐹 supp ∅)) → (𝐺‘∅) ∈ 𝐵)
102	100, 101	sylan2 602	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐺‘∅) ∈ 𝐵)
103	99, 102	ffvelcdmd 7066	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐹‘(𝐺‘∅)) ∈ 𝐴)
104	1	adantr 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → 𝐴 ∈ On)
105		onelon 6371	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ On ∧ (𝐹‘(𝐺‘∅)) ∈ 𝐴) → (𝐹‘(𝐺‘∅)) ∈ On)
106	104, 103, 105	syl2anc 593	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐹‘(𝐺‘∅)) ∈ On)
107	52	sselda 3936	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝐺‘∅) ∈ (𝐹 supp ∅)) → (𝐺‘∅) ∈ On)
108	100, 107	sylan2 602	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐺‘∅) ∈ On)
109		oecl 8506	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ On ∧ (𝐺‘∅) ∈ On) → (𝐴 ↑_o (𝐺‘∅)) ∈ On)
110	104, 108, 109	syl2anc 593	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐴 ↑_o (𝐺‘∅)) ∈ On)
111	3	adantr 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ∅ ∈ 𝐴)
112		oen0 8556	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ On ∧ (𝐺‘∅) ∈ On) ∧ ∅ ∈ 𝐴) → ∅ ∈ (𝐴 ↑_o (𝐺‘∅)))
113	104, 108, 111, 112	syl21anc 848	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ∅ ∈ (𝐴 ↑_o (𝐺‘∅)))
114		omord2 8536	. . . . . . . . . . 11 ⊢ ((((𝐹‘(𝐺‘∅)) ∈ On ∧ 𝐴 ∈ On ∧ (𝐴 ↑_o (𝐺‘∅)) ∈ On) ∧ ∅ ∈ (𝐴 ↑_o (𝐺‘∅))) → ((𝐹‘(𝐺‘∅)) ∈ 𝐴 ↔ ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴)))
115	106, 104, 110, 113, 114	syl31anc 1392	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ((𝐹‘(𝐺‘∅)) ∈ 𝐴 ↔ ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴)))
116	103, 115	mpbid 234	. . . . . . . . 9 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴))
117		peano1 7869	. . . . . . . . . . . 12 ⊢ ∅ ∈ ω
118	117	a1i 11	. . . . . . . . . . 11 ⊢ (∅ ∈ dom 𝐺 → ∅ ∈ ω)
119	44, 1, 45, 19, 43, 8	cantnfsuc 9625	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ∅ ∈ ω) → (𝐻‘suc ∅) = (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o (𝐻‘∅)))
120	118, 119	sylan2 602	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐻‘suc ∅) = (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o (𝐻‘∅)))
121	10	oveq2i 7407	. . . . . . . . . . 11 ⊢ (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o (𝐻‘∅)) = (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o ∅)
122		omcl 8505	. . . . . . . . . . . . 13 ⊢ (((𝐴 ↑_o (𝐺‘∅)) ∈ On ∧ (𝐹‘(𝐺‘∅)) ∈ On) → ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ On)
123	110, 106, 122	syl2anc 593	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) ∈ On)
124		oa0 8485	. . . . . . . . . . . 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 2809	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))) +_o (𝐻‘∅)) = ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))))
127	120, 126	eqtrd 2797	. . . . . . . . 9 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐻‘suc ∅) = ((𝐴 ↑_o (𝐺‘∅)) ·_o (𝐹‘(𝐺‘∅))))
128		oesuc 8496	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ (𝐺‘∅) ∈ On) → (𝐴 ↑_o suc (𝐺‘∅)) = ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴))
129	104, 108, 128	syl2anc 593	. . . . . . . . 9 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐴 ↑_o suc (𝐺‘∅)) = ((𝐴 ↑_o (𝐺‘∅)) ·_o 𝐴))
130	116, 127, 129	3eltr4d 2877	. . . . . . . 8 ⊢ ((𝜑 ∧ ∅ ∈ dom 𝐺) → (𝐻‘suc ∅) ∈ (𝐴 ↑_o suc (𝐺‘∅)))
131	130	ex 416	. . . . . . 7 ⊢ (𝜑 → (∅ ∈ dom 𝐺 → (𝐻‘suc ∅) ∈ (𝐴 ↑_o suc (𝐺‘∅))))
132		ordtr 6360	. . . . . . . . . . . 12 ⊢ (Ord dom 𝐺 → Tr dom 𝐺)
133	24, 132	ax-mp 5	. . . . . . . . . . 11 ⊢ Tr dom 𝐺
134		trsuc 6435	. . . . . . . . . . 11 ⊢ ((Tr dom 𝐺 ∧ suc 𝑦 ∈ dom 𝐺) → 𝑦 ∈ dom 𝐺)
135	133, 134	mpan 700	. . . . . . . . . 10 ⊢ (suc 𝑦 ∈ dom 𝐺 → 𝑦 ∈ dom 𝐺)
136	135	imim1i 63	. . . . . . . . 9 ⊢ ((𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))) → (suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))))
137	1	ad2antrr 736	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → 𝐴 ∈ On)
138		eloni 6356	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ On → Ord 𝐴)
139	137, 138	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → Ord 𝐴)
140	48	ad2antrr 736	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → 𝐹:𝐵⟶𝐴)
141	49	ad2antrr 736	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐹 supp ∅) ⊆ 𝐵)
142	20	ffvelcdmi 7064	. . . . . . . . . . . . . . . . . 18 ⊢ (suc 𝑦 ∈ dom 𝐺 → (𝐺‘suc 𝑦) ∈ (𝐹 supp ∅))
143	142	ad2antrl 738	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘suc 𝑦) ∈ (𝐹 supp ∅))
144	141, 143	sseldd 3937	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘suc 𝑦) ∈ 𝐵)
145	140, 144	ffvelcdmd 7066	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐹‘(𝐺‘suc 𝑦)) ∈ 𝐴)
146		ordsucss 7798	. . . . . . . . . . . . . . 15 ⊢ (Ord 𝐴 → ((𝐹‘(𝐺‘suc 𝑦)) ∈ 𝐴 → suc (𝐹‘(𝐺‘suc 𝑦)) ⊆ 𝐴))
147	139, 145, 146	sylc 65	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc (𝐹‘(𝐺‘suc 𝑦)) ⊆ 𝐴)
148		onelon 6371	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ On ∧ (𝐹‘(𝐺‘suc 𝑦)) ∈ 𝐴) → (𝐹‘(𝐺‘suc 𝑦)) ∈ On)
149	137, 145, 148	syl2anc 593	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐹‘(𝐺‘suc 𝑦)) ∈ On)
150		onsuc 7793	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹‘(𝐺‘suc 𝑦)) ∈ On → suc (𝐹‘(𝐺‘suc 𝑦)) ∈ On)
151	149, 150	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc (𝐹‘(𝐺‘suc 𝑦)) ∈ On)
152	52	ad2antrr 736	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐹 supp ∅) ⊆ On)
153	152, 143	sseldd 3937	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘suc 𝑦) ∈ On)
154		oecl 8506	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ On ∧ (𝐺‘suc 𝑦) ∈ On) → (𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On)
155	137, 153, 154	syl2anc 593	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On)
156		omwordi 8540	. . . . . . . . . . . . . . 15 ⊢ ((suc (𝐹‘(𝐺‘suc 𝑦)) ∈ On ∧ 𝐴 ∈ On ∧ (𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On) → (suc (𝐹‘(𝐺‘suc 𝑦)) ⊆ 𝐴 → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) ⊆ ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o 𝐴)))
157	151, 137, 155, 156	syl3anc 1390	. . . . . . . . . . . . . 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 8496	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ On ∧ (𝐺‘suc 𝑦) ∈ On) → (𝐴 ↑_o suc (𝐺‘suc 𝑦)) = ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o 𝐴))
160	137, 153, 159	syl2anc 593	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐴 ↑_o suc (𝐺‘suc 𝑦)) = ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o 𝐴))
161	158, 160	sseqtrrd 3973	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) ⊆ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))
162		eloni 6356	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐺‘suc 𝑦) ∈ On → Ord (𝐺‘suc 𝑦))
163	153, 162	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → Ord (𝐺‘suc 𝑦))
164		vex 3458	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑦 ∈ V
165	164	sucid 6430	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝑦 ∈ suc 𝑦
166	164	sucex 7789	. . . . . . . . . . . . . . . . . . . . 21 ⊢ suc 𝑦 ∈ V
167	166	epeli 5549	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 E suc 𝑦 ↔ 𝑦 ∈ suc 𝑦)
168	165, 167	mpbir 233	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑦 E suc 𝑦
169		ovexd 7431	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝐹 supp ∅) ∈ V)
170	44, 1, 45, 19, 43	cantnfcl 9622	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → ( E We (𝐹 supp ∅) ∧ dom 𝐺 ∈ ω))
171	170	simpld 498	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → E We (𝐹 supp ∅))
172	19	oiiso 9485	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝐹 supp ∅) ∈ V ∧ E We (𝐹 supp ∅)) → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
173	169, 171, 172	syl2anc 593	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
174	173	ad2antrr 736	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → 𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)))
175	135	ad2antrl 738	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → 𝑦 ∈ dom 𝐺)
176		simprl 780	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc 𝑦 ∈ dom 𝐺)
177		isorel 7310	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐺 Isom E , E (dom 𝐺, (𝐹 supp ∅)) ∧ (𝑦 ∈ dom 𝐺 ∧ suc 𝑦 ∈ dom 𝐺)) → (𝑦 E suc 𝑦 ↔ (𝐺‘𝑦) E (𝐺‘suc 𝑦)))
178	174, 175, 176, 177	syl12anc 847	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝑦 E suc 𝑦 ↔ (𝐺‘𝑦) E (𝐺‘suc 𝑦)))
179	168, 178	mpbii 235	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘𝑦) E (𝐺‘suc 𝑦))
180		fvex 6880	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐺‘suc 𝑦) ∈ V
181	180	epeli 5549	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐺‘𝑦) E (𝐺‘suc 𝑦) ↔ (𝐺‘𝑦) ∈ (𝐺‘suc 𝑦))
182	179, 181	sylib 220	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘𝑦) ∈ (𝐺‘suc 𝑦))
183		ordsucss 7798	. . . . . . . . . . . . . . . . 17 ⊢ (Ord (𝐺‘suc 𝑦) → ((𝐺‘𝑦) ∈ (𝐺‘suc 𝑦) → suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦)))
184	163, 182, 183	sylc 65	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦))
185	20	ffvelcdmi 7064	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 ∈ dom 𝐺 → (𝐺‘𝑦) ∈ (𝐹 supp ∅))
186	175, 185	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘𝑦) ∈ (𝐹 supp ∅))
187	152, 186	sseldd 3937	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐺‘𝑦) ∈ On)
188		onsuc 7793	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐺‘𝑦) ∈ On → suc (𝐺‘𝑦) ∈ On)
189	187, 188	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc (𝐺‘𝑦) ∈ On)
190	3	ad2antrr 736	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ∅ ∈ 𝐴)
191		oewordi 8561	. . . . . . . . . . . . . . . . 17 ⊢ (((suc (𝐺‘𝑦) ∈ On ∧ (𝐺‘suc 𝑦) ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (suc (𝐺‘𝑦) ⊆ (𝐺‘suc 𝑦) → (𝐴 ↑_o suc (𝐺‘𝑦)) ⊆ (𝐴 ↑_o (𝐺‘suc 𝑦))))
192	189, 153, 137, 190, 191	syl31anc 1392	. . . . . . . . . . . . . . . 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 782	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))
195	193, 194	sseldd 3937	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o (𝐺‘suc 𝑦)))
196		peano2 7870	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ω → suc 𝑦 ∈ ω)
197	196	ad2antlr 737	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → suc 𝑦 ∈ ω)
198	8	cantnfvalf 9620	. . . . . . . . . . . . . . . . 17 ⊢ 𝐻:ω⟶On
199	198	ffvelcdmi 7064	. . . . . . . . . . . . . . . 16 ⊢ (suc 𝑦 ∈ ω → (𝐻‘suc 𝑦) ∈ On)
200	197, 199	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc 𝑦) ∈ On)
201		omcl 8505	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On ∧ (𝐹‘(𝐺‘suc 𝑦)) ∈ On) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) ∈ On)
202	155, 149, 201	syl2anc 593	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) ∈ On)
203		oaord 8516	. . . . . . . . . . . . . . 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 1390	. . . . . . . . . . . . . 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 234	. . . . . . . . . . . . 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 9625	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ suc 𝑦 ∈ ω) → (𝐻‘suc suc 𝑦) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)))
207	196, 206	sylan2 602	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (𝐻‘suc suc 𝑦) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)))
208	207	adantr 484	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc suc 𝑦) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐻‘suc 𝑦)))
209		omsuc 8495	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ↑_o (𝐺‘suc 𝑦)) ∈ On ∧ (𝐹‘(𝐺‘suc 𝑦)) ∈ On) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐴 ↑_o (𝐺‘suc 𝑦))))
210	155, 149, 209	syl2anc 593	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))) = (((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o (𝐹‘(𝐺‘suc 𝑦))) +_o (𝐴 ↑_o (𝐺‘suc 𝑦))))
211	205, 208, 210	3eltr4d 2877	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc suc 𝑦) ∈ ((𝐴 ↑_o (𝐺‘suc 𝑦)) ·_o suc (𝐹‘(𝐺‘suc 𝑦))))
212	161, 211	sseldd 3937	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ω) ∧ (suc 𝑦 ∈ dom 𝐺 ∧ (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦)))) → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦)))
213	212	exp32 424	. . . . . . . . . 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 417	. . . . . . 7 ⊢ (𝑦 ∈ ω → (𝜑 → ((𝑦 ∈ dom 𝐺 → (𝐻‘suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘𝑦))) → (suc 𝑦 ∈ dom 𝐺 → (𝐻‘suc suc 𝑦) ∈ (𝐴 ↑_o suc (𝐺‘suc 𝑦))))))
217	80, 89, 98, 131, 216	finds2 7879	. . . . . 6 ⊢ (𝑥 ∈ ω → (𝜑 → (𝑥 ∈ dom 𝐺 → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)))))
218	70, 71, 58, 217	syl3c 66	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐻‘suc 𝑥) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)))
219	69, 218	eqeltrd 2862	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐻‘𝐾) ∈ (𝐴 ↑_o suc (𝐺‘𝑥)))
220	68, 219	sseldd 3937	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ ω ∧ 𝐾 = suc 𝑥)) → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶))
221	220	rexlimdvaa 3164	. 2 ⊢ (𝜑 → (∃𝑥 ∈ ω 𝐾 = suc 𝑥 → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶)))
222		peano2 7870	. . . . 5 ⊢ (dom 𝐺 ∈ ω → suc dom 𝐺 ∈ ω)
223	170, 222	simpl2im 511	. . . 4 ⊢ (𝜑 → suc dom 𝐺 ∈ ω)
224		elnn 7857	. . . 4 ⊢ ((𝐾 ∈ suc dom 𝐺 ∧ suc dom 𝐺 ∈ ω) → 𝐾 ∈ ω)
225	23, 223, 224	syl2anc 593	. . 3 ⊢ (𝜑 → 𝐾 ∈ ω)
226		nn0suc 7875	. . 3 ⊢ (𝐾 ∈ ω → (𝐾 = ∅ ∨ ∃𝑥 ∈ ω 𝐾 = suc 𝑥))
227	225, 226	syl 17	. 2 ⊢ (𝜑 → (𝐾 = ∅ ∨ ∃𝑥 ∈ ω 𝐾 = suc 𝑥))
228	13, 221, 227	mpjaod 871	1 ⊢ (𝜑 → (𝐻‘𝐾) ∈ (𝐴 ↑_o 𝐶))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 399 ∨ wo 858 = wceq 1560 ∈ wcel 2142 ∃wrex 3086 Vcvv 3454 ⊆ wss 3904 ∅c0 4285 class class class wbr 5100 Tr wtr 5207 E cep 5546 We wwe 5599 dom cdm 5647 “ cima 5650 Ord word 6345 Oncon0 6346 suc csuc 6348 Fn wfn 6516 ⟶wf 6517 ‘cfv 6521 Isom wiso 6522 (class class class)co 7396 ∈ cmpo 7398 ωcom 7846 supp csupp 8140 seq_ωcseqom 8418 +_o coa 8434 ·_o comu 8435 ↑_o coe 8436 finSupp cfsupp 9307 OrdIsocoi 9457 CNF ccnf 9616

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1815 ax-4 1829 ax-5 1930 ax-6 1987 ax-7 2028 ax-8 2144 ax-9 2152 ax-10 2175 ax-11 2191 ax-12 2212 ax-ext 2734 ax-rep 5227 ax-sep 5246 ax-nul 5256 ax-pow 5322 ax-pr 5390 ax-un 7718

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1099 df-3an 1100 df-tru 1563 df-fal 1573 df-ex 1800 df-nf 1804 df-sb 2091 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-ral 3077 df-rex 3087 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3456 df-sbc 3745 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-pss 3924 df-nul 4286 df-if 4481 df-pw 4557 df-sn 4583 df-pr 4585 df-op 4589 df-uni 4866 df-iun 4951 df-br 5101 df-opab 5163 df-mpt 5182 df-tr 5208 df-id 5542 df-eprel 5547 df-po 5555 df-so 5556 df-fr 5600 df-se 5601 df-we 5602 df-xp 5653 df-rel 5654 df-cnv 5655 df-co 5656 df-dm 5657 df-rn 5658 df-res 5659 df-ima 5660 df-pred 6288 df-ord 6349 df-on 6350 df-lim 6351 df-suc 6352 df-iota 6477 df-fun 6523 df-fn 6524 df-f 6525 df-f1 6526 df-fo 6527 df-f1o 6528 df-fv 6529 df-isom 6530 df-riota 7353 df-ov 7399 df-oprab 7400 df-mpo 7401 df-om 7847 df-1st 7970 df-2nd 7971 df-supp 8141 df-frecs 8262 df-wrecs 8293 df-recs 8342 df-rdg 8381 df-seqom 8419 df-1o 8437 df-2o 8438 df-oadd 8441 df-omul 8442 df-oexp 8443 df-map 8810 df-en 8928 df-dom 8929 df-sdom 8930 df-fin 8931 df-fsupp 9308 df-oi 9458 df-cnf 9617

This theorem is referenced by: cantnflt2 9628 cnfcomlem 9654

W3C validator