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 9656

Description: Lemma for cantnfp1 9657. (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 9654	. . 3 ⊢ (𝜑 → 𝐹 ∈ 𝑆)
11		cantnfp1.h	. . 3 ⊢ 𝐻 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝑂‘𝑘)) ·_o (𝐹‘(𝑂‘𝑘))) +_o 𝑧)), ∅)
12	1, 2, 3, 4, 10, 11	cantnfval 9644	. 2 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐹) = (𝐻‘dom 𝑂))
13		cantnfp1.e	. . . 4 ⊢ (𝜑 → ∅ ∈ 𝑌)
14	1, 2, 3, 5, 6, 7, 8, 9, 13, 4	cantnfp1lem2 9655	. . 3 ⊢ (𝜑 → dom 𝑂 = suc ∪ dom 𝑂)
15	14	fveq2d 6889	. 2 ⊢ (𝜑 → (𝐻‘dom 𝑂) = (𝐻‘suc ∪ dom 𝑂))
16	1, 2, 3, 4, 10	cantnfcl 9643	. . . . . . 7 ⊢ (𝜑 → ( E We (𝐹 supp ∅) ∧ dom 𝑂 ∈ ω))
17	16	simprd 501	. . . . . 6 ⊢ (𝜑 → dom 𝑂 ∈ ω)
18	14, 17	eqeltrrd 2866	. . . . 5 ⊢ (𝜑 → suc ∪ dom 𝑂 ∈ ω)
19		peano2b 7885	. . . . 5 ⊢ (∪ dom 𝑂 ∈ ω ↔ suc ∪ dom 𝑂 ∈ ω)
20	18, 19	sylibr 237	. . . 4 ⊢ (𝜑 → ∪ dom 𝑂 ∈ ω)
21	1, 2, 3, 4, 10, 11	cantnfsuc 9646	. . . 4 ⊢ ((𝜑 ∧ ∪ dom 𝑂 ∈ ω) → (𝐻‘suc ∪ dom 𝑂) = (((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) +_o (𝐻‘∪ dom 𝑂)))
22	20, 21	mpdan 700	. . 3 ⊢ (𝜑 → (𝐻‘suc ∪ dom 𝑂) = (((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) +_o (𝐻‘∪ dom 𝑂)))
23		ovexd 7454	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐹 supp ∅) ∈ V)
24	16	simpld 500	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → E We (𝐹 supp ∅))
25	4	oiiso 9506	. . . . . . . . . . . . . . 15 ⊢ (((𝐹 supp ∅) ∈ V ∧ E We (𝐹 supp ∅)) → 𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)))
26	23, 24, 25	syl2anc 596	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)))
27		isof1o 7330	. . . . . . . . . . . . . 14 ⊢ (𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)) → 𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅))
28	26, 27	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅))
29		f1ocnv 6837	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → ^◡𝑂:(𝐹 supp ∅)–1-1-onto→dom 𝑂)
30		f1of 6824	. . . . . . . . . . . . 13 ⊢ (^◡𝑂:(𝐹 supp ∅)–1-1-onto→dom 𝑂 → ^◡𝑂:(𝐹 supp ∅)⟶dom 𝑂)
31	28, 29, 30	3syl 19	. . . . . . . . . . . 12 ⊢ (𝜑 → ^◡𝑂:(𝐹 supp ∅)⟶dom 𝑂)
32		iftrue 4495	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑋 → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = 𝑌)
33	9, 32, 6, 7	fvmptd3 7017	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐹‘𝑋) = 𝑌)
34	13	ne0d 4295	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑌 ≠ ∅)
35	33, 34	eqnetrd 3027	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹‘𝑋) ≠ ∅)
36	7	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → 𝑌 ∈ 𝐴)
37	1, 2, 3	cantnfs 9642	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝐺 ∈ 𝑆 ↔ (𝐺:𝐵⟶𝐴 ∧ 𝐺 finSupp ∅)))
38	5, 37	mpbid 235	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (𝐺:𝐵⟶𝐴 ∧ 𝐺 finSupp ∅))
39	38	simpld 500	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐺:𝐵⟶𝐴)
40	39	ffvelcdmda 7083	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → (𝐺‘𝑡) ∈ 𝐴)
41	36, 40	ifcld 4536	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) ∈ 𝐴)
42	41, 9	fmptd 7113	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐹:𝐵⟶𝐴)
43	42	ffnd 6710	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐹 Fn 𝐵)
44		0ex 5272	. . . . . . . . . . . . . . 15 ⊢ ∅ ∈ V
45	44	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∅ ∈ V)
46		elsuppfn 8172	. . . . . . . . . . . . . 14 ⊢ ((𝐹 Fn 𝐵 ∧ 𝐵 ∈ On ∧ ∅ ∈ V) → (𝑋 ∈ (𝐹 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐹‘𝑋) ≠ ∅)))
47	43, 3, 45, 46	syl3anc 1398	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 ∈ (𝐹 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐹‘𝑋) ≠ ∅)))
48	6, 35, 47	mpbir2and 726	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ∈ (𝐹 supp ∅))
49	31, 48	ffvelcdmd 7084	. . . . . . . . . . 11 ⊢ (𝜑 → (^◡𝑂‘𝑋) ∈ dom 𝑂)
50		elssuni 4906	. . . . . . . . . . 11 ⊢ ((^◡𝑂‘𝑋) ∈ dom 𝑂 → (^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂)
51	49, 50	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → (^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂)
52	4	oicl 9498	. . . . . . . . . . . 12 ⊢ Ord dom 𝑂
53		ordelon 6388	. . . . . . . . . . . 12 ⊢ ((Ord dom 𝑂 ∧ (^◡𝑂‘𝑋) ∈ dom 𝑂) → (^◡𝑂‘𝑋) ∈ On)
54	52, 49, 53	sylancr 599	. . . . . . . . . . 11 ⊢ (𝜑 → (^◡𝑂‘𝑋) ∈ On)
55		nnon 7874	. . . . . . . . . . . 12 ⊢ (∪ dom 𝑂 ∈ ω → ∪ dom 𝑂 ∈ On)
56	20, 55	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → ∪ dom 𝑂 ∈ On)
57		ontri1 6399	. . . . . . . . . . 11 ⊢ (((^◡𝑂‘𝑋) ∈ On ∧ ∪ dom 𝑂 ∈ On) → ((^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂 ↔ ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋)))
58	54, 56, 57	syl2anc 596	. . . . . . . . . 10 ⊢ (𝜑 → ((^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂 ↔ ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋)))
59	51, 58	mpbid 235	. . . . . . . . 9 ⊢ (𝜑 → ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋))
60		sucidg 6448	. . . . . . . . . . . . . 14 ⊢ (∪ dom 𝑂 ∈ ω → ∪ dom 𝑂 ∈ suc ∪ dom 𝑂)
61	20, 60	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∪ dom 𝑂 ∈ suc ∪ dom 𝑂)
62	61, 14	eleqtrrd 2868	. . . . . . . . . . . 12 ⊢ (𝜑 → ∪ dom 𝑂 ∈ dom 𝑂)
63		isorel 7333	. . . . . . . . . . . 12 ⊢ ((𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)) ∧ (∪ dom 𝑂 ∈ dom 𝑂 ∧ (^◡𝑂‘𝑋) ∈ dom 𝑂)) → (∪ dom 𝑂 E (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) E (𝑂‘(^◡𝑂‘𝑋))))
64	26, 62, 49, 63	syl12anc 850	. . . . . . . . . . 11 ⊢ (𝜑 → (∪ dom 𝑂 E (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) E (𝑂‘(^◡𝑂‘𝑋))))
65		fvex 6898	. . . . . . . . . . . 12 ⊢ (^◡𝑂‘𝑋) ∈ V
66	65	epeli 5565	. . . . . . . . . . 11 ⊢ (∪ dom 𝑂 E (^◡𝑂‘𝑋) ↔ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋))
67		fvex 6898	. . . . . . . . . . . 12 ⊢ (𝑂‘(^◡𝑂‘𝑋)) ∈ V
68	67	epeli 5565	. . . . . . . . . . 11 ⊢ ((𝑂‘∪ dom 𝑂) E (𝑂‘(^◡𝑂‘𝑋)) ↔ (𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋)))
69	64, 66, 68	3bitr3g 316	. . . . . . . . . 10 ⊢ (𝜑 → (∪ dom 𝑂 ∈ (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋))))
70		f1ocnvfv2 7284	. . . . . . . . . . . 12 ⊢ ((𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) ∧ 𝑋 ∈ (𝐹 supp ∅)) → (𝑂‘(^◡𝑂‘𝑋)) = 𝑋)
71	28, 48, 70	syl2anc 596	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂‘(^◡𝑂‘𝑋)) = 𝑋)
72	71	eleq2d 2851	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋)) ↔ (𝑂‘∪ dom 𝑂) ∈ 𝑋))
73	69, 72	bitrd 282	. . . . . . . . 9 ⊢ (𝜑 → (∪ dom 𝑂 ∈ (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) ∈ 𝑋))
74	59, 73	mtbid 327	. . . . . . . 8 ⊢ (𝜑 → ¬ (𝑂‘∪ dom 𝑂) ∈ 𝑋)
75	8	sseld 3937	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) → (𝑂‘∪ dom 𝑂) ∈ 𝑋))
76		suppssdm 8179	. . . . . . . . . . . . . . . 16 ⊢ (𝐹 supp ∅) ⊆ dom 𝐹
77	76, 42	fssdm 6729	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ 𝐵)
78		onss 7790	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ On → 𝐵 ⊆ On)
79	3, 78	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ⊆ On)
80	77, 79	sstrd 3948	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ On)
81	4	oif 9499	. . . . . . . . . . . . . . . 16 ⊢ 𝑂:dom 𝑂⟶(𝐹 supp ∅)
82	81	ffvelcdmi 7082	. . . . . . . . . . . . . . 15 ⊢ (∪ dom 𝑂 ∈ dom 𝑂 → (𝑂‘∪ dom 𝑂) ∈ (𝐹 supp ∅))
83	62, 82	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ (𝐹 supp ∅))
84	80, 83	sseldd 3939	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ On)
85		eloni 6374	. . . . . . . . . . . . 13 ⊢ ((𝑂‘∪ dom 𝑂) ∈ On → Ord (𝑂‘∪ dom 𝑂))
86	84, 85	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → Ord (𝑂‘∪ dom 𝑂))
87		ordn2lp 6384	. . . . . . . . . . . 12 ⊢ (Ord (𝑂‘∪ dom 𝑂) → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
88	86, 87	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
89		imnan 405	. . . . . . . . . . 11 ⊢ (((𝑂‘∪ dom 𝑂) ∈ 𝑋 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)) ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
90	88, 89	sylibr 237	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ 𝑋 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
91	75, 90	syld 48	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
92		onelon 6389	. . . . . . . . . . . . 13 ⊢ ((𝐵 ∈ On ∧ 𝑋 ∈ 𝐵) → 𝑋 ∈ On)
93	3, 6, 92	syl2anc 596	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ∈ On)
94		eloni 6374	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ On → Ord 𝑋)
95	93, 94	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → Ord 𝑋)
96		ordirr 6382	. . . . . . . . . . 11 ⊢ (Ord 𝑋 → ¬ 𝑋 ∈ 𝑋)
97	95, 96	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → ¬ 𝑋 ∈ 𝑋)
98		elsni 4608	. . . . . . . . . . . 12 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (𝑂‘∪ dom 𝑂) = 𝑋)
99	98	eleq2d 2851	. . . . . . . . . . 11 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (𝑋 ∈ (𝑂‘∪ dom 𝑂) ↔ 𝑋 ∈ 𝑋))
100	99	notbid 321	. . . . . . . . . 10 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂) ↔ ¬ 𝑋 ∈ 𝑋))
101	97, 100	syl5ibrcom 250	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
102		eqeq1 2769	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑘 → (𝑡 = 𝑋 ↔ 𝑘 = 𝑋))
103		fveq2 6885	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑘 → (𝐺‘𝑡) = (𝐺‘𝑘))
104	102, 103	ifbieq2d 4516	. . . . . . . . . . . . . 14 ⊢ (𝑡 = 𝑘 → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
105		eldifi 4085	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → 𝑘 ∈ 𝐵)
106	105	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → 𝑘 ∈ 𝐵)
107	7	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → 𝑌 ∈ 𝐴)
108		fvex 6898	. . . . . . . . . . . . . . 15 ⊢ (𝐺‘𝑘) ∈ V
109		ifexg 4539	. . . . . . . . . . . . . . 15 ⊢ ((𝑌 ∈ 𝐴 ∧ (𝐺‘𝑘) ∈ V) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
110	107, 108, 109	sylancl 598	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
111	9, 104, 106, 110	fvmptd3 7017	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐹‘𝑘) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
112		eldifn 4086	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → ¬ 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
113	112	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → ¬ 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
114		velsn 4607	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ {𝑋} ↔ 𝑘 = 𝑋)
115		elun2 4136	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ {𝑋} → 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
116	114, 115	sylbir 238	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑋 → 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
117	113, 116	nsyl 141	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → ¬ 𝑘 = 𝑋)
118	117	iffalsed 4500	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = (𝐺‘𝑘))
119		ssun1 4131	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋})
120		sscon 4097	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋}) → (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) ⊆ (𝐵 ∖ (𝐺 supp ∅)))
121	119, 120	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) ⊆ (𝐵 ∖ (𝐺 supp ∅))
122	121	sseli 3934	. . . . . . . . . . . . . 14 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → 𝑘 ∈ (𝐵 ∖ (𝐺 supp ∅)))
123		ssidd 3961	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ (𝐺 supp ∅))
124	39, 123, 3, 13	suppssr 8197	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐺 supp ∅))) → (𝐺‘𝑘) = ∅)
125	122, 124	sylan2 605	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐺‘𝑘) = ∅)
126	111, 118, 125	3eqtrd 2804	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐹‘𝑘) = ∅)
127	42, 126	suppss 8196	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋}))
128	127, 83	sseldd 3939	. . . . . . . . . 10 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ ((𝐺 supp ∅) ∪ {𝑋}))
129		elun 4107	. . . . . . . . . 10 ⊢ ((𝑂‘∪ dom 𝑂) ∈ ((𝐺 supp ∅) ∪ {𝑋}) ↔ ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) ∨ (𝑂‘∪ dom 𝑂) ∈ {𝑋}))
130	128, 129	sylib 221	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) ∨ (𝑂‘∪ dom 𝑂) ∈ {𝑋}))
131	91, 101, 130	mpjaod 874	. . . . . . . 8 ⊢ (𝜑 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂))
132		ioran 999	. . . . . . . 8 ⊢ (¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂)) ↔ (¬ (𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
133	74, 131, 132	sylanbrc 595	. . . . . . 7 ⊢ (𝜑 → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
134		ordtri3 6401	. . . . . . . 8 ⊢ ((Ord (𝑂‘∪ dom 𝑂) ∧ Ord 𝑋) → ((𝑂‘∪ dom 𝑂) = 𝑋 ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂))))
135	86, 95, 134	syl2anc 596	. . . . . . 7 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) = 𝑋 ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂))))
136	133, 135	mpbird 260	. . . . . 6 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) = 𝑋)
137	136	oveq2d 7435	. . . . 5 ⊢ (𝜑 → (𝐴 ↑_o (𝑂‘∪ dom 𝑂)) = (𝐴 ↑_o 𝑋))
138	136	fveq2d 6889	. . . . . 6 ⊢ (𝜑 → (𝐹‘(𝑂‘∪ dom 𝑂)) = (𝐹‘𝑋))
139	138, 33	eqtrd 2800	. . . . 5 ⊢ (𝜑 → (𝐹‘(𝑂‘∪ dom 𝑂)) = 𝑌)
140	137, 139	oveq12d 7437	. . . 4 ⊢ (𝜑 → ((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) = ((𝐴 ↑_o 𝑋) ·_o 𝑌))
141		nnord 7876	. . . . . . . . 9 ⊢ (∪ dom 𝑂 ∈ ω → Ord ∪ dom 𝑂)
142	20, 141	syl 18	. . . . . . . 8 ⊢ (𝜑 → Ord ∪ dom 𝑂)
143		sssucid 6447	. . . . . . . . . 10 ⊢ ∪ dom 𝑂 ⊆ suc ∪ dom 𝑂
144	143, 14	sseqtrrid 3981	. . . . . . . . 9 ⊢ (𝜑 → ∪ dom 𝑂 ⊆ dom 𝑂)
145		f1ofo 6832	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → 𝑂:dom 𝑂–onto→(𝐹 supp ∅))
146	28, 145	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑂:dom 𝑂–onto→(𝐹 supp ∅))
147		foima 6801	. . . . . . . . . . . 12 ⊢ (𝑂:dom 𝑂–onto→(𝐹 supp ∅) → (𝑂 “ dom 𝑂) = (𝐹 supp ∅))
148	146, 147	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ dom 𝑂) = (𝐹 supp ∅))
149		ffn 6709	. . . . . . . . . . . . . 14 ⊢ (𝑂:dom 𝑂⟶(𝐹 supp ∅) → 𝑂 Fn dom 𝑂)
150	81, 149	ax-mp 5	. . . . . . . . . . . . 13 ⊢ 𝑂 Fn dom 𝑂
151		fnsnfv 6964	. . . . . . . . . . . . 13 ⊢ ((𝑂 Fn dom 𝑂 ∧ ∪ dom 𝑂 ∈ dom 𝑂) → {(𝑂‘∪ dom 𝑂)} = (𝑂 “ {∪ dom 𝑂}))
152	150, 62, 151	sylancr 599	. . . . . . . . . . . 12 ⊢ (𝜑 → {(𝑂‘∪ dom 𝑂)} = (𝑂 “ {∪ dom 𝑂}))
153	136	sneqd 4603	. . . . . . . . . . . 12 ⊢ (𝜑 → {(𝑂‘∪ dom 𝑂)} = {𝑋})
154	152, 153	eqtr3d 2802	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ {∪ dom 𝑂}) = {𝑋})
155	148, 154	difeq12d 4082	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})) = ((𝐹 supp ∅) ∖ {𝑋}))
156		ordirr 6382	. . . . . . . . . . . . . . . . 17 ⊢ (Ord ∪ dom 𝑂 → ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
157	142, 156	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
158		disjsn 4679	. . . . . . . . . . . . . . . 16 ⊢ ((∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅ ↔ ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
159	157, 158	sylibr 237	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅)
160		disj3 4414	. . . . . . . . . . . . . . 15 ⊢ ((∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅ ↔ ∪ dom 𝑂 = (∪ dom 𝑂 ∖ {∪ dom 𝑂}))
161	159, 160	sylib 221	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∪ dom 𝑂 = (∪ dom 𝑂 ∖ {∪ dom 𝑂}))
162		difun2 4444	. . . . . . . . . . . . . 14 ⊢ ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}) = (∪ dom 𝑂 ∖ {∪ dom 𝑂})
163	161, 162	eqtr4di 2818	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∪ dom 𝑂 = ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}))
164		df-suc 6370	. . . . . . . . . . . . . . 15 ⊢ suc ∪ dom 𝑂 = (∪ dom 𝑂 ∪ {∪ dom 𝑂})
165	14, 164	eqtrdi 2816	. . . . . . . . . . . . . 14 ⊢ (𝜑 → dom 𝑂 = (∪ dom 𝑂 ∪ {∪ dom 𝑂}))
166	165	difeq1d 4080	. . . . . . . . . . . . 13 ⊢ (𝜑 → (dom 𝑂 ∖ {∪ dom 𝑂}) = ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}))
167	163, 166	eqtr4d 2803	. . . . . . . . . . . 12 ⊢ (𝜑 → ∪ dom 𝑂 = (dom 𝑂 ∖ {∪ dom 𝑂}))
168	167	imaeq2d 6064	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ ∪ dom 𝑂) = (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})))
169		dff1o3 6831	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) ↔ (𝑂:dom 𝑂–onto→(𝐹 supp ∅) ∧ Fun ^◡𝑂))
170	169	simprbi 503	. . . . . . . . . . . 12 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → Fun ^◡𝑂)
171		imadif 6624	. . . . . . . . . . . 12 ⊢ (Fun ^◡𝑂 → (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
172	28, 170, 171	3syl 19	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
173	168, 172	eqtrd 2800	. . . . . . . . . 10 ⊢ (𝜑 → (𝑂 “ ∪ dom 𝑂) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
174	8, 97	ssneldd 3941	. . . . . . . . . . . . 13 ⊢ (𝜑 → ¬ 𝑋 ∈ (𝐺 supp ∅))
175		disjsn 4679	. . . . . . . . . . . . 13 ⊢ (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ ¬ 𝑋 ∈ (𝐺 supp ∅))
176	174, 175	sylibr 237	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐺 supp ∅) ∩ {𝑋}) = ∅)
177		fvex 6898	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺‘𝑋) ∈ V
178		dif1o 8491	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ ((𝐺‘𝑋) ∈ V ∧ (𝐺‘𝑋) ≠ ∅))
179	177, 178	mpbiran 722	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ (𝐺‘𝑋) ≠ ∅)
180	39	ffnd 6710	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → 𝐺 Fn 𝐵)
181		elsuppfn 8172	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐺 Fn 𝐵 ∧ 𝐵 ∈ On ∧ ∅ ∈ V) → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅)))
182	180, 3, 45, 181	syl3anc 1398	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅)))
183	179	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ (𝐺‘𝑋) ≠ ∅))
184	183	bicomd 226	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → ((𝐺‘𝑋) ≠ ∅ ↔ (𝐺‘𝑋) ∈ (V ∖ 1_o)))
185	184	anbi2d 642	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → ((𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o))))
186	182, 185	bitrd 282	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o))))
187	8	sseld 3937	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) → 𝑋 ∈ 𝑋))
188	186, 187	sylbird 263	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → ((𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o)) → 𝑋 ∈ 𝑋))
189	6, 188	mpand 708	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝐺‘𝑋) ∈ (V ∖ 1_o) → 𝑋 ∈ 𝑋))
190	179, 189	biimtrrid 246	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((𝐺‘𝑋) ≠ ∅ → 𝑋 ∈ 𝑋))
191	190	necon1bd 2978	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (¬ 𝑋 ∈ 𝑋 → (𝐺‘𝑋) = ∅))
192	97, 191	mpd 16	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐺‘𝑋) = ∅)
193	192	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐺‘𝑋) = ∅)
194		fveqeq2 6894	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑋 → ((𝐺‘𝑘) = ∅ ↔ (𝐺‘𝑋) = ∅))
195	193, 194	syl5ibrcom 250	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝑘 = 𝑋 → (𝐺‘𝑘) = ∅))
196		eldifi 4085	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅)) → 𝑘 ∈ 𝐵)
197	196	adantl 487	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → 𝑘 ∈ 𝐵)
198	7	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → 𝑌 ∈ 𝐴)
199	198, 108, 109	sylancl 598	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
200	9, 104, 197, 199	fvmptd3 7017	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐹‘𝑘) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
201		ssidd 3961	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ (𝐹 supp ∅))
202	42, 201, 3, 13	suppssr 8197	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐹‘𝑘) = ∅)
203	200, 202	eqtr3d 2802	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = ∅)
204		iffalse 4498	. . . . . . . . . . . . . . . . 17 ⊢ (¬ 𝑘 = 𝑋 → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = (𝐺‘𝑘))
205	204	eqeq1d 2767	. . . . . . . . . . . . . . . 16 ⊢ (¬ 𝑘 = 𝑋 → (if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = ∅ ↔ (𝐺‘𝑘) = ∅))
206	203, 205	syl5ibcom 248	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (¬ 𝑘 = 𝑋 → (𝐺‘𝑘) = ∅))
207	195, 206	pm2.61d 181	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐺‘𝑘) = ∅)
208	39, 207	suppss 8196	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ (𝐹 supp ∅))
209		reldisj 4413	. . . . . . . . . . . . 13 ⊢ ((𝐺 supp ∅) ⊆ (𝐹 supp ∅) → (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋})))
210	208, 209	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋})))
211	176, 210	mpbid 235	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋}))
212		uncom 4112	. . . . . . . . . . . . 13 ⊢ ((𝐺 supp ∅) ∪ {𝑋}) = ({𝑋} ∪ (𝐺 supp ∅))
213	127, 212	sseqtrdi 3978	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ ({𝑋} ∪ (𝐺 supp ∅)))
214		ssundif 4450	. . . . . . . . . . . 12 ⊢ ((𝐹 supp ∅) ⊆ ({𝑋} ∪ (𝐺 supp ∅)) ↔ ((𝐹 supp ∅) ∖ {𝑋}) ⊆ (𝐺 supp ∅))
215	213, 214	sylib 221	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐹 supp ∅) ∖ {𝑋}) ⊆ (𝐺 supp ∅))
216	211, 215	eqssd 3955	. . . . . . . . . 10 ⊢ (𝜑 → (𝐺 supp ∅) = ((𝐹 supp ∅) ∖ {𝑋}))
217	155, 173, 216	3eqtr4rd 2811	. . . . . . . . 9 ⊢ (𝜑 → (𝐺 supp ∅) = (𝑂 “ ∪ dom 𝑂))
218		isores3 7342	. . . . . . . . 9 ⊢ ((𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)) ∧ ∪ dom 𝑂 ⊆ dom 𝑂 ∧ (𝐺 supp ∅) = (𝑂 “ ∪ dom 𝑂)) → (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅)))
219	26, 144, 217, 218	syl3anc 1398	. . . . . . . 8 ⊢ (𝜑 → (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅)))
220		cantnfp1.k	. . . . . . . . . . 11 ⊢ 𝐾 = OrdIso( E , (𝐺 supp ∅))
221	1, 2, 3, 220, 5	cantnfcl 9643	. . . . . . . . . 10 ⊢ (𝜑 → ( E We (𝐺 supp ∅) ∧ dom 𝐾 ∈ ω))
222	221	simpld 500	. . . . . . . . 9 ⊢ (𝜑 → E We (𝐺 supp ∅))
223		epse 5645	. . . . . . . . 9 ⊢ E Se (𝐺 supp ∅)
224	220	oieu 9508	. . . . . . . . 9 ⊢ (( E We (𝐺 supp ∅) ∧ E Se (𝐺 supp ∅)) → ((Ord ∪ dom 𝑂 ∧ (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅))) ↔ (∪ dom 𝑂 = dom 𝐾 ∧ (𝑂 ↾ ∪ dom 𝑂) = 𝐾)))
225	222, 223, 224	sylancl 598	. . . . . . . 8 ⊢ (𝜑 → ((Ord ∪ dom 𝑂 ∧ (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅))) ↔ (∪ dom 𝑂 = dom 𝐾 ∧ (𝑂 ↾ ∪ dom 𝑂) = 𝐾)))
226	142, 219, 225	mpbi2and 725	. . . . . . 7 ⊢ (𝜑 → (∪ dom 𝑂 = dom 𝐾 ∧ (𝑂 ↾ ∪ dom 𝑂) = 𝐾))
227	226	simpld 500	. . . . . 6 ⊢ (𝜑 → ∪ dom 𝑂 = dom 𝐾)
228	227	fveq2d 6889	. . . . 5 ⊢ (𝜑 → (𝑀‘∪ dom 𝑂) = (𝑀‘dom 𝐾))
229		eleq1 2853	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → (𝑥 ∈ dom 𝑂 ↔ ∅ ∈ dom 𝑂))
230		fveq2 6885	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → (𝐻‘𝑥) = (𝐻‘∅))
231		fveq2 6885	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → (𝑀‘𝑥) = (𝑀‘∅))
232		cantnfp1.m	. . . . . . . . . . . . . 14 ⊢ 𝑀 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝐾‘𝑘)) ·_o (𝐺‘(𝐾‘𝑘))) +_o 𝑧)), ∅)
233	232	seqom0g 8449	. . . . . . . . . . . . 13 ⊢ (∅ ∈ V → (𝑀‘∅) = ∅)
234	44, 233	ax-mp 5	. . . . . . . . . . . 12 ⊢ (𝑀‘∅) = ∅
235	231, 234	eqtrdi 2816	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → (𝑀‘𝑥) = ∅)
236	230, 235	eqeq12d 2781	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘∅) = ∅))
237	229, 236	imbi12d 347	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅)))
238	237	imbi2d 343	. . . . . . . 8 ⊢ (𝑥 = ∅ → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅))))
239		eleq1 2853	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ dom 𝑂 ↔ 𝑦 ∈ dom 𝑂))
240		fveq2 6885	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝐻‘𝑥) = (𝐻‘𝑦))
241		fveq2 6885	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝑀‘𝑥) = (𝑀‘𝑦))
242	240, 241	eqeq12d 2781	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘𝑦) = (𝑀‘𝑦)))
243	239, 242	imbi12d 347	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))))
244	243	imbi2d 343	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)))))
245		eleq1 2853	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → (𝑥 ∈ dom 𝑂 ↔ suc 𝑦 ∈ dom 𝑂))
246		fveq2 6885	. . . . . . . . . . 11 ⊢ (𝑥 = suc 𝑦 → (𝐻‘𝑥) = (𝐻‘suc 𝑦))
247		fveq2 6885	. . . . . . . . . . 11 ⊢ (𝑥 = suc 𝑦 → (𝑀‘𝑥) = (𝑀‘suc 𝑦))
248	246, 247	eqeq12d 2781	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))
249	245, 248	imbi12d 347	. . . . . . . . 9 ⊢ (𝑥 = suc 𝑦 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
250	249	imbi2d 343	. . . . . . . 8 ⊢ (𝑥 = suc 𝑦 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))))
251		eleq1 2853	. . . . . . . . . 10 ⊢ (𝑥 = ∪ dom 𝑂 → (𝑥 ∈ dom 𝑂 ↔ ∪ dom 𝑂 ∈ dom 𝑂))
252		fveq2 6885	. . . . . . . . . . 11 ⊢ (𝑥 = ∪ dom 𝑂 → (𝐻‘𝑥) = (𝐻‘∪ dom 𝑂))
253		fveq2 6885	. . . . . . . . . . 11 ⊢ (𝑥 = ∪ dom 𝑂 → (𝑀‘𝑥) = (𝑀‘∪ dom 𝑂))
254	252, 253	eqeq12d 2781	. . . . . . . . . 10 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂)))
255	251, 254	imbi12d 347	. . . . . . . . 9 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂))))
256	255	imbi2d 343	. . . . . . . 8 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂)))))
257	11	seqom0g 8449	. . . . . . . . 9 ⊢ (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅)
258	257	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅))
259		nnord 7876	. . . . . . . . . . . . . . . 16 ⊢ (dom 𝑂 ∈ ω → Ord dom 𝑂)
260	17, 259	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → Ord dom 𝑂)
261		ordtr 6378	. . . . . . . . . . . . . . 15 ⊢ (Ord dom 𝑂 → Tr dom 𝑂)
262	260, 261	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → Tr dom 𝑂)
263		trsuc 6454	. . . . . . . . . . . . . 14 ⊢ ((Tr dom 𝑂 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝑂)
264	262, 263	sylan 592	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝑂)
265	264	ex 418	. . . . . . . . . . . 12 ⊢ (𝜑 → (suc 𝑦 ∈ dom 𝑂 → 𝑦 ∈ dom 𝑂))
266	265	imim1d 83	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)) → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))))
267		oveq2 7427	. . . . . . . . . . . . . 14 ⊢ ((𝐻‘𝑦) = (𝑀‘𝑦) → (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
268		elnn 7879	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ dom 𝑂 ∧ dom 𝑂 ∈ ω) → 𝑦 ∈ ω)
269	268	ancoms 464	. . . . . . . . . . . . . . . . 17 ⊢ ((dom 𝑂 ∈ ω ∧ 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ω)
270	17, 264, 269	syl2an2r 698	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ω)
271	1, 2, 3, 4, 10, 11	cantnfsuc 9646	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (𝐻‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)))
272	270, 271	syldan 603	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐻‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)))
273	1, 2, 3, 220, 5, 232	cantnfsuc 9646	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)))
274	270, 273	syldan 603	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)))
275	226	simprd 501	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑂 ↾ ∪ dom 𝑂) = 𝐾)
276	275	fveq1d 6887	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝐾‘𝑦))
277	276	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝐾‘𝑦))
278	14	eleq2d 2851	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (suc 𝑦 ∈ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
279	278	biimpa 482	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → suc 𝑦 ∈ suc ∪ dom 𝑂)
280	142	adantr 486	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → Ord ∪ dom 𝑂)
281		ordsucelsuc 7824	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (Ord ∪ dom 𝑂 → (𝑦 ∈ ∪ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
282	280, 281	syl 18	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑦 ∈ ∪ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
283	279, 282	mpbird 260	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ∪ dom 𝑂)
284	283	fvresd 6905	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝑂‘𝑦))
285	277, 284	eqtr3d 2802	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) = (𝑂‘𝑦))
286	285	oveq2d 7435	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐴 ↑_o (𝐾‘𝑦)) = (𝐴 ↑_o (𝑂‘𝑦)))
287		eqeq1 2769	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑡 = (𝐾‘𝑦) → (𝑡 = 𝑋 ↔ (𝐾‘𝑦) = 𝑋))
288		fveq2 6885	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑡 = (𝐾‘𝑦) → (𝐺‘𝑡) = (𝐺‘(𝐾‘𝑦)))
289	287, 288	ifbieq2d 4516	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑡 = (𝐾‘𝑦) → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))))
290		suppssdm 8179	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐺 supp ∅) ⊆ dom 𝐺
291	290, 39	fssdm 6729	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ 𝐵)
292	291	adantr 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐺 supp ∅) ⊆ 𝐵)
293	227	adantr 486	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ∪ dom 𝑂 = dom 𝐾)
294	283, 293	eleqtrd 2867	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝐾)
295	220	oif 9499	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝐾:dom 𝐾⟶(𝐺 supp ∅)
296	295	ffvelcdmi 7082	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 ∈ dom 𝐾 → (𝐾‘𝑦) ∈ (𝐺 supp ∅))
297	294, 296	syl 18	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) ∈ (𝐺 supp ∅))
298	292, 297	sseldd 3939	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) ∈ 𝐵)
299	7	adantr 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑌 ∈ 𝐴)
300		fvex 6898	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺‘(𝐾‘𝑦)) ∈ V
301		ifexg 4539	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑌 ∈ 𝐴 ∧ (𝐺‘(𝐾‘𝑦)) ∈ V) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) ∈ V)
302	299, 300, 301	sylancl 598	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) ∈ V)
303	9, 289, 298, 302	fvmptd3 7017	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐹‘(𝐾‘𝑦)) = if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))))
304	285	fveq2d 6889	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐹‘(𝐾‘𝑦)) = (𝐹‘(𝑂‘𝑦)))
305	174	adantr 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ¬ 𝑋 ∈ (𝐺 supp ∅))
306		nelneq 2889	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝐾‘𝑦) ∈ (𝐺 supp ∅) ∧ ¬ 𝑋 ∈ (𝐺 supp ∅)) → ¬ (𝐾‘𝑦) = 𝑋)
307	297, 305, 306	syl2anc 596	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ¬ (𝐾‘𝑦) = 𝑋)
308	307	iffalsed 4500	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) = (𝐺‘(𝐾‘𝑦)))
309	303, 304, 308	3eqtr3rd 2809	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐺‘(𝐾‘𝑦)) = (𝐹‘(𝑂‘𝑦)))
310	286, 309	oveq12d 7437	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) = ((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))))
311	310	oveq1d 7434	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
312	274, 311	eqtrd 2800	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
313	272, 312	eqeq12d 2781	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐻‘suc 𝑦) = (𝑀‘suc 𝑦) ↔ (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦))))
314	267, 313	imbitrrid 249	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐻‘𝑦) = (𝑀‘𝑦) → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))
315	314	ex 418	. . . . . . . . . . . 12 ⊢ (𝜑 → (suc 𝑦 ∈ dom 𝑂 → ((𝐻‘𝑦) = (𝑀‘𝑦) → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
316	315	a2d 30	. . . . . . . . . . 11 ⊢ (𝜑 → ((suc 𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)) → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
317	266, 316	syld 48	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)) → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
318	317	a2i 15	. . . . . . . . 9 ⊢ ((𝜑 → (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))) → (𝜑 → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
319	318	a1i 11	. . . . . . . 8 ⊢ (𝑦 ∈ ω → ((𝜑 → (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))) → (𝜑 → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))))
320	238, 244, 250, 256, 258, 319	finds 7899	. . . . . . 7 ⊢ (∪ dom 𝑂 ∈ ω → (𝜑 → (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂))))
321	20, 320	mpcom 39	. . . . . 6 ⊢ (𝜑 → (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂)))
322	62, 321	mpd 16	. . . . 5 ⊢ (𝜑 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂))
323	1, 2, 3, 220, 5, 232	cantnfval 9644	. . . . 5 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐺) = (𝑀‘dom 𝐾))
324	228, 322, 323	3eqtr4d 2810	. . . 4 ⊢ (𝜑 → (𝐻‘∪ dom 𝑂) = ((𝐴 CNF 𝐵)‘𝐺))
325	140, 324	oveq12d 7437	. . 3 ⊢ (𝜑 → (((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) +_o (𝐻‘∪ dom 𝑂)) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))
326	22, 325	eqtrd 2800	. 2 ⊢ (𝜑 → (𝐻‘suc ∪ dom 𝑂) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))
327	12, 15, 326	3eqtrd 2804	1 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐹) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 = wceq 1570 ∈ wcel 2146 ≠ wne 2960 Vcvv 3457 ∖ cdif 3903 ∪ cun 3904 ∩ cin 3905 ⊆ wss 3906 ∅c0 4286 ifcif 4489 {csn 4591 ∪ cuni 4874 class class class wbr 5111 ↦ cmpt 5194 Tr wtr 5220 E cep 5562 Se wse 5614 We wwe 5615 ^◡ccnv 5662 dom cdm 5663 ↾ cres 5665 “ cima 5666 Ord word 6363 Oncon0 6364 suc csuc 6366 Fun wfun 6534 Fn wfn 6535 ⟶wf 6536 –onto→wfo 6538 –1-1-onto→wf1o 6539 ‘cfv 6540 Isom wiso 6541 (class class class)co 7419 ∈ cmpo 7421 ωcom 7868 supp csupp 8162 seq_ωcseqom 8440 1_oc1o 8452 +_o coa 8456 ·_o comu 8457 ↑_o coe 8458 finSupp cfsupp 9328 OrdIsocoi 9478 CNF ccnf 9637

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2148 ax-9 2156 ax-10 2179 ax-11 2195 ax-12 2216 ax-ext 2737 ax-rep 5240 ax-sep 5259 ax-nul 5271 ax-pow 5338 ax-pr 5406 ax-un 7742

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2569 df-eu 2599 df-clab 2744 df-cleq 2757 df-clel 2840 df-nfc 2914 df-ne 2961 df-ral 3082 df-rex 3092 df-rmo 3371 df-reu 3372 df-rab 3419 df-v 3459 df-sbc 3747 df-csb 3855 df-dif 3909 df-un 3911 df-in 3913 df-ss 3923 df-pss 3926 df-nul 4287 df-if 4490 df-pw 4566 df-sn 4592 df-pr 4594 df-op 4598 df-uni 4875 df-iun 4960 df-br 5112 df-opab 5176 df-mpt 5195 df-tr 5221 df-id 5558 df-eprel 5563 df-po 5571 df-so 5572 df-fr 5616 df-se 5617 df-we 5618 df-xp 5669 df-rel 5670 df-cnv 5671 df-co 5672 df-dm 5673 df-rn 5674 df-res 5675 df-ima 5676 df-pred 6306 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6496 df-fun 6542 df-fn 6543 df-f 6544 df-f1 6545 df-fo 6546 df-f1o 6547 df-fv 6548 df-isom 6549 df-riota 7376 df-ov 7422 df-oprab 7423 df-mpo 7424 df-om 7869 df-2nd 7993 df-supp 8163 df-frecs 8284 df-wrecs 8315 df-recs 8364 df-rdg 8403 df-seqom 8441 df-1o 8459 df-er 8700 df-map 8832 df-en 8950 df-dom 8951 df-sdom 8952 df-fin 8953 df-fsupp 9329 df-oi 9479 df-cnf 9638

This theorem is used by: cantnfp1 9657

W3C validator