cantnfp1lem3 - Metamath Proof Explorer

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

Theorem cantnfp1lem3 9284

Description: Lemma for cantnfp1 9285. (Contributed by Mario Carneiro, 28-May-2015.) (Revised by AV, 1-Jul-2019.)

**Hypotheses**
Ref	Expression
cantnfs.s	⊢ 𝑆 = dom (𝐴 CNF 𝐵)
cantnfs.a	⊢ (𝜑 → 𝐴 ∈ On)
cantnfs.b	⊢ (𝜑 → 𝐵 ∈ On)
cantnfp1.g	⊢ (𝜑 → 𝐺 ∈ 𝑆)
cantnfp1.x	⊢ (𝜑 → 𝑋 ∈ 𝐵)
cantnfp1.y	⊢ (𝜑 → 𝑌 ∈ 𝐴)
cantnfp1.s	⊢ (𝜑 → (𝐺 supp ∅) ⊆ 𝑋)
cantnfp1.f	⊢ 𝐹 = (𝑡 ∈ 𝐵 ↦ if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)))
cantnfp1.e	⊢ (𝜑 → ∅ ∈ 𝑌)
cantnfp1.o	⊢ 𝑂 = OrdIso( E , (𝐹 supp ∅))
cantnfp1.h	⊢ 𝐻 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝑂‘𝑘)) ·_o (𝐹‘(𝑂‘𝑘))) +_o 𝑧)), ∅)
cantnfp1.k	⊢ 𝐾 = OrdIso( E , (𝐺 supp ∅))
cantnfp1.m	⊢ 𝑀 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝐾‘𝑘)) ·_o (𝐺‘(𝐾‘𝑘))) +_o 𝑧)), ∅)

**Assertion**
Ref	Expression
cantnfp1lem3	⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐹) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))

Distinct variable groups: 𝑡,𝑘,𝑧,𝐵 𝐴,𝑘,𝑡,𝑧 𝑘,𝐹,𝑧 𝑆,𝑘,𝑡,𝑧 𝑘,𝐺,𝑡,𝑧 𝑘,𝐾,𝑡,𝑧 𝑘,𝑂,𝑧 𝜑,𝑘,𝑡,𝑧 𝑘,𝑌,𝑡,𝑧 𝑘,𝑋,𝑡,𝑧 Allowed substitution hints: 𝐹(𝑡) 𝐻(𝑧,𝑡,𝑘) 𝑀(𝑧,𝑡,𝑘) 𝑂(𝑡)

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

Step	Hyp	Ref	Expression
1		cantnfs.s	. . 3 ⊢ 𝑆 = dom (𝐴 CNF 𝐵)
2		cantnfs.a	. . 3 ⊢ (𝜑 → 𝐴 ∈ On)
3		cantnfs.b	. . 3 ⊢ (𝜑 → 𝐵 ∈ On)
4		cantnfp1.o	. . 3 ⊢ 𝑂 = OrdIso( E , (𝐹 supp ∅))
5		cantnfp1.g	. . . 4 ⊢ (𝜑 → 𝐺 ∈ 𝑆)
6		cantnfp1.x	. . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
7		cantnfp1.y	. . . 4 ⊢ (𝜑 → 𝑌 ∈ 𝐴)
8		cantnfp1.s	. . . 4 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ 𝑋)
9		cantnfp1.f	. . . 4 ⊢ 𝐹 = (𝑡 ∈ 𝐵 ↦ if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)))
10	1, 2, 3, 5, 6, 7, 8, 9	cantnfp1lem1 9282	. . 3 ⊢ (𝜑 → 𝐹 ∈ 𝑆)
11		cantnfp1.h	. . 3 ⊢ 𝐻 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝑂‘𝑘)) ·_o (𝐹‘(𝑂‘𝑘))) +_o 𝑧)), ∅)
12	1, 2, 3, 4, 10, 11	cantnfval 9272	. 2 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐹) = (𝐻‘dom 𝑂))
13		cantnfp1.e	. . . 4 ⊢ (𝜑 → ∅ ∈ 𝑌)
14	1, 2, 3, 5, 6, 7, 8, 9, 13, 4	cantnfp1lem2 9283	. . 3 ⊢ (𝜑 → dom 𝑂 = suc ∪ dom 𝑂)
15	14	fveq2d 6710	. 2 ⊢ (𝜑 → (𝐻‘dom 𝑂) = (𝐻‘suc ∪ dom 𝑂))
16	1, 2, 3, 4, 10	cantnfcl 9271	. . . . . . 7 ⊢ (𝜑 → ( E We (𝐹 supp ∅) ∧ dom 𝑂 ∈ ω))
17	16	simprd 499	. . . . . 6 ⊢ (𝜑 → dom 𝑂 ∈ ω)
18	14, 17	eqeltrrd 2835	. . . . 5 ⊢ (𝜑 → suc ∪ dom 𝑂 ∈ ω)
19		peano2b 7650	. . . . 5 ⊢ (∪ dom 𝑂 ∈ ω ↔ suc ∪ dom 𝑂 ∈ ω)
20	18, 19	sylibr 237	. . . 4 ⊢ (𝜑 → ∪ dom 𝑂 ∈ ω)
21	1, 2, 3, 4, 10, 11	cantnfsuc 9274	. . . 4 ⊢ ((𝜑 ∧ ∪ dom 𝑂 ∈ ω) → (𝐻‘suc ∪ dom 𝑂) = (((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) +_o (𝐻‘∪ dom 𝑂)))
22	20, 21	mpdan 687	. . 3 ⊢ (𝜑 → (𝐻‘suc ∪ dom 𝑂) = (((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) +_o (𝐻‘∪ dom 𝑂)))
23		ovexd 7237	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐹 supp ∅) ∈ V)
24	16	simpld 498	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → E We (𝐹 supp ∅))
25	4	oiiso 9142	. . . . . . . . . . . . . . 15 ⊢ (((𝐹 supp ∅) ∈ V ∧ E We (𝐹 supp ∅)) → 𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)))
26	23, 24, 25	syl2anc 587	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)))
27		isof1o 7121	. . . . . . . . . . . . . 14 ⊢ (𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)) → 𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅))
28	26, 27	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅))
29		f1ocnv 6662	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → ^◡𝑂:(𝐹 supp ∅)–1-1-onto→dom 𝑂)
30		f1of 6650	. . . . . . . . . . . . 13 ⊢ (^◡𝑂:(𝐹 supp ∅)–1-1-onto→dom 𝑂 → ^◡𝑂:(𝐹 supp ∅)⟶dom 𝑂)
31	28, 29, 30	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → ^◡𝑂:(𝐹 supp ∅)⟶dom 𝑂)
32		iftrue 4435	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑋 → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = 𝑌)
33	9, 32, 6, 7	fvmptd3 6830	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐹‘𝑋) = 𝑌)
34	13	ne0d 4240	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑌 ≠ ∅)
35	33, 34	eqnetrd 3002	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹‘𝑋) ≠ ∅)
36	7	adantr 484	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → 𝑌 ∈ 𝐴)
37	1, 2, 3	cantnfs 9270	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝐺 ∈ 𝑆 ↔ (𝐺:𝐵⟶𝐴 ∧ 𝐺 finSupp ∅)))
38	5, 37	mpbid 235	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (𝐺:𝐵⟶𝐴 ∧ 𝐺 finSupp ∅))
39	38	simpld 498	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐺:𝐵⟶𝐴)
40	39	ffvelrnda 6893	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → (𝐺‘𝑡) ∈ 𝐴)
41	36, 40	ifcld 4475	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) ∈ 𝐴)
42	41, 9	fmptd 6920	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐹:𝐵⟶𝐴)
43	42	ffnd 6535	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐹 Fn 𝐵)
44		0ex 5189	. . . . . . . . . . . . . . 15 ⊢ ∅ ∈ V
45	44	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∅ ∈ V)
46		elsuppfn 7902	. . . . . . . . . . . . . 14 ⊢ ((𝐹 Fn 𝐵 ∧ 𝐵 ∈ On ∧ ∅ ∈ V) → (𝑋 ∈ (𝐹 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐹‘𝑋) ≠ ∅)))
47	43, 3, 45, 46	syl3anc 1373	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 ∈ (𝐹 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐹‘𝑋) ≠ ∅)))
48	6, 35, 47	mpbir2and 713	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ∈ (𝐹 supp ∅))
49	31, 48	ffvelrnd 6894	. . . . . . . . . . 11 ⊢ (𝜑 → (^◡𝑂‘𝑋) ∈ dom 𝑂)
50		elssuni 4841	. . . . . . . . . . 11 ⊢ ((^◡𝑂‘𝑋) ∈ dom 𝑂 → (^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂)
51	49, 50	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂)
52	4	oicl 9134	. . . . . . . . . . . 12 ⊢ Ord dom 𝑂
53		ordelon 6226	. . . . . . . . . . . 12 ⊢ ((Ord dom 𝑂 ∧ (^◡𝑂‘𝑋) ∈ dom 𝑂) → (^◡𝑂‘𝑋) ∈ On)
54	52, 49, 53	sylancr 590	. . . . . . . . . . 11 ⊢ (𝜑 → (^◡𝑂‘𝑋) ∈ On)
55		nnon 7639	. . . . . . . . . . . 12 ⊢ (∪ dom 𝑂 ∈ ω → ∪ dom 𝑂 ∈ On)
56	20, 55	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ∪ dom 𝑂 ∈ On)
57		ontri1 6236	. . . . . . . . . . 11 ⊢ (((^◡𝑂‘𝑋) ∈ On ∧ ∪ dom 𝑂 ∈ On) → ((^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂 ↔ ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋)))
58	54, 56, 57	syl2anc 587	. . . . . . . . . 10 ⊢ (𝜑 → ((^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂 ↔ ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋)))
59	51, 58	mpbid 235	. . . . . . . . 9 ⊢ (𝜑 → ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋))
60		sucidg 6280	. . . . . . . . . . . . . 14 ⊢ (∪ dom 𝑂 ∈ ω → ∪ dom 𝑂 ∈ suc ∪ dom 𝑂)
61	20, 60	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∪ dom 𝑂 ∈ suc ∪ dom 𝑂)
62	61, 14	eleqtrrd 2837	. . . . . . . . . . . 12 ⊢ (𝜑 → ∪ dom 𝑂 ∈ dom 𝑂)
63		isorel 7124	. . . . . . . . . . . 12 ⊢ ((𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)) ∧ (∪ dom 𝑂 ∈ dom 𝑂 ∧ (^◡𝑂‘𝑋) ∈ dom 𝑂)) → (∪ dom 𝑂 E (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) E (𝑂‘(^◡𝑂‘𝑋))))
64	26, 62, 49, 63	syl12anc 837	. . . . . . . . . . 11 ⊢ (𝜑 → (∪ dom 𝑂 E (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) E (𝑂‘(^◡𝑂‘𝑋))))
65		fvex 6719	. . . . . . . . . . . 12 ⊢ (^◡𝑂‘𝑋) ∈ V
66	65	epeli 5451	. . . . . . . . . . 11 ⊢ (∪ dom 𝑂 E (^◡𝑂‘𝑋) ↔ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋))
67		fvex 6719	. . . . . . . . . . . 12 ⊢ (𝑂‘(^◡𝑂‘𝑋)) ∈ V
68	67	epeli 5451	. . . . . . . . . . 11 ⊢ ((𝑂‘∪ dom 𝑂) E (𝑂‘(^◡𝑂‘𝑋)) ↔ (𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋)))
69	64, 66, 68	3bitr3g 316	. . . . . . . . . 10 ⊢ (𝜑 → (∪ dom 𝑂 ∈ (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋))))
70		f1ocnvfv2 7077	. . . . . . . . . . . 12 ⊢ ((𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) ∧ 𝑋 ∈ (𝐹 supp ∅)) → (𝑂‘(^◡𝑂‘𝑋)) = 𝑋)
71	28, 48, 70	syl2anc 587	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂‘(^◡𝑂‘𝑋)) = 𝑋)
72	71	eleq2d 2819	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋)) ↔ (𝑂‘∪ dom 𝑂) ∈ 𝑋))
73	69, 72	bitrd 282	. . . . . . . . 9 ⊢ (𝜑 → (∪ dom 𝑂 ∈ (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) ∈ 𝑋))
74	59, 73	mtbid 327	. . . . . . . 8 ⊢ (𝜑 → ¬ (𝑂‘∪ dom 𝑂) ∈ 𝑋)
75	8	sseld 3890	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) → (𝑂‘∪ dom 𝑂) ∈ 𝑋))
76		suppssdm 7908	. . . . . . . . . . . . . . . 16 ⊢ (𝐹 supp ∅) ⊆ dom 𝐹
77	76, 42	fssdm 6554	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ 𝐵)
78		onss 7557	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ On → 𝐵 ⊆ On)
79	3, 78	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ⊆ On)
80	77, 79	sstrd 3901	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ On)
81	4	oif 9135	. . . . . . . . . . . . . . . 16 ⊢ 𝑂:dom 𝑂⟶(𝐹 supp ∅)
82	81	ffvelrni 6892	. . . . . . . . . . . . . . 15 ⊢ (∪ dom 𝑂 ∈ dom 𝑂 → (𝑂‘∪ dom 𝑂) ∈ (𝐹 supp ∅))
83	62, 82	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ (𝐹 supp ∅))
84	80, 83	sseldd 3892	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ On)
85		eloni 6212	. . . . . . . . . . . . 13 ⊢ ((𝑂‘∪ dom 𝑂) ∈ On → Ord (𝑂‘∪ dom 𝑂))
86	84, 85	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → Ord (𝑂‘∪ dom 𝑂))
87		ordn2lp 6222	. . . . . . . . . . . 12 ⊢ (Ord (𝑂‘∪ dom 𝑂) → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
88	86, 87	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
89		imnan 403	. . . . . . . . . . 11 ⊢ (((𝑂‘∪ dom 𝑂) ∈ 𝑋 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)) ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
90	88, 89	sylibr 237	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ 𝑋 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
91	75, 90	syld 47	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
92		onelon 6227	. . . . . . . . . . . . 13 ⊢ ((𝐵 ∈ On ∧ 𝑋 ∈ 𝐵) → 𝑋 ∈ On)
93	3, 6, 92	syl2anc 587	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ∈ On)
94		eloni 6212	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ On → Ord 𝑋)
95	93, 94	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → Ord 𝑋)
96		ordirr 6220	. . . . . . . . . . 11 ⊢ (Ord 𝑋 → ¬ 𝑋 ∈ 𝑋)
97	95, 96	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ¬ 𝑋 ∈ 𝑋)
98		elsni 4548	. . . . . . . . . . . 12 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (𝑂‘∪ dom 𝑂) = 𝑋)
99	98	eleq2d 2819	. . . . . . . . . . 11 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (𝑋 ∈ (𝑂‘∪ dom 𝑂) ↔ 𝑋 ∈ 𝑋))
100	99	notbid 321	. . . . . . . . . 10 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂) ↔ ¬ 𝑋 ∈ 𝑋))
101	97, 100	syl5ibrcom 250	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
102		eqeq1 2738	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑘 → (𝑡 = 𝑋 ↔ 𝑘 = 𝑋))
103		fveq2 6706	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑘 → (𝐺‘𝑡) = (𝐺‘𝑘))
104	102, 103	ifbieq2d 4455	. . . . . . . . . . . . . 14 ⊢ (𝑡 = 𝑘 → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
105		eldifi 4031	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → 𝑘 ∈ 𝐵)
106	105	adantl 485	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → 𝑘 ∈ 𝐵)
107	7	adantr 484	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → 𝑌 ∈ 𝐴)
108		fvex 6719	. . . . . . . . . . . . . . 15 ⊢ (𝐺‘𝑘) ∈ V
109		ifexg 4478	. . . . . . . . . . . . . . 15 ⊢ ((𝑌 ∈ 𝐴 ∧ (𝐺‘𝑘) ∈ V) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
110	107, 108, 109	sylancl 589	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
111	9, 104, 106, 110	fvmptd3 6830	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐹‘𝑘) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
112		eldifn 4032	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → ¬ 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
113	112	adantl 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → ¬ 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
114		velsn 4547	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ {𝑋} ↔ 𝑘 = 𝑋)
115		elun2 4081	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ {𝑋} → 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
116	114, 115	sylbir 238	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑋 → 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
117	113, 116	nsyl 142	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → ¬ 𝑘 = 𝑋)
118	117	iffalsed 4440	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = (𝐺‘𝑘))
119		ssun1 4076	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋})
120		sscon 4043	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋}) → (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) ⊆ (𝐵 ∖ (𝐺 supp ∅)))
121	119, 120	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) ⊆ (𝐵 ∖ (𝐺 supp ∅))
122	121	sseli 3887	. . . . . . . . . . . . . 14 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → 𝑘 ∈ (𝐵 ∖ (𝐺 supp ∅)))
123		ssidd 3914	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ (𝐺 supp ∅))
124	39, 123, 3, 13	suppssr 7927	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐺 supp ∅))) → (𝐺‘𝑘) = ∅)
125	122, 124	sylan2 596	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐺‘𝑘) = ∅)
126	111, 118, 125	3eqtrd 2778	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐹‘𝑘) = ∅)
127	42, 126	suppss 7925	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋}))
128	127, 83	sseldd 3892	. . . . . . . . . 10 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ ((𝐺 supp ∅) ∪ {𝑋}))
129		elun 4053	. . . . . . . . . 10 ⊢ ((𝑂‘∪ dom 𝑂) ∈ ((𝐺 supp ∅) ∪ {𝑋}) ↔ ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) ∨ (𝑂‘∪ dom 𝑂) ∈ {𝑋}))
130	128, 129	sylib 221	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) ∨ (𝑂‘∪ dom 𝑂) ∈ {𝑋}))
131	91, 101, 130	mpjaod 860	. . . . . . . 8 ⊢ (𝜑 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂))
132		ioran 984	. . . . . . . 8 ⊢ (¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂)) ↔ (¬ (𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
133	74, 131, 132	sylanbrc 586	. . . . . . 7 ⊢ (𝜑 → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
134		ordtri3 6238	. . . . . . . 8 ⊢ ((Ord (𝑂‘∪ dom 𝑂) ∧ Ord 𝑋) → ((𝑂‘∪ dom 𝑂) = 𝑋 ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂))))
135	86, 95, 134	syl2anc 587	. . . . . . 7 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) = 𝑋 ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂))))
136	133, 135	mpbird 260	. . . . . 6 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) = 𝑋)
137	136	oveq2d 7218	. . . . 5 ⊢ (𝜑 → (𝐴 ↑_o (𝑂‘∪ dom 𝑂)) = (𝐴 ↑_o 𝑋))
138	136	fveq2d 6710	. . . . . 6 ⊢ (𝜑 → (𝐹‘(𝑂‘∪ dom 𝑂)) = (𝐹‘𝑋))
139	138, 33	eqtrd 2774	. . . . 5 ⊢ (𝜑 → (𝐹‘(𝑂‘∪ dom 𝑂)) = 𝑌)
140	137, 139	oveq12d 7220	. . . 4 ⊢ (𝜑 → ((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) = ((𝐴 ↑_o 𝑋) ·_o 𝑌))
141		nnord 7641	. . . . . . . . 9 ⊢ (∪ dom 𝑂 ∈ ω → Ord ∪ dom 𝑂)
142	20, 141	syl 17	. . . . . . . 8 ⊢ (𝜑 → Ord ∪ dom 𝑂)
143		sssucid 6279	. . . . . . . . . 10 ⊢ ∪ dom 𝑂 ⊆ suc ∪ dom 𝑂
144	143, 14	sseqtrrid 3944	. . . . . . . . 9 ⊢ (𝜑 → ∪ dom 𝑂 ⊆ dom 𝑂)
145		f1ofo 6657	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → 𝑂:dom 𝑂–onto→(𝐹 supp ∅))
146	28, 145	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑂:dom 𝑂–onto→(𝐹 supp ∅))
147		foima 6627	. . . . . . . . . . . 12 ⊢ (𝑂:dom 𝑂–onto→(𝐹 supp ∅) → (𝑂 “ dom 𝑂) = (𝐹 supp ∅))
148	146, 147	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ dom 𝑂) = (𝐹 supp ∅))
149		ffn 6534	. . . . . . . . . . . . . 14 ⊢ (𝑂:dom 𝑂⟶(𝐹 supp ∅) → 𝑂 Fn dom 𝑂)
150	81, 149	ax-mp 5	. . . . . . . . . . . . 13 ⊢ 𝑂 Fn dom 𝑂
151		fnsnfv 6779	. . . . . . . . . . . . 13 ⊢ ((𝑂 Fn dom 𝑂 ∧ ∪ dom 𝑂 ∈ dom 𝑂) → {(𝑂‘∪ dom 𝑂)} = (𝑂 “ {∪ dom 𝑂}))
152	150, 62, 151	sylancr 590	. . . . . . . . . . . 12 ⊢ (𝜑 → {(𝑂‘∪ dom 𝑂)} = (𝑂 “ {∪ dom 𝑂}))
153	136	sneqd 4543	. . . . . . . . . . . 12 ⊢ (𝜑 → {(𝑂‘∪ dom 𝑂)} = {𝑋})
154	152, 153	eqtr3d 2776	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ {∪ dom 𝑂}) = {𝑋})
155	148, 154	difeq12d 4028	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})) = ((𝐹 supp ∅) ∖ {𝑋}))
156		ordirr 6220	. . . . . . . . . . . . . . . . 17 ⊢ (Ord ∪ dom 𝑂 → ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
157	142, 156	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
158		disjsn 4617	. . . . . . . . . . . . . . . 16 ⊢ ((∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅ ↔ ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
159	157, 158	sylibr 237	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅)
160		disj3 4358	. . . . . . . . . . . . . . 15 ⊢ ((∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅ ↔ ∪ dom 𝑂 = (∪ dom 𝑂 ∖ {∪ dom 𝑂}))
161	159, 160	sylib 221	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∪ dom 𝑂 = (∪ dom 𝑂 ∖ {∪ dom 𝑂}))
162		difun2 4385	. . . . . . . . . . . . . 14 ⊢ ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}) = (∪ dom 𝑂 ∖ {∪ dom 𝑂})
163	161, 162	eqtr4di 2792	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∪ dom 𝑂 = ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}))
164		df-suc 6208	. . . . . . . . . . . . . . 15 ⊢ suc ∪ dom 𝑂 = (∪ dom 𝑂 ∪ {∪ dom 𝑂})
165	14, 164	eqtrdi 2790	. . . . . . . . . . . . . 14 ⊢ (𝜑 → dom 𝑂 = (∪ dom 𝑂 ∪ {∪ dom 𝑂}))
166	165	difeq1d 4026	. . . . . . . . . . . . 13 ⊢ (𝜑 → (dom 𝑂 ∖ {∪ dom 𝑂}) = ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}))
167	163, 166	eqtr4d 2777	. . . . . . . . . . . 12 ⊢ (𝜑 → ∪ dom 𝑂 = (dom 𝑂 ∖ {∪ dom 𝑂}))
168	167	imaeq2d 5918	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ ∪ dom 𝑂) = (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})))
169		dff1o3 6656	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) ↔ (𝑂:dom 𝑂–onto→(𝐹 supp ∅) ∧ Fun ^◡𝑂))
170	169	simprbi 500	. . . . . . . . . . . 12 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → Fun ^◡𝑂)
171		imadif 6453	. . . . . . . . . . . 12 ⊢ (Fun ^◡𝑂 → (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
172	28, 170, 171	3syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
173	168, 172	eqtrd 2774	. . . . . . . . . 10 ⊢ (𝜑 → (𝑂 “ ∪ dom 𝑂) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
174	8, 97	ssneldd 3894	. . . . . . . . . . . . 13 ⊢ (𝜑 → ¬ 𝑋 ∈ (𝐺 supp ∅))
175		disjsn 4617	. . . . . . . . . . . . 13 ⊢ (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ ¬ 𝑋 ∈ (𝐺 supp ∅))
176	174, 175	sylibr 237	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐺 supp ∅) ∩ {𝑋}) = ∅)
177		fvex 6719	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺‘𝑋) ∈ V
178		dif1o 8216	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ ((𝐺‘𝑋) ∈ V ∧ (𝐺‘𝑋) ≠ ∅))
179	177, 178	mpbiran 709	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ (𝐺‘𝑋) ≠ ∅)
180	39	ffnd 6535	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → 𝐺 Fn 𝐵)
181		elsuppfn 7902	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐺 Fn 𝐵 ∧ 𝐵 ∈ On ∧ ∅ ∈ V) → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅)))
182	180, 3, 45, 181	syl3anc 1373	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅)))
183	179	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ (𝐺‘𝑋) ≠ ∅))
184	183	bicomd 226	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → ((𝐺‘𝑋) ≠ ∅ ↔ (𝐺‘𝑋) ∈ (V ∖ 1_o)))
185	184	anbi2d 632	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → ((𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o))))
186	182, 185	bitrd 282	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o))))
187	8	sseld 3890	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) → 𝑋 ∈ 𝑋))
188	186, 187	sylbird 263	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → ((𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o)) → 𝑋 ∈ 𝑋))
189	6, 188	mpand 695	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝐺‘𝑋) ∈ (V ∖ 1_o) → 𝑋 ∈ 𝑋))
190	179, 189	syl5bir 246	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((𝐺‘𝑋) ≠ ∅ → 𝑋 ∈ 𝑋))
191	190	necon1bd 2953	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (¬ 𝑋 ∈ 𝑋 → (𝐺‘𝑋) = ∅))
192	97, 191	mpd 15	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐺‘𝑋) = ∅)
193	192	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐺‘𝑋) = ∅)
194		fveqeq2 6715	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑋 → ((𝐺‘𝑘) = ∅ ↔ (𝐺‘𝑋) = ∅))
195	193, 194	syl5ibrcom 250	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝑘 = 𝑋 → (𝐺‘𝑘) = ∅))
196		eldifi 4031	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅)) → 𝑘 ∈ 𝐵)
197	196	adantl 485	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → 𝑘 ∈ 𝐵)
198	7	adantr 484	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → 𝑌 ∈ 𝐴)
199	198, 108, 109	sylancl 589	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
200	9, 104, 197, 199	fvmptd3 6830	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐹‘𝑘) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
201		ssidd 3914	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ (𝐹 supp ∅))
202	42, 201, 3, 13	suppssr 7927	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐹‘𝑘) = ∅)
203	200, 202	eqtr3d 2776	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = ∅)
204		iffalse 4438	. . . . . . . . . . . . . . . . 17 ⊢ (¬ 𝑘 = 𝑋 → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = (𝐺‘𝑘))
205	204	eqeq1d 2736	. . . . . . . . . . . . . . . 16 ⊢ (¬ 𝑘 = 𝑋 → (if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = ∅ ↔ (𝐺‘𝑘) = ∅))
206	203, 205	syl5ibcom 248	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (¬ 𝑘 = 𝑋 → (𝐺‘𝑘) = ∅))
207	195, 206	pm2.61d 182	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐺‘𝑘) = ∅)
208	39, 207	suppss 7925	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ (𝐹 supp ∅))
209		reldisj 4356	. . . . . . . . . . . . 13 ⊢ ((𝐺 supp ∅) ⊆ (𝐹 supp ∅) → (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋})))
210	208, 209	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋})))
211	176, 210	mpbid 235	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋}))
212		uncom 4057	. . . . . . . . . . . . 13 ⊢ ((𝐺 supp ∅) ∪ {𝑋}) = ({𝑋} ∪ (𝐺 supp ∅))
213	127, 212	sseqtrdi 3941	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ ({𝑋} ∪ (𝐺 supp ∅)))
214		ssundif 4389	. . . . . . . . . . . 12 ⊢ ((𝐹 supp ∅) ⊆ ({𝑋} ∪ (𝐺 supp ∅)) ↔ ((𝐹 supp ∅) ∖ {𝑋}) ⊆ (𝐺 supp ∅))
215	213, 214	sylib 221	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐹 supp ∅) ∖ {𝑋}) ⊆ (𝐺 supp ∅))
216	211, 215	eqssd 3908	. . . . . . . . . 10 ⊢ (𝜑 → (𝐺 supp ∅) = ((𝐹 supp ∅) ∖ {𝑋}))
217	155, 173, 216	3eqtr4rd 2785	. . . . . . . . 9 ⊢ (𝜑 → (𝐺 supp ∅) = (𝑂 “ ∪ dom 𝑂))
218		isores3 7133	. . . . . . . . 9 ⊢ ((𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)) ∧ ∪ dom 𝑂 ⊆ dom 𝑂 ∧ (𝐺 supp ∅) = (𝑂 “ ∪ dom 𝑂)) → (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅)))
219	26, 144, 217, 218	syl3anc 1373	. . . . . . . 8 ⊢ (𝜑 → (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅)))
220		cantnfp1.k	. . . . . . . . . . 11 ⊢ 𝐾 = OrdIso( E , (𝐺 supp ∅))
221	1, 2, 3, 220, 5	cantnfcl 9271	. . . . . . . . . 10 ⊢ (𝜑 → ( E We (𝐺 supp ∅) ∧ dom 𝐾 ∈ ω))
222	221	simpld 498	. . . . . . . . 9 ⊢ (𝜑 → E We (𝐺 supp ∅))
223		epse 5523	. . . . . . . . 9 ⊢ E Se (𝐺 supp ∅)
224	220	oieu 9144	. . . . . . . . 9 ⊢ (( E We (𝐺 supp ∅) ∧ E Se (𝐺 supp ∅)) → ((Ord ∪ dom 𝑂 ∧ (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅))) ↔ (∪ dom 𝑂 = dom 𝐾 ∧ (𝑂 ↾ ∪ dom 𝑂) = 𝐾)))
225	222, 223, 224	sylancl 589	. . . . . . . 8 ⊢ (𝜑 → ((Ord ∪ dom 𝑂 ∧ (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅))) ↔ (∪ dom 𝑂 = dom 𝐾 ∧ (𝑂 ↾ ∪ dom 𝑂) = 𝐾)))
226	142, 219, 225	mpbi2and 712	. . . . . . 7 ⊢ (𝜑 → (∪ dom 𝑂 = dom 𝐾 ∧ (𝑂 ↾ ∪ dom 𝑂) = 𝐾))
227	226	simpld 498	. . . . . 6 ⊢ (𝜑 → ∪ dom 𝑂 = dom 𝐾)
228	227	fveq2d 6710	. . . . 5 ⊢ (𝜑 → (𝑀‘∪ dom 𝑂) = (𝑀‘dom 𝐾))
229		eleq1 2821	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → (𝑥 ∈ dom 𝑂 ↔ ∅ ∈ dom 𝑂))
230		fveq2 6706	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → (𝐻‘𝑥) = (𝐻‘∅))
231		fveq2 6706	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → (𝑀‘𝑥) = (𝑀‘∅))
232		cantnfp1.m	. . . . . . . . . . . . . 14 ⊢ 𝑀 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝐾‘𝑘)) ·_o (𝐺‘(𝐾‘𝑘))) +_o 𝑧)), ∅)
233	232	seqom0g 8181	. . . . . . . . . . . . 13 ⊢ (∅ ∈ V → (𝑀‘∅) = ∅)
234	44, 233	ax-mp 5	. . . . . . . . . . . 12 ⊢ (𝑀‘∅) = ∅
235	231, 234	eqtrdi 2790	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → (𝑀‘𝑥) = ∅)
236	230, 235	eqeq12d 2750	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘∅) = ∅))
237	229, 236	imbi12d 348	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅)))
238	237	imbi2d 344	. . . . . . . 8 ⊢ (𝑥 = ∅ → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅))))
239		eleq1 2821	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ dom 𝑂 ↔ 𝑦 ∈ dom 𝑂))
240		fveq2 6706	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝐻‘𝑥) = (𝐻‘𝑦))
241		fveq2 6706	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝑀‘𝑥) = (𝑀‘𝑦))
242	240, 241	eqeq12d 2750	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘𝑦) = (𝑀‘𝑦)))
243	239, 242	imbi12d 348	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))))
244	243	imbi2d 344	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)))))
245		eleq1 2821	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → (𝑥 ∈ dom 𝑂 ↔ suc 𝑦 ∈ dom 𝑂))
246		fveq2 6706	. . . . . . . . . . 11 ⊢ (𝑥 = suc 𝑦 → (𝐻‘𝑥) = (𝐻‘suc 𝑦))
247		fveq2 6706	. . . . . . . . . . 11 ⊢ (𝑥 = suc 𝑦 → (𝑀‘𝑥) = (𝑀‘suc 𝑦))
248	246, 247	eqeq12d 2750	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))
249	245, 248	imbi12d 348	. . . . . . . . 9 ⊢ (𝑥 = suc 𝑦 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
250	249	imbi2d 344	. . . . . . . 8 ⊢ (𝑥 = suc 𝑦 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))))
251		eleq1 2821	. . . . . . . . . 10 ⊢ (𝑥 = ∪ dom 𝑂 → (𝑥 ∈ dom 𝑂 ↔ ∪ dom 𝑂 ∈ dom 𝑂))
252		fveq2 6706	. . . . . . . . . . 11 ⊢ (𝑥 = ∪ dom 𝑂 → (𝐻‘𝑥) = (𝐻‘∪ dom 𝑂))
253		fveq2 6706	. . . . . . . . . . 11 ⊢ (𝑥 = ∪ dom 𝑂 → (𝑀‘𝑥) = (𝑀‘∪ dom 𝑂))
254	252, 253	eqeq12d 2750	. . . . . . . . . 10 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂)))
255	251, 254	imbi12d 348	. . . . . . . . 9 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂))))
256	255	imbi2d 344	. . . . . . . 8 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂)))))
257	11	seqom0g 8181	. . . . . . . . 9 ⊢ (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅)
258	257	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅))
259		nnord 7641	. . . . . . . . . . . . . . . 16 ⊢ (dom 𝑂 ∈ ω → Ord dom 𝑂)
260	17, 259	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → Ord dom 𝑂)
261		ordtr 6216	. . . . . . . . . . . . . . 15 ⊢ (Ord dom 𝑂 → Tr dom 𝑂)
262	260, 261	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → Tr dom 𝑂)
263		trsuc 6286	. . . . . . . . . . . . . 14 ⊢ ((Tr dom 𝑂 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝑂)
264	262, 263	sylan 583	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝑂)
265	264	ex 416	. . . . . . . . . . . 12 ⊢ (𝜑 → (suc 𝑦 ∈ dom 𝑂 → 𝑦 ∈ dom 𝑂))
266	265	imim1d 82	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)) → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))))
267		oveq2 7210	. . . . . . . . . . . . . 14 ⊢ ((𝐻‘𝑦) = (𝑀‘𝑦) → (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
268		elnn 7644	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ dom 𝑂 ∧ dom 𝑂 ∈ ω) → 𝑦 ∈ ω)
269	268	ancoms 462	. . . . . . . . . . . . . . . . 17 ⊢ ((dom 𝑂 ∈ ω ∧ 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ω)
270	17, 264, 269	syl2an2r 685	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ω)
271	1, 2, 3, 4, 10, 11	cantnfsuc 9274	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (𝐻‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)))
272	270, 271	syldan 594	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐻‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)))
273	1, 2, 3, 220, 5, 232	cantnfsuc 9274	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)))
274	270, 273	syldan 594	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)))
275	226	simprd 499	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑂 ↾ ∪ dom 𝑂) = 𝐾)
276	275	fveq1d 6708	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝐾‘𝑦))
277	276	adantr 484	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝐾‘𝑦))
278	14	eleq2d 2819	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (suc 𝑦 ∈ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
279	278	biimpa 480	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → suc 𝑦 ∈ suc ∪ dom 𝑂)
280	142	adantr 484	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → Ord ∪ dom 𝑂)
281		ordsucelsuc 7590	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (Ord ∪ dom 𝑂 → (𝑦 ∈ ∪ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
282	280, 281	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑦 ∈ ∪ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
283	279, 282	mpbird 260	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ∪ dom 𝑂)
284	283	fvresd 6726	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝑂‘𝑦))
285	277, 284	eqtr3d 2776	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) = (𝑂‘𝑦))
286	285	oveq2d 7218	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐴 ↑_o (𝐾‘𝑦)) = (𝐴 ↑_o (𝑂‘𝑦)))
287		eqeq1 2738	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑡 = (𝐾‘𝑦) → (𝑡 = 𝑋 ↔ (𝐾‘𝑦) = 𝑋))
288		fveq2 6706	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑡 = (𝐾‘𝑦) → (𝐺‘𝑡) = (𝐺‘(𝐾‘𝑦)))
289	287, 288	ifbieq2d 4455	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑡 = (𝐾‘𝑦) → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))))
290		suppssdm 7908	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐺 supp ∅) ⊆ dom 𝐺
291	290, 39	fssdm 6554	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ 𝐵)
292	291	adantr 484	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐺 supp ∅) ⊆ 𝐵)
293	227	adantr 484	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ∪ dom 𝑂 = dom 𝐾)
294	283, 293	eleqtrd 2836	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝐾)
295	220	oif 9135	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝐾:dom 𝐾⟶(𝐺 supp ∅)
296	295	ffvelrni 6892	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 ∈ dom 𝐾 → (𝐾‘𝑦) ∈ (𝐺 supp ∅))
297	294, 296	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) ∈ (𝐺 supp ∅))
298	292, 297	sseldd 3892	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) ∈ 𝐵)
299	7	adantr 484	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑌 ∈ 𝐴)
300		fvex 6719	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺‘(𝐾‘𝑦)) ∈ V
301		ifexg 4478	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑌 ∈ 𝐴 ∧ (𝐺‘(𝐾‘𝑦)) ∈ V) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) ∈ V)
302	299, 300, 301	sylancl 589	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) ∈ V)
303	9, 289, 298, 302	fvmptd3 6830	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐹‘(𝐾‘𝑦)) = if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))))
304	285	fveq2d 6710	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐹‘(𝐾‘𝑦)) = (𝐹‘(𝑂‘𝑦)))
305	174	adantr 484	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ¬ 𝑋 ∈ (𝐺 supp ∅))
306		nelneq 2858	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝐾‘𝑦) ∈ (𝐺 supp ∅) ∧ ¬ 𝑋 ∈ (𝐺 supp ∅)) → ¬ (𝐾‘𝑦) = 𝑋)
307	297, 305, 306	syl2anc 587	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ¬ (𝐾‘𝑦) = 𝑋)
308	307	iffalsed 4440	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) = (𝐺‘(𝐾‘𝑦)))
309	303, 304, 308	3eqtr3rd 2783	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐺‘(𝐾‘𝑦)) = (𝐹‘(𝑂‘𝑦)))
310	286, 309	oveq12d 7220	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) = ((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))))
311	310	oveq1d 7217	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
312	274, 311	eqtrd 2774	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
313	272, 312	eqeq12d 2750	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐻‘suc 𝑦) = (𝑀‘suc 𝑦) ↔ (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦))))
314	267, 313	syl5ibr 249	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐻‘𝑦) = (𝑀‘𝑦) → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))
315	314	ex 416	. . . . . . . . . . . 12 ⊢ (𝜑 → (suc 𝑦 ∈ dom 𝑂 → ((𝐻‘𝑦) = (𝑀‘𝑦) → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
316	315	a2d 29	. . . . . . . . . . 11 ⊢ (𝜑 → ((suc 𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)) → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
317	266, 316	syld 47	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)) → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
318	317	a2i 14	. . . . . . . . 9 ⊢ ((𝜑 → (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))) → (𝜑 → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
319	318	a1i 11	. . . . . . . 8 ⊢ (𝑦 ∈ ω → ((𝜑 → (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))) → (𝜑 → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))))
320	238, 244, 250, 256, 258, 319	finds 7665	. . . . . . 7 ⊢ (∪ dom 𝑂 ∈ ω → (𝜑 → (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂))))
321	20, 320	mpcom 38	. . . . . 6 ⊢ (𝜑 → (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂)))
322	62, 321	mpd 15	. . . . 5 ⊢ (𝜑 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂))
323	1, 2, 3, 220, 5, 232	cantnfval 9272	. . . . 5 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐺) = (𝑀‘dom 𝐾))
324	228, 322, 323	3eqtr4d 2784	. . . 4 ⊢ (𝜑 → (𝐻‘∪ dom 𝑂) = ((𝐴 CNF 𝐵)‘𝐺))
325	140, 324	oveq12d 7220	. . 3 ⊢ (𝜑 → (((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) +_o (𝐻‘∪ dom 𝑂)) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))
326	22, 325	eqtrd 2774	. 2 ⊢ (𝜑 → (𝐻‘suc ∪ dom 𝑂) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))
327	12, 15, 326	3eqtrd 2778	1 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐹) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 399 ∨ wo 847 = wceq 1543 ∈ wcel 2110 ≠ wne 2935 Vcvv 3401 ∖ cdif 3854 ∪ cun 3855 ∩ cin 3856 ⊆ wss 3857 ∅c0 4227 ifcif 4429 {csn 4531 ∪ cuni 4809 class class class wbr 5043 ↦ cmpt 5124 Tr wtr 5150 E cep 5448 Se wse 5496 We wwe 5497 ^◡ccnv 5539 dom cdm 5540 ↾ cres 5542 “ cima 5543 Ord word 6201 Oncon0 6202 suc csuc 6204 Fun wfun 6363 Fn wfn 6364 ⟶wf 6365 –onto→wfo 6367 –1-1-onto→wf1o 6368 ‘cfv 6369 Isom wiso 6370 (class class class)co 7202 ∈ cmpo 7204 ωcom 7633 supp csupp 7892 seq_ωcseqom 8172 1_oc1o 8184 +_o coa 8188 ·_o comu 8189 ↑_o coe 8190 finSupp cfsupp 8974 OrdIsocoi 9114 CNF ccnf 9265

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1803 ax-4 1817 ax-5 1918 ax-6 1976 ax-7 2016 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2158 ax-12 2175 ax-ext 2706 ax-rep 5168 ax-sep 5181 ax-nul 5188 ax-pow 5247 ax-pr 5311 ax-un 7512

This theorem depends on definitions: df-bi 210 df-an 400 df-or 848 df-3or 1090 df-3an 1091 df-tru 1546 df-fal 1556 df-ex 1788 df-nf 1792 df-sb 2071 df-mo 2537 df-eu 2566 df-clab 2713 df-cleq 2726 df-clel 2812 df-nfc 2882 df-ne 2936 df-ral 3059 df-rex 3060 df-reu 3061 df-rmo 3062 df-rab 3063 df-v 3403 df-sbc 3688 df-csb 3803 df-dif 3860 df-un 3862 df-in 3864 df-ss 3874 df-pss 3876 df-nul 4228 df-if 4430 df-pw 4505 df-sn 4532 df-pr 4534 df-tp 4536 df-op 4538 df-uni 4810 df-iun 4896 df-br 5044 df-opab 5106 df-mpt 5125 df-tr 5151 df-id 5444 df-eprel 5449 df-po 5457 df-so 5458 df-fr 5498 df-se 5499 df-we 5500 df-xp 5546 df-rel 5547 df-cnv 5548 df-co 5549 df-dm 5550 df-rn 5551 df-res 5552 df-ima 5553 df-pred 6149 df-ord 6205 df-on 6206 df-lim 6207 df-suc 6208 df-iota 6327 df-fun 6371 df-fn 6372 df-f 6373 df-f1 6374 df-fo 6375 df-f1o 6376 df-fv 6377 df-isom 6378 df-riota 7159 df-ov 7205 df-oprab 7206 df-mpo 7207 df-om 7634 df-2nd 7751 df-supp 7893 df-wrecs 8036 df-recs 8097 df-rdg 8135 df-seqom 8173 df-1o 8191 df-er 8380 df-map 8499 df-en 8616 df-dom 8617 df-sdom 8618 df-fin 8619 df-fsupp 8975 df-oi 9115 df-cnf 9266

This theorem is referenced by: cantnfp1 9285

W3C validator