Theorem tfrcllembxssdm 6324

Description: Lemma for tfrcl 6332. The union of 𝐵 is defined on all elements of 𝑋. (Contributed by Jim Kingdon, 25-Mar-2022.)

Hypotheses

Ref	Expression
tfrcl.f	⊢ 𝐹 = recs(𝐺)
tfrcl.g	⊢ (𝜑 → Fun 𝐺)
tfrcl.x	⊢ (𝜑 → Ord 𝑋)
tfrcl.ex	⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋 ∧ 𝑓:𝑥⟶𝑆) → (𝐺‘𝑓) ∈ 𝑆)
tfrcllemsucfn.1	⊢ 𝐴 = {𝑓 ∣ ∃𝑥 ∈ 𝑋 (𝑓:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦)))}
tfrcllembacc.3	⊢ 𝐵 = {ℎ ∣ ∃𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))}
tfrcllembacc.u	⊢ ((𝜑 ∧ 𝑥 ∈ ∪ 𝑋) → suc 𝑥 ∈ 𝑋)
tfrcllembacc.4	⊢ (𝜑 → 𝐷 ∈ 𝑋)
tfrcllembacc.5	⊢ (𝜑 → ∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤))))

Assertion

Ref	Expression
tfrcllembxssdm	⊢ (𝜑 → 𝐷 ⊆ dom ∪ 𝐵)

Distinct variable groups:   𝐴,𝑓,𝑔,ℎ,𝑥,𝑦,𝑧   𝐷,𝑓,𝑔,𝑥,𝑦   𝑓,𝐺,𝑥,𝑦   𝑆,𝑓,𝑥,𝑦   𝑓,𝑋,𝑥   𝜑,𝑓,𝑔,ℎ,𝑥,𝑦,𝑧   𝐵,𝑔,ℎ,𝑧   𝑤,𝐵,𝑔,𝑧   𝐷,ℎ,𝑧   ℎ,𝐺,𝑧   𝑤,𝐺,𝑦   𝑆,ℎ,𝑧   𝑧,𝑋

Allowed substitution hints:   𝜑(𝑤)   𝐴(𝑤)   𝐵(𝑥,𝑦,𝑓)   𝐷(𝑤)   𝑆(𝑤,𝑔)   𝐹(𝑥,𝑦,𝑧,𝑤,𝑓,𝑔,ℎ)   𝐺(𝑔)   𝑋(𝑦,𝑤,𝑔,ℎ)

Proof of Theorem tfrcllembxssdm

Step	Hyp	Ref	Expression
1		tfrcllembacc.5	. . . 4 ⊢ (𝜑 → ∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤))))
2		fveq2 5486	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → (𝑔‘𝑤) = (𝑔‘𝑦))
3		reseq2 4879	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑔 ↾ 𝑤) = (𝑔 ↾ 𝑦))
4	3	fveq2d 5490	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → (𝐺‘(𝑔 ↾ 𝑤)) = (𝐺‘(𝑔 ↾ 𝑦)))
5	2, 4	eqeq12d 2180	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → ((𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤)) ↔ (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
6	5	cbvralv 2692	. . . . . . 7 ⊢ (∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤)) ↔ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))
7	6	anbi2i 453	. . . . . 6 ⊢ ((𝑔:𝑧⟶𝑆 ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤))) ↔ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
8	7	exbii 1593	. . . . 5 ⊢ (∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤))) ↔ ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
9	8	ralbii 2472	. . . 4 ⊢ (∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤))) ↔ ∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
10	1, 9	sylib 121	. . 3 ⊢ (𝜑 → ∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
11		simp1 987	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝜑)
12		simp2 988	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑧 ∈ 𝐷)
13		tfrcllembacc.4	. . . . . . . . . 10 ⊢ (𝜑 → 𝐷 ∈ 𝑋)
14	11, 13	syl 14	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝐷 ∈ 𝑋)
15		tfrcl.x	. . . . . . . . . . 11 ⊢ (𝜑 → Ord 𝑋)
16		ordtr1 4366	. . . . . . . . . . 11 ⊢ (Ord 𝑋 → ((𝑧 ∈ 𝐷 ∧ 𝐷 ∈ 𝑋) → 𝑧 ∈ 𝑋))
17	15, 16	syl 14	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑧 ∈ 𝐷 ∧ 𝐷 ∈ 𝑋) → 𝑧 ∈ 𝑋))
18	17	imp 123	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑧 ∈ 𝐷 ∧ 𝐷 ∈ 𝑋)) → 𝑧 ∈ 𝑋)
19	11, 12, 14, 18	syl12anc 1226	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑧 ∈ 𝑋)
20		simp3l 1015	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑔:𝑧⟶𝑆)
21		feq2 5321	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (𝑓:𝑥⟶𝑆 ↔ 𝑓:𝑧⟶𝑆))
22	21	imbi1d 230	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆) ↔ (𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆)))
23	22	albidv 1812	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑧 → (∀𝑓(𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆) ↔ ∀𝑓(𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆)))
24		tfrcl.ex	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋 ∧ 𝑓:𝑥⟶𝑆) → (𝐺‘𝑓) ∈ 𝑆)
25	24	3expia 1195	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋) → (𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
26	25	alrimiv 1862	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋) → ∀𝑓(𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
27	26	ralrimiva 2539	. . . . . . . . . . . 12 ⊢ (𝜑 → ∀𝑥 ∈ 𝑋 ∀𝑓(𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
28	27	adantr 274	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑋) → ∀𝑥 ∈ 𝑋 ∀𝑓(𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
29		simpr 109	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑋) → 𝑧 ∈ 𝑋)
30	23, 28, 29	rspcdva 2835	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑋) → ∀𝑓(𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
31		feq1 5320	. . . . . . . . . . . 12 ⊢ (𝑓 = 𝑔 → (𝑓:𝑧⟶𝑆 ↔ 𝑔:𝑧⟶𝑆))
32		fveq2 5486	. . . . . . . . . . . . 13 ⊢ (𝑓 = 𝑔 → (𝐺‘𝑓) = (𝐺‘𝑔))
33	32	eleq1d 2235	. . . . . . . . . . . 12 ⊢ (𝑓 = 𝑔 → ((𝐺‘𝑓) ∈ 𝑆 ↔ (𝐺‘𝑔) ∈ 𝑆))
34	31, 33	imbi12d 233	. . . . . . . . . . 11 ⊢ (𝑓 = 𝑔 → ((𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆) ↔ (𝑔:𝑧⟶𝑆 → (𝐺‘𝑔) ∈ 𝑆)))
35	34	spv 1848	. . . . . . . . . 10 ⊢ (∀𝑓(𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆) → (𝑔:𝑧⟶𝑆 → (𝐺‘𝑔) ∈ 𝑆))
36	30, 35	syl 14	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑋) → (𝑔:𝑧⟶𝑆 → (𝐺‘𝑔) ∈ 𝑆))
37	36	imp 123	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝑋) ∧ 𝑔:𝑧⟶𝑆) → (𝐺‘𝑔) ∈ 𝑆)
38	11, 19, 20, 37	syl21anc 1227	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → (𝐺‘𝑔) ∈ 𝑆)
39		vex 2729	. . . . . . . . . 10 ⊢ 𝑧 ∈ V
40		opexg 4206	. . . . . . . . . 10 ⊢ ((𝑧 ∈ V ∧ (𝐺‘𝑔) ∈ 𝑆) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ V)
41	39, 38, 40	sylancr 411	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ V)
42		snidg 3605	. . . . . . . . 9 ⊢ (⟨𝑧, (𝐺‘𝑔)⟩ ∈ V → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ {⟨𝑧, (𝐺‘𝑔)⟩})
43		elun2 3290	. . . . . . . . 9 ⊢ (⟨𝑧, (𝐺‘𝑔)⟩ ∈ {⟨𝑧, (𝐺‘𝑔)⟩} → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
44	41, 42, 43	3syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
45		simp3r 1016	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))
46		rspe 2515	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ 𝑋 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∃𝑧 ∈ 𝑋 (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
47	19, 20, 45, 46	syl12anc 1226	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∃𝑧 ∈ 𝑋 (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
48		feq2 5321	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑥 → (𝑔:𝑧⟶𝑆 ↔ 𝑔:𝑥⟶𝑆))
49		raleq 2661	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑥 → (∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)) ↔ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
50	48, 49	anbi12d 465	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑥 → ((𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) ↔ (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))))
51	50	cbvrexv 2693	. . . . . . . . . . . 12 ⊢ (∃𝑧 ∈ 𝑋 (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) ↔ ∃𝑥 ∈ 𝑋 (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
52	47, 51	sylib 121	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∃𝑥 ∈ 𝑋 (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
53		vex 2729	. . . . . . . . . . . 12 ⊢ 𝑔 ∈ V
54		feq1 5320	. . . . . . . . . . . . . 14 ⊢ (𝑓 = 𝑔 → (𝑓:𝑥⟶𝑆 ↔ 𝑔:𝑥⟶𝑆))
55		fveq1 5485	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 = 𝑔 → (𝑓‘𝑦) = (𝑔‘𝑦))
56		reseq1 4878	. . . . . . . . . . . . . . . . 17 ⊢ (𝑓 = 𝑔 → (𝑓 ↾ 𝑦) = (𝑔 ↾ 𝑦))
57	56	fveq2d 5490	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 = 𝑔 → (𝐺‘(𝑓 ↾ 𝑦)) = (𝐺‘(𝑔 ↾ 𝑦)))
58	55, 57	eqeq12d 2180	. . . . . . . . . . . . . . 15 ⊢ (𝑓 = 𝑔 → ((𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦)) ↔ (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
59	58	ralbidv 2466	. . . . . . . . . . . . . 14 ⊢ (𝑓 = 𝑔 → (∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦)) ↔ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
60	54, 59	anbi12d 465	. . . . . . . . . . . . 13 ⊢ (𝑓 = 𝑔 → ((𝑓:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦))) ↔ (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))))
61	60	rexbidv 2467	. . . . . . . . . . . 12 ⊢ (𝑓 = 𝑔 → (∃𝑥 ∈ 𝑋 (𝑓:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦))) ↔ ∃𝑥 ∈ 𝑋 (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))))
62		tfrcllemsucfn.1	. . . . . . . . . . . 12 ⊢ 𝐴 = {𝑓 ∣ ∃𝑥 ∈ 𝑋 (𝑓:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦)))}
63	53, 61, 62	elab2 2874	. . . . . . . . . . 11 ⊢ (𝑔 ∈ 𝐴 ↔ ∃𝑥 ∈ 𝑋 (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
64	52, 63	sylibr 133	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑔 ∈ 𝐴)
65	12, 20, 64	3jca 1167	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → (𝑧 ∈ 𝐷 ∧ 𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴))
66		snexg 4163	. . . . . . . . . . 11 ⊢ (⟨𝑧, (𝐺‘𝑔)⟩ ∈ V → {⟨𝑧, (𝐺‘𝑔)⟩} ∈ V)
67		unexg 4421	. . . . . . . . . . . 12 ⊢ ((𝑔 ∈ V ∧ {⟨𝑧, (𝐺‘𝑔)⟩} ∈ V) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ V)
68	53, 67	mpan 421	. . . . . . . . . . 11 ⊢ ({⟨𝑧, (𝐺‘𝑔)⟩} ∈ V → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ V)
69	41, 66, 68	3syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ V)
70		isset 2732	. . . . . . . . . 10 ⊢ ((𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ V ↔ ∃ℎ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
71	69, 70	sylib 121	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∃ℎ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
72		simpr3 995	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
73		19.8a 1578	. . . . . . . . . . . . . 14 ⊢ ((𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩})) → ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩})))
74		rspe 2515	. . . . . . . . . . . . . . 15 ⊢ ((𝑧 ∈ 𝐷 ∧ ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → ∃𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩})))
75		tfrcllembacc.3	. . . . . . . . . . . . . . . 16 ⊢ 𝐵 = {ℎ ∣ ∃𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))}
76	75	abeq2i 2277	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ 𝐵 ↔ ∃𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩})))
77	74, 76	sylibr 133	. . . . . . . . . . . . . 14 ⊢ ((𝑧 ∈ 𝐷 ∧ ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → ℎ ∈ 𝐵)
78	73, 77	sylan2 284	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → ℎ ∈ 𝐵)
79	72, 78	eqeltrrd 2244	. . . . . . . . . . . 12 ⊢ ((𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵)
80	79	3exp2 1215	. . . . . . . . . . 11 ⊢ (𝑧 ∈ 𝐷 → (𝑔:𝑧⟶𝑆 → (𝑔 ∈ 𝐴 → (ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵))))
81	80	3imp 1183	. . . . . . . . . 10 ⊢ ((𝑧 ∈ 𝐷 ∧ 𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴) → (ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵))
82	81	exlimdv 1807	. . . . . . . . 9 ⊢ ((𝑧 ∈ 𝐷 ∧ 𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴) → (∃ℎ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵))
83	65, 71, 82	sylc 62	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵)
84		elunii 3794	. . . . . . . 8 ⊢ ((⟨𝑧, (𝐺‘𝑔)⟩ ∈ (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∧ (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵)
85	44, 83, 84	syl2anc 409	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵)
86		opeq2 3759	. . . . . . . . . 10 ⊢ (𝑤 = (𝐺‘𝑔) → ⟨𝑧, 𝑤⟩ = ⟨𝑧, (𝐺‘𝑔)⟩)
87	86	eleq1d 2235	. . . . . . . . 9 ⊢ (𝑤 = (𝐺‘𝑔) → (⟨𝑧, 𝑤⟩ ∈ ∪ 𝐵 ↔ ⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵))
88	87	spcegv 2814	. . . . . . . 8 ⊢ ((𝐺‘𝑔) ∈ 𝑆 → (⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵 → ∃𝑤⟨𝑧, 𝑤⟩ ∈ ∪ 𝐵))
89	39	eldm2 4802	. . . . . . . 8 ⊢ (𝑧 ∈ dom ∪ 𝐵 ↔ ∃𝑤⟨𝑧, 𝑤⟩ ∈ ∪ 𝐵)
90	88, 89	syl6ibr 161	. . . . . . 7 ⊢ ((𝐺‘𝑔) ∈ 𝑆 → (⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵 → 𝑧 ∈ dom ∪ 𝐵))
91	38, 85, 90	sylc 62	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑧 ∈ dom ∪ 𝐵)
92	91	3expia 1195	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷) → ((𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) → 𝑧 ∈ dom ∪ 𝐵))
93	92	exlimdv 1807	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷) → (∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) → 𝑧 ∈ dom ∪ 𝐵))
94	93	ralimdva 2533	. . 3 ⊢ (𝜑 → (∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) → ∀𝑧 ∈ 𝐷 𝑧 ∈ dom ∪ 𝐵))
95	10, 94	mpd 13	. 2 ⊢ (𝜑 → ∀𝑧 ∈ 𝐷 𝑧 ∈ dom ∪ 𝐵)
96		dfss3 3132	. 2 ⊢ (𝐷 ⊆ dom ∪ 𝐵 ↔ ∀𝑧 ∈ 𝐷 𝑧 ∈ dom ∪ 𝐵)
97	95, 96	sylibr 133	1 ⊢ (𝜑 → 𝐷 ⊆ dom ∪ 𝐵)

Syntax hints:   → wi 4   ∧ wa 103   ∧ w3a 968  ∀wal 1341   = wceq 1343  ∃wex 1480   ∈ wcel 2136  {cab 2151  ∀wral 2444  ∃wrex 2445  Vcvv 2726   ∪ cun 3114   ⊆ wss 3116  {csn 3576  ⟨cop 3579  ∪ cuni 3789  Ord word 4340  suc csuc 4343  dom cdm 4604   ↾ cres 4606  Fun wfun 5182  ⟶wf 5184  ‘cfv 5188  recscrecs 6272

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 699  ax-5 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-10 1493  ax-11 1494  ax-i12 1495  ax-bndl 1497  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523  ax-13 2138  ax-14 2139  ax-ext 2147  ax-sep 4100  ax-pow 4153  ax-pr 4187  ax-un 4411

This theorem depends on definitions:  df-bi 116  df-3an 970  df-tru 1346  df-nf 1449  df-sb 1751  df-clab 2152  df-cleq 2158  df-clel 2161  df-nfc 2297  df-ral 2449  df-rex 2450  df-v 2728  df-un 3120  df-in 3122  df-ss 3129  df-pw 3561  df-sn 3582  df-pr 3583  df-op 3585  df-uni 3790  df-br 3983  df-opab 4044  df-tr 4081  df-iord 4344  df-xp 4610  df-rel 4611  df-cnv 4612  df-co 4613  df-dm 4614  df-rn 4615  df-res 4616  df-iota 5153  df-fun 5190  df-fn 5191  df-f 5192  df-fv 5196

This theorem is referenced by:  tfrcllembfn  6325