Users' Mathboxes Mathbox for Rohan Ridenour < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  mnuunid Structured version   Visualization version   GIF version

Theorem mnuunid 40662
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.
StepHypRef Expression
1 mnuunid.1 . 2 𝑀 = {𝑘 ∣ ∀𝑙𝑘 (𝒫 𝑙𝑘 ∧ ∀𝑚𝑛𝑘 (𝒫 𝑙𝑛 ∧ ∀𝑝𝑙 (∃𝑞𝑘 (𝑝𝑞𝑞𝑚) → ∃𝑟𝑚 (𝑝𝑟 𝑟𝑛))))}
2 mnuunid.2 . 2 (𝜑𝑈𝑀)
3 mnuunid.3 . . . 4 (𝜑𝐴𝑈)
43snssd 4742 . . . 4 (𝜑 → {𝐴} ⊆ 𝑈)
51, 2, 3, 4mnuop3d 40656 . . 3 (𝜑 → ∃𝑤𝑈𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))
6 simprl 769 . . . 4 ((𝜑 ∧ (𝑤𝑈 ∧ ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))) → 𝑤𝑈)
7 sseq2 3993 . . . . 5 (𝑎 = 𝑤 → ( 𝐴𝑎 𝐴𝑤))
87adantl 484 . . . 4 (((𝜑 ∧ (𝑤𝑈 ∧ ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))) ∧ 𝑎 = 𝑤) → ( 𝐴𝑎 𝐴𝑤))
9 elssuni 4868 . . . . . . 7 (𝑖𝐴𝑖 𝐴)
109rgen 3148 . . . . . 6 𝑖𝐴 𝑖 𝐴
11 simprr 771 . . . . . . 7 ((𝜑 ∧ (𝑤𝑈 ∧ ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))) → ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))
12 eleq2 2901 . . . . . . . . . . . . . . 15 (𝑣 = 𝐴 → (𝑖𝑣𝑖𝐴))
1312rexsng 4614 . . . . . . . . . . . . . 14 (𝐴𝑈 → (∃𝑣 ∈ {𝐴}𝑖𝑣𝑖𝐴))
143, 13syl 17 . . . . . . . . . . . . 13 (𝜑 → (∃𝑣 ∈ {𝐴}𝑖𝑣𝑖𝐴))
15 eleq2 2901 . . . . . . . . . . . . . . . 16 (𝑢 = 𝐴 → (𝑖𝑢𝑖𝐴))
16 unieq 4849 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝐴 𝑢 = 𝐴)
1716sseq1d 3998 . . . . . . . . . . . . . . . 16 (𝑢 = 𝐴 → ( 𝑢𝑤 𝐴𝑤))
1815, 17anbi12d 632 . . . . . . . . . . . . . . 15 (𝑢 = 𝐴 → ((𝑖𝑢 𝑢𝑤) ↔ (𝑖𝐴 𝐴𝑤)))
1918rexsng 4614 . . . . . . . . . . . . . 14 (𝐴𝑈 → (∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤) ↔ (𝑖𝐴 𝐴𝑤)))
203, 19syl 17 . . . . . . . . . . . . 13 (𝜑 → (∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤) ↔ (𝑖𝐴 𝐴𝑤)))
2114, 20imbi12d 347 . . . . . . . . . . . 12 (𝜑 → ((∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)) ↔ (𝑖𝐴 → (𝑖𝐴 𝐴𝑤))))
22 anclb 548 . . . . . . . . . . . 12 ((𝑖𝐴 𝐴𝑤) ↔ (𝑖𝐴 → (𝑖𝐴 𝐴𝑤)))
2321, 22syl6bbr 291 . . . . . . . . . . 11 (𝜑 → ((∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)) ↔ (𝑖𝐴 𝐴𝑤)))
2423imbi2d 343 . . . . . . . . . 10 (𝜑 → ((𝑖𝐴 → (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤))) ↔ (𝑖𝐴 → (𝑖𝐴 𝐴𝑤))))
25 pm5.4 392 . . . . . . . . . 10 ((𝑖𝐴 → (𝑖𝐴 𝐴𝑤)) ↔ (𝑖𝐴 𝐴𝑤))
2624, 25syl6bb 289 . . . . . . . . 9 (𝜑 → ((𝑖𝐴 → (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤))) ↔ (𝑖𝐴 𝐴𝑤)))
2726ralbidv2 3195 . . . . . . . 8 (𝜑 → (∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)) ↔ ∀𝑖𝐴 𝐴𝑤))
2827adantr 483 . . . . . . 7 ((𝜑 ∧ (𝑤𝑈 ∧ ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))) → (∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)) ↔ ∀𝑖𝐴 𝐴𝑤))
2911, 28mpbid 234 . . . . . 6 ((𝜑 ∧ (𝑤𝑈 ∧ ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))) → ∀𝑖𝐴 𝐴𝑤)
30 sstr2 3974 . . . . . . 7 (𝑖 𝐴 → ( 𝐴𝑤𝑖𝑤))
3130ral2imi 3156 . . . . . 6 (∀𝑖𝐴 𝑖 𝐴 → (∀𝑖𝐴 𝐴𝑤 → ∀𝑖𝐴 𝑖𝑤))
3210, 29, 31mpsyl 68 . . . . 5 ((𝜑 ∧ (𝑤𝑈 ∧ ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))) → ∀𝑖𝐴 𝑖𝑤)
33 unissb 4870 . . . . 5 ( 𝐴𝑤 ↔ ∀𝑖𝐴 𝑖𝑤)
3432, 33sylibr 236 . . . 4 ((𝜑 ∧ (𝑤𝑈 ∧ ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))) → 𝐴𝑤)
356, 8, 34rspcedvd 3626 . . 3 ((𝜑 ∧ (𝑤𝑈 ∧ ∀𝑖𝐴 (∃𝑣 ∈ {𝐴}𝑖𝑣 → ∃𝑢 ∈ {𝐴} (𝑖𝑢 𝑢𝑤)))) → ∃𝑎𝑈 𝐴𝑎)
365, 35rexlimddv 3291 . 2 (𝜑 → ∃𝑎𝑈 𝐴𝑎)
371, 2, 36mnuss2d 40649 1 (𝜑 𝐴𝑈)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 398  wal 1535   = wceq 1537  wcel 2114  {cab 2799  wral 3138  wrex 3139  wss 3936  𝒫 cpw 4539  {csn 4567   cuni 4838
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-sep 5203
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3496  df-sbc 3773  df-in 3943  df-ss 3952  df-pw 4541  df-sn 4568  df-uni 4839
This theorem is referenced by:  mnuund  40663  mnutrcld  40664  mnugrud  40669
  Copyright terms: Public domain W3C validator