Theorem mnuunid 44970

Description: Minimal universes are closed under union. (Contributed by Rohan Ridenour, 13-Aug-2023.)

Hypotheses

Ref	Expression
mnuunid.1	⊢ 𝑀 = {𝑘 ∣ ∀𝑙 ∈ 𝑘 (𝒫 𝑙 ⊆ 𝑘 ∧ ∀𝑚∃𝑛 ∈ 𝑘 (𝒫 𝑙 ⊆ 𝑛 ∧ ∀𝑝 ∈ 𝑙 (∃𝑞 ∈ 𝑘 (𝑝 ∈ 𝑞 ∧ 𝑞 ∈ 𝑚) → ∃𝑟 ∈ 𝑚 (𝑝 ∈ 𝑟 ∧ ∪ 𝑟 ⊆ 𝑛))))}
mnuunid.2	⊢ (𝜑 → 𝑈 ∈ 𝑀)
mnuunid.3	⊢ (𝜑 → 𝐴 ∈ 𝑈)

Assertion

Ref	Expression
mnuunid	⊢ (𝜑 → ∪ 𝐴 ∈ 𝑈)

Distinct variable groups:   𝑈,𝑘,𝑚,𝑛,𝑞,𝑝,𝑙   𝑈,𝑟,𝑘,𝑚,𝑛,𝑝,𝑙

Allowed substitution hints:   𝜑(𝑘,𝑚,𝑛,𝑟,𝑞,𝑝,𝑙)   𝐴(𝑘,𝑚,𝑛,𝑟,𝑞,𝑝,𝑙)   𝑀(𝑘,𝑚,𝑛,𝑟,𝑞,𝑝,𝑙)

Proof of Theorem mnuunid

Dummy variables 𝑣 𝑎 𝑤 𝑖 𝑢 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		mnuunid.1	. 2 ⊢ 𝑀 = {𝑘 ∣ ∀𝑙 ∈ 𝑘 (𝒫 𝑙 ⊆ 𝑘 ∧ ∀𝑚∃𝑛 ∈ 𝑘 (𝒫 𝑙 ⊆ 𝑛 ∧ ∀𝑝 ∈ 𝑙 (∃𝑞 ∈ 𝑘 (𝑝 ∈ 𝑞 ∧ 𝑞 ∈ 𝑚) → ∃𝑟 ∈ 𝑚 (𝑝 ∈ 𝑟 ∧ ∪ 𝑟 ⊆ 𝑛))))}
2		mnuunid.2	. 2 ⊢ (𝜑 → 𝑈 ∈ 𝑀)
3		mnuunid.3	. . . 4 ⊢ (𝜑 → 𝐴 ∈ 𝑈)
4	3	snssd 4753	. . . 4 ⊢ (𝜑 → {𝐴} ⊆ 𝑈)
5	1, 2, 3, 4	mnuop3d 44964	. . 3 ⊢ (𝜑 → ∃𝑤 ∈ 𝑈 ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))
6		simprl 782	. . . 4 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝑈 ∧ ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))) → 𝑤 ∈ 𝑈)
7		sseq2 3964	. . . . 5 ⊢ (𝑎 = 𝑤 → (∪ 𝐴 ⊆ 𝑎 ↔ ∪ 𝐴 ⊆ 𝑤))
8	7	adantl 486	. . . 4 ⊢ (((𝜑 ∧ (𝑤 ∈ 𝑈 ∧ ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))) ∧ 𝑎 = 𝑤) → (∪ 𝐴 ⊆ 𝑎 ↔ ∪ 𝐴 ⊆ 𝑤))
9		elssuni 4905	. . . . . . 7 ⊢ (𝑖 ∈ 𝐴 → 𝑖 ⊆ ∪ 𝐴)
10	9	rgen 3081	. . . . . 6 ⊢ ∀𝑖 ∈ 𝐴 𝑖 ⊆ ∪ 𝐴
11		simprr 784	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝑈 ∧ ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))) → ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))
12		eleq2 2852	. . . . . . . . . . . . . . 15 ⊢ (𝑣 = 𝐴 → (𝑖 ∈ 𝑣 ↔ 𝑖 ∈ 𝐴))
13	12	rexsng 4643	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ 𝑈 → (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 ↔ 𝑖 ∈ 𝐴))
14	3, 13	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 ↔ 𝑖 ∈ 𝐴))
15		eleq2 2852	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 = 𝐴 → (𝑖 ∈ 𝑢 ↔ 𝑖 ∈ 𝐴))
16		unieq 4884	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 = 𝐴 → ∪ 𝑢 = ∪ 𝐴)
17	16	sseq1d 3969	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 = 𝐴 → (∪ 𝑢 ⊆ 𝑤 ↔ ∪ 𝐴 ⊆ 𝑤))
18	15, 17	anbi12d 643	. . . . . . . . . . . . . . 15 ⊢ (𝑢 = 𝐴 → ((𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤) ↔ (𝑖 ∈ 𝐴 ∧ ∪ 𝐴 ⊆ 𝑤)))
19	18	rexsng 4643	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ 𝑈 → (∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤) ↔ (𝑖 ∈ 𝐴 ∧ ∪ 𝐴 ⊆ 𝑤)))
20	3, 19	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤) ↔ (𝑖 ∈ 𝐴 ∧ ∪ 𝐴 ⊆ 𝑤)))
21	14, 20	imbi12d 347	. . . . . . . . . . . 12 ⊢ (𝜑 → ((∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)) ↔ (𝑖 ∈ 𝐴 → (𝑖 ∈ 𝐴 ∧ ∪ 𝐴 ⊆ 𝑤))))
22		anclb 554	. . . . . . . . . . . 12 ⊢ ((𝑖 ∈ 𝐴 → ∪ 𝐴 ⊆ 𝑤) ↔ (𝑖 ∈ 𝐴 → (𝑖 ∈ 𝐴 ∧ ∪ 𝐴 ⊆ 𝑤)))
23	21, 22	bitr4di 292	. . . . . . . . . . 11 ⊢ (𝜑 → ((∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)) ↔ (𝑖 ∈ 𝐴 → ∪ 𝐴 ⊆ 𝑤)))
24	23	imbi2d 343	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑖 ∈ 𝐴 → (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤))) ↔ (𝑖 ∈ 𝐴 → (𝑖 ∈ 𝐴 → ∪ 𝐴 ⊆ 𝑤))))
25		pm5.4 392	. . . . . . . . . 10 ⊢ ((𝑖 ∈ 𝐴 → (𝑖 ∈ 𝐴 → ∪ 𝐴 ⊆ 𝑤)) ↔ (𝑖 ∈ 𝐴 → ∪ 𝐴 ⊆ 𝑤))
26	24, 25	bitrdi 290	. . . . . . . . 9 ⊢ (𝜑 → ((𝑖 ∈ 𝐴 → (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤))) ↔ (𝑖 ∈ 𝐴 → ∪ 𝐴 ⊆ 𝑤)))
27	26	ralbidv2 3184	. . . . . . . 8 ⊢ (𝜑 → (∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)) ↔ ∀𝑖 ∈ 𝐴 ∪ 𝐴 ⊆ 𝑤))
28	27	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝑈 ∧ ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))) → (∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)) ↔ ∀𝑖 ∈ 𝐴 ∪ 𝐴 ⊆ 𝑤))
29	11, 28	mpbid 235	. . . . . 6 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝑈 ∧ ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))) → ∀𝑖 ∈ 𝐴 ∪ 𝐴 ⊆ 𝑤)
30		sstr2 3945	. . . . . . 7 ⊢ (𝑖 ⊆ ∪ 𝐴 → (∪ 𝐴 ⊆ 𝑤 → 𝑖 ⊆ 𝑤))
31	30	ral2imi 3104	. . . . . 6 ⊢ (∀𝑖 ∈ 𝐴 𝑖 ⊆ ∪ 𝐴 → (∀𝑖 ∈ 𝐴 ∪ 𝐴 ⊆ 𝑤 → ∀𝑖 ∈ 𝐴 𝑖 ⊆ 𝑤))
32	10, 29, 31	mpsyl 69	. . . . 5 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝑈 ∧ ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))) → ∀𝑖 ∈ 𝐴 𝑖 ⊆ 𝑤)
33		unissb 4907	. . . . 5 ⊢ (∪ 𝐴 ⊆ 𝑤 ↔ ∀𝑖 ∈ 𝐴 𝑖 ⊆ 𝑤)
34	32, 33	sylibr 237	. . . 4 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝑈 ∧ ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))) → ∪ 𝐴 ⊆ 𝑤)
35	6, 8, 34	rspcedvd 3584	. . 3 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝑈 ∧ ∀𝑖 ∈ 𝐴 (∃𝑣 ∈ {𝐴}𝑖 ∈ 𝑣 → ∃𝑢 ∈ {𝐴} (𝑖 ∈ 𝑢 ∧ ∪ 𝑢 ⊆ 𝑤)))) → ∃𝑎 ∈ 𝑈 ∪ 𝐴 ⊆ 𝑎)
36	5, 35	rexlimddv 3172	. 2 ⊢ (𝜑 → ∃𝑎 ∈ 𝑈 ∪ 𝐴 ⊆ 𝑎)
37	1, 2, 36	mnuss2d 44957	1 ⊢ (𝜑 → ∪ 𝐴 ∈ 𝑈)

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400  ∀wal 1568   = wceq 1570   ∈ wcel 2143  {cab 2741  ∀wral 3079  ∃wrex 3089   ⊆ wss 3906  𝒫 cpw 4563  {csn 4590  ∪ cuni 4873

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-ext 2735  ax-sep 5258

This theorem depends on definitions:  df-bi 210  df-an 401  df-3an 1105  df-tru 1573  df-ex 1810  df-sb 2097  df-clab 2742  df-cleq 2755  df-clel 2838  df-ral 3080  df-rex 3090  df-rab 3417  df-v 3457  df-in 3913  df-ss 3923  df-pw 4565  df-sn 4591  df-uni 4874

This theorem is referenced by:  mnuund  44971  mnutrcld  44972  mnugrud  44977