Theorem tfrcllembxssdm 6300

Description: Lemma for tfrcl 6308. 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 5467	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → (𝑔‘𝑤) = (𝑔‘𝑦))
3		reseq2 4860	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑔 ↾ 𝑤) = (𝑔 ↾ 𝑦))
4	3	fveq2d 5471	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → (𝐺‘(𝑔 ↾ 𝑤)) = (𝐺‘(𝑔 ↾ 𝑦)))
5	2, 4	eqeq12d 2172	. . . . . . . 8 ⊢ (𝑤 = 𝑦 → ((𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤)) ↔ (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
6	5	cbvralv 2680	. . . . . . 7 ⊢ (∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤)) ↔ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))
7	6	anbi2i 453	. . . . . 6 ⊢ ((𝑔:𝑧⟶𝑆 ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤))) ↔ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
8	7	exbii 1585	. . . . 5 ⊢ (∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤))) ↔ ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
9	8	ralbii 2463	. . . 4 ⊢ (∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐺‘(𝑔 ↾ 𝑤))) ↔ ∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
10	1, 9	sylib 121	. . 3 ⊢ (𝜑 → ∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
11		simp1 982	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝜑)
12		simp2 983	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑧 ∈ 𝐷)
13		tfrcllembacc.4	. . . . . . . . . 10 ⊢ (𝜑 → 𝐷 ∈ 𝑋)
14	11, 13	syl 14	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝐷 ∈ 𝑋)
15		tfrcl.x	. . . . . . . . . . 11 ⊢ (𝜑 → Ord 𝑋)
16		ordtr1 4348	. . . . . . . . . . 11 ⊢ (Ord 𝑋 → ((𝑧 ∈ 𝐷 ∧ 𝐷 ∈ 𝑋) → 𝑧 ∈ 𝑋))
17	15, 16	syl 14	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑧 ∈ 𝐷 ∧ 𝐷 ∈ 𝑋) → 𝑧 ∈ 𝑋))
18	17	imp 123	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑧 ∈ 𝐷 ∧ 𝐷 ∈ 𝑋)) → 𝑧 ∈ 𝑋)
19	11, 12, 14, 18	syl12anc 1218	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑧 ∈ 𝑋)
20		simp3l 1010	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑔:𝑧⟶𝑆)
21		feq2 5302	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (𝑓:𝑥⟶𝑆 ↔ 𝑓:𝑧⟶𝑆))
22	21	imbi1d 230	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆) ↔ (𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆)))
23	22	albidv 1804	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑧 → (∀𝑓(𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆) ↔ ∀𝑓(𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆)))
24		tfrcl.ex	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋 ∧ 𝑓:𝑥⟶𝑆) → (𝐺‘𝑓) ∈ 𝑆)
25	24	3expia 1187	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋) → (𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
26	25	alrimiv 1854	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋) → ∀𝑓(𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
27	26	ralrimiva 2530	. . . . . . . . . . . 12 ⊢ (𝜑 → ∀𝑥 ∈ 𝑋 ∀𝑓(𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
28	27	adantr 274	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑋) → ∀𝑥 ∈ 𝑋 ∀𝑓(𝑓:𝑥⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
29		simpr 109	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑋) → 𝑧 ∈ 𝑋)
30	23, 28, 29	rspcdva 2821	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑋) → ∀𝑓(𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆))
31		feq1 5301	. . . . . . . . . . . 12 ⊢ (𝑓 = 𝑔 → (𝑓:𝑧⟶𝑆 ↔ 𝑔:𝑧⟶𝑆))
32		fveq2 5467	. . . . . . . . . . . . 13 ⊢ (𝑓 = 𝑔 → (𝐺‘𝑓) = (𝐺‘𝑔))
33	32	eleq1d 2226	. . . . . . . . . . . 12 ⊢ (𝑓 = 𝑔 → ((𝐺‘𝑓) ∈ 𝑆 ↔ (𝐺‘𝑔) ∈ 𝑆))
34	31, 33	imbi12d 233	. . . . . . . . . . 11 ⊢ (𝑓 = 𝑔 → ((𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆) ↔ (𝑔:𝑧⟶𝑆 → (𝐺‘𝑔) ∈ 𝑆)))
35	34	spv 1840	. . . . . . . . . 10 ⊢ (∀𝑓(𝑓:𝑧⟶𝑆 → (𝐺‘𝑓) ∈ 𝑆) → (𝑔:𝑧⟶𝑆 → (𝐺‘𝑔) ∈ 𝑆))
36	30, 35	syl 14	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑋) → (𝑔:𝑧⟶𝑆 → (𝐺‘𝑔) ∈ 𝑆))
37	36	imp 123	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝑋) ∧ 𝑔:𝑧⟶𝑆) → (𝐺‘𝑔) ∈ 𝑆)
38	11, 19, 20, 37	syl21anc 1219	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → (𝐺‘𝑔) ∈ 𝑆)
39		vex 2715	. . . . . . . . . 10 ⊢ 𝑧 ∈ V
40		opexg 4188	. . . . . . . . . 10 ⊢ ((𝑧 ∈ V ∧ (𝐺‘𝑔) ∈ 𝑆) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ V)
41	39, 38, 40	sylancr 411	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ V)
42		snidg 3589	. . . . . . . . 9 ⊢ (⟨𝑧, (𝐺‘𝑔)⟩ ∈ V → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ {⟨𝑧, (𝐺‘𝑔)⟩})
43		elun2 3275	. . . . . . . . 9 ⊢ (⟨𝑧, (𝐺‘𝑔)⟩ ∈ {⟨𝑧, (𝐺‘𝑔)⟩} → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
44	41, 42, 43	3syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
45		simp3r 1011	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))
46		rspe 2506	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ 𝑋 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∃𝑧 ∈ 𝑋 (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
47	19, 20, 45, 46	syl12anc 1218	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∃𝑧 ∈ 𝑋 (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
48		feq2 5302	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑥 → (𝑔:𝑧⟶𝑆 ↔ 𝑔:𝑥⟶𝑆))
49		raleq 2652	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑥 → (∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)) ↔ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
50	48, 49	anbi12d 465	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑥 → ((𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) ↔ (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))))
51	50	cbvrexv 2681	. . . . . . . . . . . 12 ⊢ (∃𝑧 ∈ 𝑋 (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) ↔ ∃𝑥 ∈ 𝑋 (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
52	47, 51	sylib 121	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∃𝑥 ∈ 𝑋 (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
53		vex 2715	. . . . . . . . . . . 12 ⊢ 𝑔 ∈ V
54		feq1 5301	. . . . . . . . . . . . . 14 ⊢ (𝑓 = 𝑔 → (𝑓:𝑥⟶𝑆 ↔ 𝑔:𝑥⟶𝑆))
55		fveq1 5466	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 = 𝑔 → (𝑓‘𝑦) = (𝑔‘𝑦))
56		reseq1 4859	. . . . . . . . . . . . . . . . 17 ⊢ (𝑓 = 𝑔 → (𝑓 ↾ 𝑦) = (𝑔 ↾ 𝑦))
57	56	fveq2d 5471	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 = 𝑔 → (𝐺‘(𝑓 ↾ 𝑦)) = (𝐺‘(𝑔 ↾ 𝑦)))
58	55, 57	eqeq12d 2172	. . . . . . . . . . . . . . 15 ⊢ (𝑓 = 𝑔 → ((𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦)) ↔ (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
59	58	ralbidv 2457	. . . . . . . . . . . . . 14 ⊢ (𝑓 = 𝑔 → (∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦)) ↔ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
60	54, 59	anbi12d 465	. . . . . . . . . . . . 13 ⊢ (𝑓 = 𝑔 → ((𝑓:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦))) ↔ (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))))
61	60	rexbidv 2458	. . . . . . . . . . . 12 ⊢ (𝑓 = 𝑔 → (∃𝑥 ∈ 𝑋 (𝑓:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦))) ↔ ∃𝑥 ∈ 𝑋 (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))))
62		tfrcllemsucfn.1	. . . . . . . . . . . 12 ⊢ 𝐴 = {𝑓 ∣ ∃𝑥 ∈ 𝑋 (𝑓:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐺‘(𝑓 ↾ 𝑦)))}
63	53, 61, 62	elab2 2860	. . . . . . . . . . 11 ⊢ (𝑔 ∈ 𝐴 ↔ ∃𝑥 ∈ 𝑋 (𝑔:𝑥⟶𝑆 ∧ ∀𝑦 ∈ 𝑥 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))))
64	52, 63	sylibr 133	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑔 ∈ 𝐴)
65	12, 20, 64	3jca 1162	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → (𝑧 ∈ 𝐷 ∧ 𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴))
66		snexg 4145	. . . . . . . . . . 11 ⊢ (⟨𝑧, (𝐺‘𝑔)⟩ ∈ V → {⟨𝑧, (𝐺‘𝑔)⟩} ∈ V)
67		unexg 4402	. . . . . . . . . . . 12 ⊢ ((𝑔 ∈ V ∧ {⟨𝑧, (𝐺‘𝑔)⟩} ∈ V) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ V)
68	53, 67	mpan 421	. . . . . . . . . . 11 ⊢ ({⟨𝑧, (𝐺‘𝑔)⟩} ∈ V → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ V)
69	41, 66, 68	3syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ V)
70		isset 2718	. . . . . . . . . 10 ⊢ ((𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ V ↔ ∃ℎ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
71	69, 70	sylib 121	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ∃ℎ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
72		simpr3 990	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))
73		19.8a 1570	. . . . . . . . . . . . . 14 ⊢ ((𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩})) → ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩})))
74		rspe 2506	. . . . . . . . . . . . . . 15 ⊢ ((𝑧 ∈ 𝐷 ∧ ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → ∃𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩})))
75		tfrcllembacc.3	. . . . . . . . . . . . . . . 16 ⊢ 𝐵 = {ℎ ∣ ∃𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))}
76	75	abeq2i 2268	. . . . . . . . . . . . . . 15 ⊢ (ℎ ∈ 𝐵 ↔ ∃𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩})))
77	74, 76	sylibr 133	. . . . . . . . . . . . . 14 ⊢ ((𝑧 ∈ 𝐷 ∧ ∃𝑔(𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → ℎ ∈ 𝐵)
78	73, 77	sylan2 284	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → ℎ ∈ 𝐵)
79	72, 78	eqeltrrd 2235	. . . . . . . . . . . 12 ⊢ ((𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴 ∧ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}))) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵)
80	79	3exp2 1207	. . . . . . . . . . 11 ⊢ (𝑧 ∈ 𝐷 → (𝑔:𝑧⟶𝑆 → (𝑔 ∈ 𝐴 → (ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵))))
81	80	3imp 1176	. . . . . . . . . 10 ⊢ ((𝑧 ∈ 𝐷 ∧ 𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴) → (ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵))
82	81	exlimdv 1799	. . . . . . . . 9 ⊢ ((𝑧 ∈ 𝐷 ∧ 𝑔:𝑧⟶𝑆 ∧ 𝑔 ∈ 𝐴) → (∃ℎ ℎ = (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵))
83	65, 71, 82	sylc 62	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵)
84		elunii 3777	. . . . . . . 8 ⊢ ((⟨𝑧, (𝐺‘𝑔)⟩ ∈ (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∧ (𝑔 ∪ {⟨𝑧, (𝐺‘𝑔)⟩}) ∈ 𝐵) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵)
85	44, 83, 84	syl2anc 409	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → ⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵)
86		opeq2 3742	. . . . . . . . . 10 ⊢ (𝑤 = (𝐺‘𝑔) → ⟨𝑧, 𝑤⟩ = ⟨𝑧, (𝐺‘𝑔)⟩)
87	86	eleq1d 2226	. . . . . . . . 9 ⊢ (𝑤 = (𝐺‘𝑔) → (⟨𝑧, 𝑤⟩ ∈ ∪ 𝐵 ↔ ⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵))
88	87	spcegv 2800	. . . . . . . 8 ⊢ ((𝐺‘𝑔) ∈ 𝑆 → (⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵 → ∃𝑤⟨𝑧, 𝑤⟩ ∈ ∪ 𝐵))
89	39	eldm2 4783	. . . . . . . 8 ⊢ (𝑧 ∈ dom ∪ 𝐵 ↔ ∃𝑤⟨𝑧, 𝑤⟩ ∈ ∪ 𝐵)
90	88, 89	syl6ibr 161	. . . . . . 7 ⊢ ((𝐺‘𝑔) ∈ 𝑆 → (⟨𝑧, (𝐺‘𝑔)⟩ ∈ ∪ 𝐵 → 𝑧 ∈ dom ∪ 𝐵))
91	38, 85, 90	sylc 62	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷 ∧ (𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦)))) → 𝑧 ∈ dom ∪ 𝐵)
92	91	3expia 1187	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷) → ((𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) → 𝑧 ∈ dom ∪ 𝐵))
93	92	exlimdv 1799	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐷) → (∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) → 𝑧 ∈ dom ∪ 𝐵))
94	93	ralimdva 2524	. . 3 ⊢ (𝜑 → (∀𝑧 ∈ 𝐷 ∃𝑔(𝑔:𝑧⟶𝑆 ∧ ∀𝑦 ∈ 𝑧 (𝑔‘𝑦) = (𝐺‘(𝑔 ↾ 𝑦))) → ∀𝑧 ∈ 𝐷 𝑧 ∈ dom ∪ 𝐵))
95	10, 94	mpd 13	. 2 ⊢ (𝜑 → ∀𝑧 ∈ 𝐷 𝑧 ∈ dom ∪ 𝐵)
96		dfss3 3118	. 2 ⊢ (𝐷 ⊆ dom ∪ 𝐵 ↔ ∀𝑧 ∈ 𝐷 𝑧 ∈ dom ∪ 𝐵)
97	95, 96	sylibr 133	1 ⊢ (𝜑 → 𝐷 ⊆ dom ∪ 𝐵)

Syntax hints:   → wi 4   ∧ wa 103   ∧ w3a 963  ∀wal 1333   = wceq 1335  ∃wex 1472   ∈ wcel 2128  {cab 2143  ∀wral 2435  ∃wrex 2436  Vcvv 2712   ∪ cun 3100   ⊆ wss 3102  {csn 3560  ⟨cop 3563  ∪ cuni 3772  Ord word 4322  suc csuc 4325  dom cdm 4585   ↾ cres 4587  Fun wfun 5163  ⟶wf 5165  ‘cfv 5169  recscrecs 6248

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 1427  ax-7 1428  ax-gen 1429  ax-ie1 1473  ax-ie2 1474  ax-8 1484  ax-10 1485  ax-11 1486  ax-i12 1487  ax-bndl 1489  ax-4 1490  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-13 2130  ax-14 2131  ax-ext 2139  ax-sep 4082  ax-pow 4135  ax-pr 4169  ax-un 4393

This theorem depends on definitions:  df-bi 116  df-3an 965  df-tru 1338  df-nf 1441  df-sb 1743  df-clab 2144  df-cleq 2150  df-clel 2153  df-nfc 2288  df-ral 2440  df-rex 2441  df-v 2714  df-un 3106  df-in 3108  df-ss 3115  df-pw 3545  df-sn 3566  df-pr 3567  df-op 3569  df-uni 3773  df-br 3966  df-opab 4026  df-tr 4063  df-iord 4326  df-xp 4591  df-rel 4592  df-cnv 4593  df-co 4594  df-dm 4595  df-rn 4596  df-res 4597  df-iota 5134  df-fun 5171  df-fn 5172  df-f 5173  df-fv 5177

This theorem is referenced by:  tfrcllembfn  6301