Theorem setrec1lem2 49262

Description: Lemma for setrec1 49265. If a family of sets are all recursively generated by 𝐹, so is their union. In this theorem, 𝑋 is a family of sets which are all elements of 𝑌, and 𝑉 is any class. Use dfss3 3971, equivalence and equality theorems, and unissb at the end. Sandwich with applications of setrec1lem1. (Contributed by Emmett Weisz, 24-Jan-2021.) (New usage is discouraged.)

Hypotheses

Ref	Expression
setrec1lem2.1	⊢ 𝑌 = {𝑦 ∣ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑦 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑦 ⊆ 𝑧)}
setrec1lem2.2	⊢ (𝜑 → 𝑋 ∈ 𝑉)
setrec1lem2.3	⊢ (𝜑 → 𝑋 ⊆ 𝑌)

Assertion

Ref	Expression
setrec1lem2	⊢ (𝜑 → ∪ 𝑋 ∈ 𝑌)

Distinct variable groups:   𝑦,𝐹   𝑤,𝑋,𝑦   𝑧,𝑋,𝑦

Allowed substitution hints:   𝜑(𝑦,𝑧,𝑤)   𝐹(𝑧,𝑤)   𝑉(𝑦,𝑧,𝑤)   𝑌(𝑦,𝑧,𝑤)

Proof of Theorem setrec1lem2

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		setrec1lem2.3	. . . . . . 7 ⊢ (𝜑 → 𝑋 ⊆ 𝑌)
2		dfss3 3971	. . . . . . 7 ⊢ (𝑋 ⊆ 𝑌 ↔ ∀𝑥 ∈ 𝑋 𝑥 ∈ 𝑌)
3	1, 2	sylib 218	. . . . . 6 ⊢ (𝜑 → ∀𝑥 ∈ 𝑋 𝑥 ∈ 𝑌)
4		setrec1lem2.1	. . . . . . . 8 ⊢ 𝑌 = {𝑦 ∣ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑦 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑦 ⊆ 𝑧)}
5		vex 3483	. . . . . . . . 9 ⊢ 𝑥 ∈ V
6	5	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 𝑥 ∈ V)
7	4, 6	setrec1lem1 49261	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ 𝑌 ↔ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧)))
8	7	ralbidv 3177	. . . . . 6 ⊢ (𝜑 → (∀𝑥 ∈ 𝑋 𝑥 ∈ 𝑌 ↔ ∀𝑥 ∈ 𝑋 ∀𝑧(∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧)))
9	3, 8	mpbid 232	. . . . 5 ⊢ (𝜑 → ∀𝑥 ∈ 𝑋 ∀𝑧(∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧))
10		ralcom4 3285	. . . . 5 ⊢ (∀𝑥 ∈ 𝑋 ∀𝑧(∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧) ↔ ∀𝑧∀𝑥 ∈ 𝑋 (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧))
11	9, 10	sylib 218	. . . 4 ⊢ (𝜑 → ∀𝑧∀𝑥 ∈ 𝑋 (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧))
12		nfra1 3283	. . . . . 6 ⊢ Ⅎ𝑥∀𝑥 ∈ 𝑋 (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧)
13		nfv 1913	. . . . . 6 ⊢ Ⅎ𝑥∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧))
14		rsp 3246	. . . . . . . 8 ⊢ (∀𝑥 ∈ 𝑋 (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧) → (𝑥 ∈ 𝑋 → (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧)))
15		elssuni 4936	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝑋 → 𝑥 ⊆ ∪ 𝑋)
16		sstr2 3989	. . . . . . . . . . . 12 ⊢ (𝑤 ⊆ 𝑥 → (𝑥 ⊆ ∪ 𝑋 → 𝑤 ⊆ ∪ 𝑋))
17	15, 16	syl5com 31	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝑋 → (𝑤 ⊆ 𝑥 → 𝑤 ⊆ ∪ 𝑋))
18	17	imim1d 82	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝑋 → ((𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → (𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧))))
19	18	alimdv 1915	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑋 → (∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧))))
20	19	imim1d 82	. . . . . . . 8 ⊢ (𝑥 ∈ 𝑋 → ((∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧) → (∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧)))
21	14, 20	sylcom 30	. . . . . . 7 ⊢ (∀𝑥 ∈ 𝑋 (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧) → (𝑥 ∈ 𝑋 → (∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧)))
22	21	com23 86	. . . . . 6 ⊢ (∀𝑥 ∈ 𝑋 (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧) → (∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → (𝑥 ∈ 𝑋 → 𝑥 ⊆ 𝑧)))
23	12, 13, 22	ralrimd 3263	. . . . 5 ⊢ (∀𝑥 ∈ 𝑋 (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧) → (∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∀𝑥 ∈ 𝑋 𝑥 ⊆ 𝑧))
24	23	alimi 1810	. . . 4 ⊢ (∀𝑧∀𝑥 ∈ 𝑋 (∀𝑤(𝑤 ⊆ 𝑥 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑥 ⊆ 𝑧) → ∀𝑧(∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∀𝑥 ∈ 𝑋 𝑥 ⊆ 𝑧))
25	11, 24	syl 17	. . 3 ⊢ (𝜑 → ∀𝑧(∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∀𝑥 ∈ 𝑋 𝑥 ⊆ 𝑧))
26		unissb 4938	. . . . 5 ⊢ (∪ 𝑋 ⊆ 𝑧 ↔ ∀𝑥 ∈ 𝑋 𝑥 ⊆ 𝑧)
27	26	imbi2i 336	. . . 4 ⊢ ((∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∪ 𝑋 ⊆ 𝑧) ↔ (∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∀𝑥 ∈ 𝑋 𝑥 ⊆ 𝑧))
28	27	albii 1818	. . 3 ⊢ (∀𝑧(∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∪ 𝑋 ⊆ 𝑧) ↔ ∀𝑧(∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∀𝑥 ∈ 𝑋 𝑥 ⊆ 𝑧))
29	25, 28	sylibr 234	. 2 ⊢ (𝜑 → ∀𝑧(∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∪ 𝑋 ⊆ 𝑧))
30		setrec1lem2.2	. . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝑉)
31	30	uniexd 7763	. . 3 ⊢ (𝜑 → ∪ 𝑋 ∈ V)
32	4, 31	setrec1lem1 49261	. 2 ⊢ (𝜑 → (∪ 𝑋 ∈ 𝑌 ↔ ∀𝑧(∀𝑤(𝑤 ⊆ ∪ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → ∪ 𝑋 ⊆ 𝑧)))
33	29, 32	mpbird 257	1 ⊢ (𝜑 → ∪ 𝑋 ∈ 𝑌)

Syntax hints:   → wi 4  ∀wal 1537   = wceq 1539   ∈ wcel 2107  {cab 2713  ∀wral 3060  Vcvv 3479   ⊆ wss 3950  ∪ cuni 4906  ‘cfv 6560

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-8 2109  ax-9 2117  ax-10 2140  ax-11 2156  ax-12 2176  ax-ext 2707  ax-sep 5295  ax-un 7756

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-tru 1542  df-ex 1779  df-nf 1783  df-sb 2064  df-clab 2714  df-cleq 2728  df-clel 2815  df-ral 3061  df-v 3481  df-ss 3967  df-uni 4907

This theorem is referenced by:  setrec1lem3  49263