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 9718

Description: Lemma for cantnfp1 9719. (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 9716	. . 3 ⊢ (𝜑 → 𝐹 ∈ 𝑆)
11		cantnfp1.h	. . 3 ⊢ 𝐻 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝑂‘𝑘)) ·_o (𝐹‘(𝑂‘𝑘))) +_o 𝑧)), ∅)
12	1, 2, 3, 4, 10, 11	cantnfval 9706	. 2 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐹) = (𝐻‘dom 𝑂))
13		cantnfp1.e	. . . 4 ⊢ (𝜑 → ∅ ∈ 𝑌)
14	1, 2, 3, 5, 6, 7, 8, 9, 13, 4	cantnfp1lem2 9717	. . 3 ⊢ (𝜑 → dom 𝑂 = suc ∪ dom 𝑂)
15	14	fveq2d 6911	. 2 ⊢ (𝜑 → (𝐻‘dom 𝑂) = (𝐻‘suc ∪ dom 𝑂))
16	1, 2, 3, 4, 10	cantnfcl 9705	. . . . . . 7 ⊢ (𝜑 → ( E We (𝐹 supp ∅) ∧ dom 𝑂 ∈ ω))
17	16	simprd 495	. . . . . 6 ⊢ (𝜑 → dom 𝑂 ∈ ω)
18	14, 17	eqeltrrd 2840	. . . . 5 ⊢ (𝜑 → suc ∪ dom 𝑂 ∈ ω)
19		peano2b 7904	. . . . 5 ⊢ (∪ dom 𝑂 ∈ ω ↔ suc ∪ dom 𝑂 ∈ ω)
20	18, 19	sylibr 234	. . . 4 ⊢ (𝜑 → ∪ dom 𝑂 ∈ ω)
21	1, 2, 3, 4, 10, 11	cantnfsuc 9708	. . . 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 7466	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐹 supp ∅) ∈ V)
24	16	simpld 494	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → E We (𝐹 supp ∅))
25	4	oiiso 9575	. . . . . . . . . . . . . . 15 ⊢ (((𝐹 supp ∅) ∈ V ∧ E We (𝐹 supp ∅)) → 𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)))
26	23, 24, 25	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)))
27		isof1o 7343	. . . . . . . . . . . . . 14 ⊢ (𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)) → 𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅))
28	26, 27	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅))
29		f1ocnv 6861	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → ^◡𝑂:(𝐹 supp ∅)–1-1-onto→dom 𝑂)
30		f1of 6849	. . . . . . . . . . . . 13 ⊢ (^◡𝑂:(𝐹 supp ∅)–1-1-onto→dom 𝑂 → ^◡𝑂:(𝐹 supp ∅)⟶dom 𝑂)
31	28, 29, 30	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → ^◡𝑂:(𝐹 supp ∅)⟶dom 𝑂)
32		iftrue 4537	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑋 → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = 𝑌)
33	9, 32, 6, 7	fvmptd3 7039	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐹‘𝑋) = 𝑌)
34	13	ne0d 4348	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑌 ≠ ∅)
35	33, 34	eqnetrd 3006	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹‘𝑋) ≠ ∅)
36	7	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → 𝑌 ∈ 𝐴)
37	1, 2, 3	cantnfs 9704	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝐺 ∈ 𝑆 ↔ (𝐺:𝐵⟶𝐴 ∧ 𝐺 finSupp ∅)))
38	5, 37	mpbid 232	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (𝐺:𝐵⟶𝐴 ∧ 𝐺 finSupp ∅))
39	38	simpld 494	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐺:𝐵⟶𝐴)
40	39	ffvelcdmda 7104	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → (𝐺‘𝑡) ∈ 𝐴)
41	36, 40	ifcld 4577	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝐵) → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) ∈ 𝐴)
42	41, 9	fmptd 7134	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐹:𝐵⟶𝐴)
43	42	ffnd 6738	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐹 Fn 𝐵)
44		0ex 5313	. . . . . . . . . . . . . . 15 ⊢ ∅ ∈ V
45	44	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∅ ∈ V)
46		elsuppfn 8194	. . . . . . . . . . . . . 14 ⊢ ((𝐹 Fn 𝐵 ∧ 𝐵 ∈ On ∧ ∅ ∈ V) → (𝑋 ∈ (𝐹 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐹‘𝑋) ≠ ∅)))
47	43, 3, 45, 46	syl3anc 1370	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 ∈ (𝐹 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐹‘𝑋) ≠ ∅)))
48	6, 35, 47	mpbir2and 713	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ∈ (𝐹 supp ∅))
49	31, 48	ffvelcdmd 7105	. . . . . . . . . . 11 ⊢ (𝜑 → (^◡𝑂‘𝑋) ∈ dom 𝑂)
50		elssuni 4942	. . . . . . . . . . 11 ⊢ ((^◡𝑂‘𝑋) ∈ dom 𝑂 → (^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂)
51	49, 50	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂)
52	4	oicl 9567	. . . . . . . . . . . 12 ⊢ Ord dom 𝑂
53		ordelon 6410	. . . . . . . . . . . 12 ⊢ ((Ord dom 𝑂 ∧ (^◡𝑂‘𝑋) ∈ dom 𝑂) → (^◡𝑂‘𝑋) ∈ On)
54	52, 49, 53	sylancr 587	. . . . . . . . . . 11 ⊢ (𝜑 → (^◡𝑂‘𝑋) ∈ On)
55		nnon 7893	. . . . . . . . . . . 12 ⊢ (∪ dom 𝑂 ∈ ω → ∪ dom 𝑂 ∈ On)
56	20, 55	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ∪ dom 𝑂 ∈ On)
57		ontri1 6420	. . . . . . . . . . 11 ⊢ (((^◡𝑂‘𝑋) ∈ On ∧ ∪ dom 𝑂 ∈ On) → ((^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂 ↔ ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋)))
58	54, 56, 57	syl2anc 584	. . . . . . . . . 10 ⊢ (𝜑 → ((^◡𝑂‘𝑋) ⊆ ∪ dom 𝑂 ↔ ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋)))
59	51, 58	mpbid 232	. . . . . . . . 9 ⊢ (𝜑 → ¬ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋))
60		sucidg 6467	. . . . . . . . . . . . . 14 ⊢ (∪ dom 𝑂 ∈ ω → ∪ dom 𝑂 ∈ suc ∪ dom 𝑂)
61	20, 60	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∪ dom 𝑂 ∈ suc ∪ dom 𝑂)
62	61, 14	eleqtrrd 2842	. . . . . . . . . . . 12 ⊢ (𝜑 → ∪ dom 𝑂 ∈ dom 𝑂)
63		isorel 7346	. . . . . . . . . . . 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 6920	. . . . . . . . . . . 12 ⊢ (^◡𝑂‘𝑋) ∈ V
66	65	epeli 5591	. . . . . . . . . . 11 ⊢ (∪ dom 𝑂 E (^◡𝑂‘𝑋) ↔ ∪ dom 𝑂 ∈ (^◡𝑂‘𝑋))
67		fvex 6920	. . . . . . . . . . . 12 ⊢ (𝑂‘(^◡𝑂‘𝑋)) ∈ V
68	67	epeli 5591	. . . . . . . . . . 11 ⊢ ((𝑂‘∪ dom 𝑂) E (𝑂‘(^◡𝑂‘𝑋)) ↔ (𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋)))
69	64, 66, 68	3bitr3g 313	. . . . . . . . . 10 ⊢ (𝜑 → (∪ dom 𝑂 ∈ (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋))))
70		f1ocnvfv2 7297	. . . . . . . . . . . 12 ⊢ ((𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) ∧ 𝑋 ∈ (𝐹 supp ∅)) → (𝑂‘(^◡𝑂‘𝑋)) = 𝑋)
71	28, 48, 70	syl2anc 584	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂‘(^◡𝑂‘𝑋)) = 𝑋)
72	71	eleq2d 2825	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝑂‘(^◡𝑂‘𝑋)) ↔ (𝑂‘∪ dom 𝑂) ∈ 𝑋))
73	69, 72	bitrd 279	. . . . . . . . 9 ⊢ (𝜑 → (∪ dom 𝑂 ∈ (^◡𝑂‘𝑋) ↔ (𝑂‘∪ dom 𝑂) ∈ 𝑋))
74	59, 73	mtbid 324	. . . . . . . 8 ⊢ (𝜑 → ¬ (𝑂‘∪ dom 𝑂) ∈ 𝑋)
75	8	sseld 3994	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) → (𝑂‘∪ dom 𝑂) ∈ 𝑋))
76		suppssdm 8201	. . . . . . . . . . . . . . . 16 ⊢ (𝐹 supp ∅) ⊆ dom 𝐹
77	76, 42	fssdm 6756	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ 𝐵)
78		onss 7804	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ On → 𝐵 ⊆ On)
79	3, 78	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ⊆ On)
80	77, 79	sstrd 4006	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ On)
81	4	oif 9568	. . . . . . . . . . . . . . . 16 ⊢ 𝑂:dom 𝑂⟶(𝐹 supp ∅)
82	81	ffvelcdmi 7103	. . . . . . . . . . . . . . 15 ⊢ (∪ dom 𝑂 ∈ dom 𝑂 → (𝑂‘∪ dom 𝑂) ∈ (𝐹 supp ∅))
83	62, 82	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ (𝐹 supp ∅))
84	80, 83	sseldd 3996	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ On)
85		eloni 6396	. . . . . . . . . . . . 13 ⊢ ((𝑂‘∪ dom 𝑂) ∈ On → Ord (𝑂‘∪ dom 𝑂))
86	84, 85	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → Ord (𝑂‘∪ dom 𝑂))
87		ordn2lp 6406	. . . . . . . . . . . 12 ⊢ (Ord (𝑂‘∪ dom 𝑂) → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
88	86, 87	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
89		imnan 399	. . . . . . . . . . 11 ⊢ (((𝑂‘∪ dom 𝑂) ∈ 𝑋 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)) ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
90	88, 89	sylibr 234	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ 𝑋 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
91	75, 90	syld 47	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
92		onelon 6411	. . . . . . . . . . . . 13 ⊢ ((𝐵 ∈ On ∧ 𝑋 ∈ 𝐵) → 𝑋 ∈ On)
93	3, 6, 92	syl2anc 584	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ∈ On)
94		eloni 6396	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ On → Ord 𝑋)
95	93, 94	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → Ord 𝑋)
96		ordirr 6404	. . . . . . . . . . 11 ⊢ (Ord 𝑋 → ¬ 𝑋 ∈ 𝑋)
97	95, 96	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ¬ 𝑋 ∈ 𝑋)
98		elsni 4648	. . . . . . . . . . . 12 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (𝑂‘∪ dom 𝑂) = 𝑋)
99	98	eleq2d 2825	. . . . . . . . . . 11 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (𝑋 ∈ (𝑂‘∪ dom 𝑂) ↔ 𝑋 ∈ 𝑋))
100	99	notbid 318	. . . . . . . . . 10 ⊢ ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → (¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂) ↔ ¬ 𝑋 ∈ 𝑋))
101	97, 100	syl5ibrcom 247	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ {𝑋} → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
102		eqeq1 2739	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑘 → (𝑡 = 𝑋 ↔ 𝑘 = 𝑋))
103		fveq2 6907	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = 𝑘 → (𝐺‘𝑡) = (𝐺‘𝑘))
104	102, 103	ifbieq2d 4557	. . . . . . . . . . . . . 14 ⊢ (𝑡 = 𝑘 → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
105		eldifi 4141	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → 𝑘 ∈ 𝐵)
106	105	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → 𝑘 ∈ 𝐵)
107	7	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → 𝑌 ∈ 𝐴)
108		fvex 6920	. . . . . . . . . . . . . . 15 ⊢ (𝐺‘𝑘) ∈ V
109		ifexg 4580	. . . . . . . . . . . . . . 15 ⊢ ((𝑌 ∈ 𝐴 ∧ (𝐺‘𝑘) ∈ V) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
110	107, 108, 109	sylancl 586	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
111	9, 104, 106, 110	fvmptd3 7039	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐹‘𝑘) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
112		eldifn 4142	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → ¬ 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
113	112	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → ¬ 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
114		velsn 4647	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ {𝑋} ↔ 𝑘 = 𝑋)
115		elun2 4193	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ {𝑋} → 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
116	114, 115	sylbir 235	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑋 → 𝑘 ∈ ((𝐺 supp ∅) ∪ {𝑋}))
117	113, 116	nsyl 140	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → ¬ 𝑘 = 𝑋)
118	117	iffalsed 4542	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = (𝐺‘𝑘))
119		ssun1 4188	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋})
120		sscon 4153	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋}) → (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) ⊆ (𝐵 ∖ (𝐺 supp ∅)))
121	119, 120	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) ⊆ (𝐵 ∖ (𝐺 supp ∅))
122	121	sseli 3991	. . . . . . . . . . . . . 14 ⊢ (𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋})) → 𝑘 ∈ (𝐵 ∖ (𝐺 supp ∅)))
123		ssidd 4019	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ (𝐺 supp ∅))
124	39, 123, 3, 13	suppssr 8219	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐺 supp ∅))) → (𝐺‘𝑘) = ∅)
125	122, 124	sylan2 593	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐺‘𝑘) = ∅)
126	111, 118, 125	3eqtrd 2779	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ ((𝐺 supp ∅) ∪ {𝑋}))) → (𝐹‘𝑘) = ∅)
127	42, 126	suppss 8218	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ ((𝐺 supp ∅) ∪ {𝑋}))
128	127, 83	sseldd 3996	. . . . . . . . . 10 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) ∈ ((𝐺 supp ∅) ∪ {𝑋}))
129		elun 4163	. . . . . . . . . 10 ⊢ ((𝑂‘∪ dom 𝑂) ∈ ((𝐺 supp ∅) ∪ {𝑋}) ↔ ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) ∨ (𝑂‘∪ dom 𝑂) ∈ {𝑋}))
130	128, 129	sylib 218	. . . . . . . . 9 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) ∈ (𝐺 supp ∅) ∨ (𝑂‘∪ dom 𝑂) ∈ {𝑋}))
131	91, 101, 130	mpjaod 860	. . . . . . . 8 ⊢ (𝜑 → ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂))
132		ioran 985	. . . . . . . 8 ⊢ (¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂)) ↔ (¬ (𝑂‘∪ dom 𝑂) ∈ 𝑋 ∧ ¬ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
133	74, 131, 132	sylanbrc 583	. . . . . . 7 ⊢ (𝜑 → ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂)))
134		ordtri3 6422	. . . . . . . 8 ⊢ ((Ord (𝑂‘∪ dom 𝑂) ∧ Ord 𝑋) → ((𝑂‘∪ dom 𝑂) = 𝑋 ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂))))
135	86, 95, 134	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → ((𝑂‘∪ dom 𝑂) = 𝑋 ↔ ¬ ((𝑂‘∪ dom 𝑂) ∈ 𝑋 ∨ 𝑋 ∈ (𝑂‘∪ dom 𝑂))))
136	133, 135	mpbird 257	. . . . . 6 ⊢ (𝜑 → (𝑂‘∪ dom 𝑂) = 𝑋)
137	136	oveq2d 7447	. . . . 5 ⊢ (𝜑 → (𝐴 ↑_o (𝑂‘∪ dom 𝑂)) = (𝐴 ↑_o 𝑋))
138	136	fveq2d 6911	. . . . . 6 ⊢ (𝜑 → (𝐹‘(𝑂‘∪ dom 𝑂)) = (𝐹‘𝑋))
139	138, 33	eqtrd 2775	. . . . 5 ⊢ (𝜑 → (𝐹‘(𝑂‘∪ dom 𝑂)) = 𝑌)
140	137, 139	oveq12d 7449	. . . 4 ⊢ (𝜑 → ((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) = ((𝐴 ↑_o 𝑋) ·_o 𝑌))
141		nnord 7895	. . . . . . . . 9 ⊢ (∪ dom 𝑂 ∈ ω → Ord ∪ dom 𝑂)
142	20, 141	syl 17	. . . . . . . 8 ⊢ (𝜑 → Ord ∪ dom 𝑂)
143		sssucid 6466	. . . . . . . . . 10 ⊢ ∪ dom 𝑂 ⊆ suc ∪ dom 𝑂
144	143, 14	sseqtrrid 4049	. . . . . . . . 9 ⊢ (𝜑 → ∪ dom 𝑂 ⊆ dom 𝑂)
145		f1ofo 6856	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → 𝑂:dom 𝑂–onto→(𝐹 supp ∅))
146	28, 145	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑂:dom 𝑂–onto→(𝐹 supp ∅))
147		foima 6826	. . . . . . . . . . . 12 ⊢ (𝑂:dom 𝑂–onto→(𝐹 supp ∅) → (𝑂 “ dom 𝑂) = (𝐹 supp ∅))
148	146, 147	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ dom 𝑂) = (𝐹 supp ∅))
149		ffn 6737	. . . . . . . . . . . . . 14 ⊢ (𝑂:dom 𝑂⟶(𝐹 supp ∅) → 𝑂 Fn dom 𝑂)
150	81, 149	ax-mp 5	. . . . . . . . . . . . 13 ⊢ 𝑂 Fn dom 𝑂
151		fnsnfv 6988	. . . . . . . . . . . . 13 ⊢ ((𝑂 Fn dom 𝑂 ∧ ∪ dom 𝑂 ∈ dom 𝑂) → {(𝑂‘∪ dom 𝑂)} = (𝑂 “ {∪ dom 𝑂}))
152	150, 62, 151	sylancr 587	. . . . . . . . . . . 12 ⊢ (𝜑 → {(𝑂‘∪ dom 𝑂)} = (𝑂 “ {∪ dom 𝑂}))
153	136	sneqd 4643	. . . . . . . . . . . 12 ⊢ (𝜑 → {(𝑂‘∪ dom 𝑂)} = {𝑋})
154	152, 153	eqtr3d 2777	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ {∪ dom 𝑂}) = {𝑋})
155	148, 154	difeq12d 4137	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})) = ((𝐹 supp ∅) ∖ {𝑋}))
156		ordirr 6404	. . . . . . . . . . . . . . . . 17 ⊢ (Ord ∪ dom 𝑂 → ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
157	142, 156	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
158		disjsn 4716	. . . . . . . . . . . . . . . 16 ⊢ ((∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅ ↔ ¬ ∪ dom 𝑂 ∈ ∪ dom 𝑂)
159	157, 158	sylibr 234	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅)
160		disj3 4460	. . . . . . . . . . . . . . 15 ⊢ ((∪ dom 𝑂 ∩ {∪ dom 𝑂}) = ∅ ↔ ∪ dom 𝑂 = (∪ dom 𝑂 ∖ {∪ dom 𝑂}))
161	159, 160	sylib 218	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∪ dom 𝑂 = (∪ dom 𝑂 ∖ {∪ dom 𝑂}))
162		difun2 4487	. . . . . . . . . . . . . 14 ⊢ ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}) = (∪ dom 𝑂 ∖ {∪ dom 𝑂})
163	161, 162	eqtr4di 2793	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∪ dom 𝑂 = ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}))
164		df-suc 6392	. . . . . . . . . . . . . . 15 ⊢ suc ∪ dom 𝑂 = (∪ dom 𝑂 ∪ {∪ dom 𝑂})
165	14, 164	eqtrdi 2791	. . . . . . . . . . . . . 14 ⊢ (𝜑 → dom 𝑂 = (∪ dom 𝑂 ∪ {∪ dom 𝑂}))
166	165	difeq1d 4135	. . . . . . . . . . . . 13 ⊢ (𝜑 → (dom 𝑂 ∖ {∪ dom 𝑂}) = ((∪ dom 𝑂 ∪ {∪ dom 𝑂}) ∖ {∪ dom 𝑂}))
167	163, 166	eqtr4d 2778	. . . . . . . . . . . 12 ⊢ (𝜑 → ∪ dom 𝑂 = (dom 𝑂 ∖ {∪ dom 𝑂}))
168	167	imaeq2d 6080	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ ∪ dom 𝑂) = (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})))
169		dff1o3 6855	. . . . . . . . . . . . 13 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) ↔ (𝑂:dom 𝑂–onto→(𝐹 supp ∅) ∧ Fun ^◡𝑂))
170	169	simprbi 496	. . . . . . . . . . . 12 ⊢ (𝑂:dom 𝑂–1-1-onto→(𝐹 supp ∅) → Fun ^◡𝑂)
171		imadif 6652	. . . . . . . . . . . 12 ⊢ (Fun ^◡𝑂 → (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
172	28, 170, 171	3syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑂 “ (dom 𝑂 ∖ {∪ dom 𝑂})) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
173	168, 172	eqtrd 2775	. . . . . . . . . 10 ⊢ (𝜑 → (𝑂 “ ∪ dom 𝑂) = ((𝑂 “ dom 𝑂) ∖ (𝑂 “ {∪ dom 𝑂})))
174	8, 97	ssneldd 3998	. . . . . . . . . . . . 13 ⊢ (𝜑 → ¬ 𝑋 ∈ (𝐺 supp ∅))
175		disjsn 4716	. . . . . . . . . . . . 13 ⊢ (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ ¬ 𝑋 ∈ (𝐺 supp ∅))
176	174, 175	sylibr 234	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐺 supp ∅) ∩ {𝑋}) = ∅)
177		fvex 6920	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺‘𝑋) ∈ V
178		dif1o 8537	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ ((𝐺‘𝑋) ∈ V ∧ (𝐺‘𝑋) ≠ ∅))
179	177, 178	mpbiran 709	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ (𝐺‘𝑋) ≠ ∅)
180	39	ffnd 6738	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → 𝐺 Fn 𝐵)
181		elsuppfn 8194	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐺 Fn 𝐵 ∧ 𝐵 ∈ On ∧ ∅ ∈ V) → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅)))
182	180, 3, 45, 181	syl3anc 1370	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅)))
183	179	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → ((𝐺‘𝑋) ∈ (V ∖ 1_o) ↔ (𝐺‘𝑋) ≠ ∅))
184	183	bicomd 223	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → ((𝐺‘𝑋) ≠ ∅ ↔ (𝐺‘𝑋) ∈ (V ∖ 1_o)))
185	184	anbi2d 630	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → ((𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ≠ ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o))))
186	182, 185	bitrd 279	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) ↔ (𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o))))
187	8	sseld 3994	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑋 ∈ (𝐺 supp ∅) → 𝑋 ∈ 𝑋))
188	186, 187	sylbird 260	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → ((𝑋 ∈ 𝐵 ∧ (𝐺‘𝑋) ∈ (V ∖ 1_o)) → 𝑋 ∈ 𝑋))
189	6, 188	mpand 695	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝐺‘𝑋) ∈ (V ∖ 1_o) → 𝑋 ∈ 𝑋))
190	179, 189	biimtrrid 243	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((𝐺‘𝑋) ≠ ∅ → 𝑋 ∈ 𝑋))
191	190	necon1bd 2956	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (¬ 𝑋 ∈ 𝑋 → (𝐺‘𝑋) = ∅))
192	97, 191	mpd 15	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐺‘𝑋) = ∅)
193	192	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐺‘𝑋) = ∅)
194		fveqeq2 6916	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑋 → ((𝐺‘𝑘) = ∅ ↔ (𝐺‘𝑋) = ∅))
195	193, 194	syl5ibrcom 247	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝑘 = 𝑋 → (𝐺‘𝑘) = ∅))
196		eldifi 4141	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅)) → 𝑘 ∈ 𝐵)
197	196	adantl 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → 𝑘 ∈ 𝐵)
198	7	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → 𝑌 ∈ 𝐴)
199	198, 108, 109	sylancl 586	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) ∈ V)
200	9, 104, 197, 199	fvmptd3 7039	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐹‘𝑘) = if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)))
201		ssidd 4019	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ (𝐹 supp ∅))
202	42, 201, 3, 13	suppssr 8219	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐹‘𝑘) = ∅)
203	200, 202	eqtr3d 2777	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = ∅)
204		iffalse 4540	. . . . . . . . . . . . . . . . 17 ⊢ (¬ 𝑘 = 𝑋 → if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = (𝐺‘𝑘))
205	204	eqeq1d 2737	. . . . . . . . . . . . . . . 16 ⊢ (¬ 𝑘 = 𝑋 → (if(𝑘 = 𝑋, 𝑌, (𝐺‘𝑘)) = ∅ ↔ (𝐺‘𝑘) = ∅))
206	203, 205	syl5ibcom 245	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (¬ 𝑘 = 𝑋 → (𝐺‘𝑘) = ∅))
207	195, 206	pm2.61d 179	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐵 ∖ (𝐹 supp ∅))) → (𝐺‘𝑘) = ∅)
208	39, 207	suppss 8218	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ (𝐹 supp ∅))
209		reldisj 4459	. . . . . . . . . . . . 13 ⊢ ((𝐺 supp ∅) ⊆ (𝐹 supp ∅) → (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋})))
210	208, 209	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝐺 supp ∅) ∩ {𝑋}) = ∅ ↔ (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋})))
211	176, 210	mpbid 232	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ ((𝐹 supp ∅) ∖ {𝑋}))
212		uncom 4168	. . . . . . . . . . . . 13 ⊢ ((𝐺 supp ∅) ∪ {𝑋}) = ({𝑋} ∪ (𝐺 supp ∅))
213	127, 212	sseqtrdi 4046	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐹 supp ∅) ⊆ ({𝑋} ∪ (𝐺 supp ∅)))
214		ssundif 4494	. . . . . . . . . . . 12 ⊢ ((𝐹 supp ∅) ⊆ ({𝑋} ∪ (𝐺 supp ∅)) ↔ ((𝐹 supp ∅) ∖ {𝑋}) ⊆ (𝐺 supp ∅))
215	213, 214	sylib 218	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐹 supp ∅) ∖ {𝑋}) ⊆ (𝐺 supp ∅))
216	211, 215	eqssd 4013	. . . . . . . . . 10 ⊢ (𝜑 → (𝐺 supp ∅) = ((𝐹 supp ∅) ∖ {𝑋}))
217	155, 173, 216	3eqtr4rd 2786	. . . . . . . . 9 ⊢ (𝜑 → (𝐺 supp ∅) = (𝑂 “ ∪ dom 𝑂))
218		isores3 7355	. . . . . . . . 9 ⊢ ((𝑂 Isom E , E (dom 𝑂, (𝐹 supp ∅)) ∧ ∪ dom 𝑂 ⊆ dom 𝑂 ∧ (𝐺 supp ∅) = (𝑂 “ ∪ dom 𝑂)) → (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅)))
219	26, 144, 217, 218	syl3anc 1370	. . . . . . . 8 ⊢ (𝜑 → (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅)))
220		cantnfp1.k	. . . . . . . . . . 11 ⊢ 𝐾 = OrdIso( E , (𝐺 supp ∅))
221	1, 2, 3, 220, 5	cantnfcl 9705	. . . . . . . . . 10 ⊢ (𝜑 → ( E We (𝐺 supp ∅) ∧ dom 𝐾 ∈ ω))
222	221	simpld 494	. . . . . . . . 9 ⊢ (𝜑 → E We (𝐺 supp ∅))
223		epse 5671	. . . . . . . . 9 ⊢ E Se (𝐺 supp ∅)
224	220	oieu 9577	. . . . . . . . 9 ⊢ (( E We (𝐺 supp ∅) ∧ E Se (𝐺 supp ∅)) → ((Ord ∪ dom 𝑂 ∧ (𝑂 ↾ ∪ dom 𝑂) Isom E , E (∪ dom 𝑂, (𝐺 supp ∅))) ↔ (∪ dom 𝑂 = dom 𝐾 ∧ (𝑂 ↾ ∪ dom 𝑂) = 𝐾)))
225	222, 223, 224	sylancl 586	. . . . . . . 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 494	. . . . . 6 ⊢ (𝜑 → ∪ dom 𝑂 = dom 𝐾)
228	227	fveq2d 6911	. . . . 5 ⊢ (𝜑 → (𝑀‘∪ dom 𝑂) = (𝑀‘dom 𝐾))
229		eleq1 2827	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → (𝑥 ∈ dom 𝑂 ↔ ∅ ∈ dom 𝑂))
230		fveq2 6907	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → (𝐻‘𝑥) = (𝐻‘∅))
231		fveq2 6907	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → (𝑀‘𝑥) = (𝑀‘∅))
232		cantnfp1.m	. . . . . . . . . . . . . 14 ⊢ 𝑀 = seq_ω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑_o (𝐾‘𝑘)) ·_o (𝐺‘(𝐾‘𝑘))) +_o 𝑧)), ∅)
233	232	seqom0g 8495	. . . . . . . . . . . . 13 ⊢ (∅ ∈ V → (𝑀‘∅) = ∅)
234	44, 233	ax-mp 5	. . . . . . . . . . . 12 ⊢ (𝑀‘∅) = ∅
235	231, 234	eqtrdi 2791	. . . . . . . . . . 11 ⊢ (𝑥 = ∅ → (𝑀‘𝑥) = ∅)
236	230, 235	eqeq12d 2751	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘∅) = ∅))
237	229, 236	imbi12d 344	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅)))
238	237	imbi2d 340	. . . . . . . 8 ⊢ (𝑥 = ∅ → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅))))
239		eleq1 2827	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ dom 𝑂 ↔ 𝑦 ∈ dom 𝑂))
240		fveq2 6907	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝐻‘𝑥) = (𝐻‘𝑦))
241		fveq2 6907	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝑀‘𝑥) = (𝑀‘𝑦))
242	240, 241	eqeq12d 2751	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘𝑦) = (𝑀‘𝑦)))
243	239, 242	imbi12d 344	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))))
244	243	imbi2d 340	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)))))
245		eleq1 2827	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → (𝑥 ∈ dom 𝑂 ↔ suc 𝑦 ∈ dom 𝑂))
246		fveq2 6907	. . . . . . . . . . 11 ⊢ (𝑥 = suc 𝑦 → (𝐻‘𝑥) = (𝐻‘suc 𝑦))
247		fveq2 6907	. . . . . . . . . . 11 ⊢ (𝑥 = suc 𝑦 → (𝑀‘𝑥) = (𝑀‘suc 𝑦))
248	246, 247	eqeq12d 2751	. . . . . . . . . 10 ⊢ (𝑥 = suc 𝑦 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))
249	245, 248	imbi12d 344	. . . . . . . . 9 ⊢ (𝑥 = suc 𝑦 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦))))
250	249	imbi2d 340	. . . . . . . 8 ⊢ (𝑥 = suc 𝑦 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))))
251		eleq1 2827	. . . . . . . . . 10 ⊢ (𝑥 = ∪ dom 𝑂 → (𝑥 ∈ dom 𝑂 ↔ ∪ dom 𝑂 ∈ dom 𝑂))
252		fveq2 6907	. . . . . . . . . . 11 ⊢ (𝑥 = ∪ dom 𝑂 → (𝐻‘𝑥) = (𝐻‘∪ dom 𝑂))
253		fveq2 6907	. . . . . . . . . . 11 ⊢ (𝑥 = ∪ dom 𝑂 → (𝑀‘𝑥) = (𝑀‘∪ dom 𝑂))
254	252, 253	eqeq12d 2751	. . . . . . . . . 10 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝐻‘𝑥) = (𝑀‘𝑥) ↔ (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂)))
255	251, 254	imbi12d 344	. . . . . . . . 9 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥)) ↔ (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂))))
256	255	imbi2d 340	. . . . . . . 8 ⊢ (𝑥 = ∪ dom 𝑂 → ((𝜑 → (𝑥 ∈ dom 𝑂 → (𝐻‘𝑥) = (𝑀‘𝑥))) ↔ (𝜑 → (∪ dom 𝑂 ∈ dom 𝑂 → (𝐻‘∪ dom 𝑂) = (𝑀‘∪ dom 𝑂)))))
257	11	seqom0g 8495	. . . . . . . . 9 ⊢ (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅)
258	257	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (∅ ∈ dom 𝑂 → (𝐻‘∅) = ∅))
259		nnord 7895	. . . . . . . . . . . . . . . 16 ⊢ (dom 𝑂 ∈ ω → Ord dom 𝑂)
260	17, 259	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → Ord dom 𝑂)
261		ordtr 6400	. . . . . . . . . . . . . . 15 ⊢ (Ord dom 𝑂 → Tr dom 𝑂)
262	260, 261	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → Tr dom 𝑂)
263		trsuc 6473	. . . . . . . . . . . . . 14 ⊢ ((Tr dom 𝑂 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝑂)
264	262, 263	sylan 580	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝑂)
265	264	ex 412	. . . . . . . . . . . 12 ⊢ (𝜑 → (suc 𝑦 ∈ dom 𝑂 → 𝑦 ∈ dom 𝑂))
266	265	imim1d 82	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦)) → (suc 𝑦 ∈ dom 𝑂 → (𝐻‘𝑦) = (𝑀‘𝑦))))
267		oveq2 7439	. . . . . . . . . . . . . 14 ⊢ ((𝐻‘𝑦) = (𝑀‘𝑦) → (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
268		elnn 7898	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ dom 𝑂 ∧ dom 𝑂 ∈ ω) → 𝑦 ∈ ω)
269	268	ancoms 458	. . . . . . . . . . . . . . . . 17 ⊢ ((dom 𝑂 ∈ ω ∧ 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ω)
270	17, 264, 269	syl2an2r 685	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ω)
271	1, 2, 3, 4, 10, 11	cantnfsuc 9708	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (𝐻‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)))
272	270, 271	syldan 591	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐻‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)))
273	1, 2, 3, 220, 5, 232	cantnfsuc 9708	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑦 ∈ ω) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)))
274	270, 273	syldan 591	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)))
275	226	simprd 495	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑂 ↾ ∪ dom 𝑂) = 𝐾)
276	275	fveq1d 6909	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝐾‘𝑦))
277	276	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝐾‘𝑦))
278	14	eleq2d 2825	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (suc 𝑦 ∈ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
279	278	biimpa 476	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → suc 𝑦 ∈ suc ∪ dom 𝑂)
280	142	adantr 480	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → Ord ∪ dom 𝑂)
281		ordsucelsuc 7842	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (Ord ∪ dom 𝑂 → (𝑦 ∈ ∪ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
282	280, 281	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑦 ∈ ∪ dom 𝑂 ↔ suc 𝑦 ∈ suc ∪ dom 𝑂))
283	279, 282	mpbird 257	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ ∪ dom 𝑂)
284	283	fvresd 6927	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝑂 ↾ ∪ dom 𝑂)‘𝑦) = (𝑂‘𝑦))
285	277, 284	eqtr3d 2777	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) = (𝑂‘𝑦))
286	285	oveq2d 7447	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐴 ↑_o (𝐾‘𝑦)) = (𝐴 ↑_o (𝑂‘𝑦)))
287		eqeq1 2739	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑡 = (𝐾‘𝑦) → (𝑡 = 𝑋 ↔ (𝐾‘𝑦) = 𝑋))
288		fveq2 6907	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑡 = (𝐾‘𝑦) → (𝐺‘𝑡) = (𝐺‘(𝐾‘𝑦)))
289	287, 288	ifbieq2d 4557	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑡 = (𝐾‘𝑦) → if(𝑡 = 𝑋, 𝑌, (𝐺‘𝑡)) = if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))))
290		suppssdm 8201	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐺 supp ∅) ⊆ dom 𝐺
291	290, 39	fssdm 6756	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝐺 supp ∅) ⊆ 𝐵)
292	291	adantr 480	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐺 supp ∅) ⊆ 𝐵)
293	227	adantr 480	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ∪ dom 𝑂 = dom 𝐾)
294	283, 293	eleqtrd 2841	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑦 ∈ dom 𝐾)
295	220	oif 9568	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝐾:dom 𝐾⟶(𝐺 supp ∅)
296	295	ffvelcdmi 7103	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 ∈ dom 𝐾 → (𝐾‘𝑦) ∈ (𝐺 supp ∅))
297	294, 296	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) ∈ (𝐺 supp ∅))
298	292, 297	sseldd 3996	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐾‘𝑦) ∈ 𝐵)
299	7	adantr 480	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → 𝑌 ∈ 𝐴)
300		fvex 6920	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺‘(𝐾‘𝑦)) ∈ V
301		ifexg 4580	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑌 ∈ 𝐴 ∧ (𝐺‘(𝐾‘𝑦)) ∈ V) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) ∈ V)
302	299, 300, 301	sylancl 586	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) ∈ V)
303	9, 289, 298, 302	fvmptd3 7039	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐹‘(𝐾‘𝑦)) = if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))))
304	285	fveq2d 6911	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐹‘(𝐾‘𝑦)) = (𝐹‘(𝑂‘𝑦)))
305	174	adantr 480	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ¬ 𝑋 ∈ (𝐺 supp ∅))
306		nelneq 2863	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝐾‘𝑦) ∈ (𝐺 supp ∅) ∧ ¬ 𝑋 ∈ (𝐺 supp ∅)) → ¬ (𝐾‘𝑦) = 𝑋)
307	297, 305, 306	syl2anc 584	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ¬ (𝐾‘𝑦) = 𝑋)
308	307	iffalsed 4542	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → if((𝐾‘𝑦) = 𝑋, 𝑌, (𝐺‘(𝐾‘𝑦))) = (𝐺‘(𝐾‘𝑦)))
309	303, 304, 308	3eqtr3rd 2784	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝐺‘(𝐾‘𝑦)) = (𝐹‘(𝑂‘𝑦)))
310	286, 309	oveq12d 7449	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) = ((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))))
311	310	oveq1d 7446	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (((𝐴 ↑_o (𝐾‘𝑦)) ·_o (𝐺‘(𝐾‘𝑦))) +_o (𝑀‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
312	274, 311	eqtrd 2775	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → (𝑀‘suc 𝑦) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦)))
313	272, 312	eqeq12d 2751	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐻‘suc 𝑦) = (𝑀‘suc 𝑦) ↔ (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝐻‘𝑦)) = (((𝐴 ↑_o (𝑂‘𝑦)) ·_o (𝐹‘(𝑂‘𝑦))) +_o (𝑀‘𝑦))))
314	267, 313	imbitrrid 246	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ suc 𝑦 ∈ dom 𝑂) → ((𝐻‘𝑦) = (𝑀‘𝑦) → (𝐻‘suc 𝑦) = (𝑀‘suc 𝑦)))
315	314	ex 412	. . . . . . . . . . . 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 7919	. . . . . . 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 9706	. . . . 5 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐺) = (𝑀‘dom 𝐾))
324	228, 322, 323	3eqtr4d 2785	. . . 4 ⊢ (𝜑 → (𝐻‘∪ dom 𝑂) = ((𝐴 CNF 𝐵)‘𝐺))
325	140, 324	oveq12d 7449	. . 3 ⊢ (𝜑 → (((𝐴 ↑_o (𝑂‘∪ dom 𝑂)) ·_o (𝐹‘(𝑂‘∪ dom 𝑂))) +_o (𝐻‘∪ dom 𝑂)) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))
326	22, 325	eqtrd 2775	. 2 ⊢ (𝜑 → (𝐻‘suc ∪ dom 𝑂) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))
327	12, 15, 326	3eqtrd 2779	1 ⊢ (𝜑 → ((𝐴 CNF 𝐵)‘𝐹) = (((𝐴 ↑_o 𝑋) ·_o 𝑌) +_o ((𝐴 CNF 𝐵)‘𝐺)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 847 = wceq 1537 ∈ wcel 2106 ≠ wne 2938 Vcvv 3478 ∖ cdif 3960 ∪ cun 3961 ∩ cin 3962 ⊆ wss 3963 ∅c0 4339 ifcif 4531 {csn 4631 ∪ cuni 4912 class class class wbr 5148 ↦ cmpt 5231 Tr wtr 5265 E cep 5588 Se wse 5639 We wwe 5640 ^◡ccnv 5688 dom cdm 5689 ↾ cres 5691 “ cima 5692 Ord word 6385 Oncon0 6386 suc csuc 6388 Fun wfun 6557 Fn wfn 6558 ⟶wf 6559 –onto→wfo 6561 –1-1-onto→wf1o 6562 ‘cfv 6563 Isom wiso 6564 (class class class)co 7431 ∈ cmpo 7433 ωcom 7887 supp csupp 8184 seq_ωcseqom 8486 1_oc1o 8498 +_o coa 8502 ·_o comu 8503 ↑_o coe 8504 finSupp cfsupp 9399 OrdIsocoi 9547 CNF ccnf 9699

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1908 ax-6 1965 ax-7 2005 ax-8 2108 ax-9 2116 ax-10 2139 ax-11 2155 ax-12 2175 ax-ext 2706 ax-rep 5285 ax-sep 5302 ax-nul 5312 ax-pow 5371 ax-pr 5438 ax-un 7754

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1540 df-fal 1550 df-ex 1777 df-nf 1781 df-sb 2063 df-mo 2538 df-eu 2567 df-clab 2713 df-cleq 2727 df-clel 2814 df-nfc 2890 df-ne 2939 df-ral 3060 df-rex 3069 df-rmo 3378 df-reu 3379 df-rab 3434 df-v 3480 df-sbc 3792 df-csb 3909 df-dif 3966 df-un 3968 df-in 3970 df-ss 3980 df-pss 3983 df-nul 4340 df-if 4532 df-pw 4607 df-sn 4632 df-pr 4634 df-op 4638 df-uni 4913 df-iun 4998 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5583 df-eprel 5589 df-po 5597 df-so 5598 df-fr 5641 df-se 5642 df-we 5643 df-xp 5695 df-rel 5696 df-cnv 5697 df-co 5698 df-dm 5699 df-rn 5700 df-res 5701 df-ima 5702 df-pred 6323 df-ord 6389 df-on 6390 df-lim 6391 df-suc 6392 df-iota 6516 df-fun 6565 df-fn 6566 df-f 6567 df-f1 6568 df-fo 6569 df-f1o 6570 df-fv 6571 df-isom 6572 df-riota 7388 df-ov 7434 df-oprab 7435 df-mpo 7436 df-om 7888 df-2nd 8014 df-supp 8185 df-frecs 8305 df-wrecs 8336 df-recs 8410 df-rdg 8449 df-seqom 8487 df-1o 8505 df-er 8744 df-map 8867 df-en 8985 df-dom 8986 df-sdom 8987 df-fin 8988 df-fsupp 9400 df-oi 9548 df-cnf 9700

This theorem is referenced by: cantnfp1 9719

W3C validator