Users' Mathboxes Mathbox for BJ < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  bj-snsetex Structured version   Visualization version   GIF version

Theorem bj-snsetex 32926
Description: The class of sets "whose singletons" belong to a set is a set. Nice application of ax-rep 4762. (Contributed by BJ, 6-Oct-2018.)
Assertion
Ref Expression
bj-snsetex (𝐴𝑉 → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
Distinct variable group:   𝑥,𝐴
Allowed substitution hint:   𝑉(𝑥)

Proof of Theorem bj-snsetex
Dummy variables 𝑦 𝑧 𝑡 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elisset 3210 . . . 4 (𝐴𝑉 → ∃𝑦 𝑦 = 𝐴)
2 eleq2 2688 . . . . . . 7 (𝑦 = 𝐴 → ({𝑥} ∈ 𝑦 ↔ {𝑥} ∈ 𝐴))
32abbidv 2739 . . . . . 6 (𝑦 = 𝐴 → {𝑥 ∣ {𝑥} ∈ 𝑦} = {𝑥 ∣ {𝑥} ∈ 𝐴})
4 eleq1 2687 . . . . . . 7 ({𝑥 ∣ {𝑥} ∈ 𝑦} = {𝑥 ∣ {𝑥} ∈ 𝐴} → ({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V ↔ {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
54biimpd 219 . . . . . 6 ({𝑥 ∣ {𝑥} ∈ 𝑦} = {𝑥 ∣ {𝑥} ∈ 𝐴} → ({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
63, 5syl 17 . . . . 5 (𝑦 = 𝐴 → ({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
76eximi 1760 . . . 4 (∃𝑦 𝑦 = 𝐴 → ∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
81, 7syl 17 . . 3 (𝐴𝑉 → ∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
9 19.35 1803 . . . . . 6 (∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V) ↔ (∀𝑦{𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
109biimpi 206 . . . . 5 (∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V) → (∀𝑦{𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
1110com12 32 . . . 4 (∀𝑦{𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → (∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V) → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
12 ax-rep 4762 . . . . . . . 8 (∀𝑢𝑧𝑡(∀𝑧 𝑢 = {𝑡} → 𝑡 = 𝑧) → ∃𝑧𝑡(𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡})))
13 19.3v 1895 . . . . . . . . . . 11 (∀𝑧 𝑢 = {𝑡} ↔ 𝑢 = {𝑡})
1413sbbii 1885 . . . . . . . . . . 11 ([𝑧 / 𝑡]∀𝑧 𝑢 = {𝑡} ↔ [𝑧 / 𝑡]𝑢 = {𝑡})
15 sbsbc 3433 . . . . . . . . . . . . . 14 ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ [𝑧 / 𝑡]𝑢 = {𝑡})
16 vex 3198 . . . . . . . . . . . . . . 15 𝑧 ∈ V
17 sbceq2g 3981 . . . . . . . . . . . . . . 15 (𝑧 ∈ V → ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ 𝑢 = 𝑧 / 𝑡{𝑡}))
1816, 17ax-mp 5 . . . . . . . . . . . . . 14 ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ 𝑢 = 𝑧 / 𝑡{𝑡})
1915, 18bitri 264 . . . . . . . . . . . . 13 ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ 𝑢 = 𝑧 / 𝑡{𝑡})
20 bj-csbsn 32874 . . . . . . . . . . . . . 14 𝑧 / 𝑡{𝑡} = {𝑧}
2120eqeq2i 2632 . . . . . . . . . . . . 13 (𝑢 = 𝑧 / 𝑡{𝑡} ↔ 𝑢 = {𝑧})
2219, 21bitri 264 . . . . . . . . . . . 12 ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ 𝑢 = {𝑧})
23 eqtr2 2640 . . . . . . . . . . . . 13 ((𝑢 = {𝑡} ∧ 𝑢 = {𝑧}) → {𝑡} = {𝑧})
24 vex 3198 . . . . . . . . . . . . . 14 𝑡 ∈ V
2524sneqr 4362 . . . . . . . . . . . . 13 ({𝑡} = {𝑧} → 𝑡 = 𝑧)
2623, 25syl 17 . . . . . . . . . . . 12 ((𝑢 = {𝑡} ∧ 𝑢 = {𝑧}) → 𝑡 = 𝑧)
2722, 26sylan2b 492 . . . . . . . . . . 11 ((𝑢 = {𝑡} ∧ [𝑧 / 𝑡]𝑢 = {𝑡}) → 𝑡 = 𝑧)
2813, 14, 27syl2anb 496 . . . . . . . . . 10 ((∀𝑧 𝑢 = {𝑡} ∧ [𝑧 / 𝑡]∀𝑧 𝑢 = {𝑡}) → 𝑡 = 𝑧)
2928gen2 1721 . . . . . . . . 9 𝑡𝑧((∀𝑧 𝑢 = {𝑡} ∧ [𝑧 / 𝑡]∀𝑧 𝑢 = {𝑡}) → 𝑡 = 𝑧)
30 nfa1 2026 . . . . . . . . . 10 𝑧𝑧 𝑢 = {𝑡}
3130mo 2506 . . . . . . . . 9 (∃𝑧𝑡(∀𝑧 𝑢 = {𝑡} → 𝑡 = 𝑧) ↔ ∀𝑡𝑧((∀𝑧 𝑢 = {𝑡} ∧ [𝑧 / 𝑡]∀𝑧 𝑢 = {𝑡}) → 𝑡 = 𝑧))
3229, 31mpbir 221 . . . . . . . 8 𝑧𝑡(∀𝑧 𝑢 = {𝑡} → 𝑡 = 𝑧)
3312, 32mpg 1722 . . . . . . 7 𝑧𝑡(𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}))
34 bj-sbel1 32875 . . . . . . . . . . . 12 ([𝑡 / 𝑥]{𝑥} ∈ 𝑦𝑡 / 𝑥{𝑥} ∈ 𝑦)
35 bj-csbsn 32874 . . . . . . . . . . . . 13 𝑡 / 𝑥{𝑥} = {𝑡}
3635eleq1i 2690 . . . . . . . . . . . 12 (𝑡 / 𝑥{𝑥} ∈ 𝑦 ↔ {𝑡} ∈ 𝑦)
3734, 36bitri 264 . . . . . . . . . . 11 ([𝑡 / 𝑥]{𝑥} ∈ 𝑦 ↔ {𝑡} ∈ 𝑦)
38 df-clab 2607 . . . . . . . . . . 11 (𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦} ↔ [𝑡 / 𝑥]{𝑥} ∈ 𝑦)
3913anbi2i 729 . . . . . . . . . . . . . 14 ((𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ (𝑢𝑦𝑢 = {𝑡}))
40 eleq1a 2694 . . . . . . . . . . . . . . . . . 18 (𝑢𝑦 → ({𝑡} = 𝑢 → {𝑡} ∈ 𝑦))
4140com12 32 . . . . . . . . . . . . . . . . 17 ({𝑡} = 𝑢 → (𝑢𝑦 → {𝑡} ∈ 𝑦))
4241eqcoms 2628 . . . . . . . . . . . . . . . 16 (𝑢 = {𝑡} → (𝑢𝑦 → {𝑡} ∈ 𝑦))
4342imdistanri 726 . . . . . . . . . . . . . . 15 ((𝑢𝑦𝑢 = {𝑡}) → ({𝑡} ∈ 𝑦𝑢 = {𝑡}))
44 eleq1a 2694 . . . . . . . . . . . . . . . 16 ({𝑡} ∈ 𝑦 → (𝑢 = {𝑡} → 𝑢𝑦))
4544impac 650 . . . . . . . . . . . . . . 15 (({𝑡} ∈ 𝑦𝑢 = {𝑡}) → (𝑢𝑦𝑢 = {𝑡}))
4643, 45impbii 199 . . . . . . . . . . . . . 14 ((𝑢𝑦𝑢 = {𝑡}) ↔ ({𝑡} ∈ 𝑦𝑢 = {𝑡}))
4739, 46bitri 264 . . . . . . . . . . . . 13 ((𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ ({𝑡} ∈ 𝑦𝑢 = {𝑡}))
4847exbii 1772 . . . . . . . . . . . 12 (∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ ∃𝑢({𝑡} ∈ 𝑦𝑢 = {𝑡}))
49 snex 4899 . . . . . . . . . . . . . 14 {𝑡} ∈ V
5049isseti 3204 . . . . . . . . . . . . 13 𝑢 𝑢 = {𝑡}
51 19.42v 1916 . . . . . . . . . . . . 13 (∃𝑢({𝑡} ∈ 𝑦𝑢 = {𝑡}) ↔ ({𝑡} ∈ 𝑦 ∧ ∃𝑢 𝑢 = {𝑡}))
5250, 51mpbiran2 953 . . . . . . . . . . . 12 (∃𝑢({𝑡} ∈ 𝑦𝑢 = {𝑡}) ↔ {𝑡} ∈ 𝑦)
5348, 52bitri 264 . . . . . . . . . . 11 (∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ {𝑡} ∈ 𝑦)
5437, 38, 533bitr4ri 293 . . . . . . . . . 10 (∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ 𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦})
5554bibi2i 327 . . . . . . . . 9 ((𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡})) ↔ (𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
5655albii 1745 . . . . . . . 8 (∀𝑡(𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡})) ↔ ∀𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
5756exbii 1772 . . . . . . 7 (∃𝑧𝑡(𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡})) ↔ ∃𝑧𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
5833, 57mpbi 220 . . . . . 6 𝑧𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦})
59 dfcleq 2614 . . . . . . 7 (𝑧 = {𝑥 ∣ {𝑥} ∈ 𝑦} ↔ ∀𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
6059exbii 1772 . . . . . 6 (∃𝑧 𝑧 = {𝑥 ∣ {𝑥} ∈ 𝑦} ↔ ∃𝑧𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
6158, 60mpbir 221 . . . . 5 𝑧 𝑧 = {𝑥 ∣ {𝑥} ∈ 𝑦}
6261issetri 3205 . . . 4 {𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V
6311, 62mpg 1722 . . 3 (∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V) → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
648, 63syl 17 . 2 (𝐴𝑉 → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
65 ax5e 1839 . 2 (∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
6664, 65syl 17 1 (𝐴𝑉 → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 384  wal 1479   = wceq 1481  wex 1702  [wsb 1878  wcel 1988  {cab 2606  Vcvv 3195  [wsbc 3429  csb 3526  {csn 4168
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-9 1997  ax-10 2017  ax-11 2032  ax-12 2045  ax-13 2244  ax-ext 2600  ax-rep 4762  ax-sep 4772  ax-nul 4780  ax-pr 4897
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-tru 1484  df-fal 1487  df-ex 1703  df-nf 1708  df-sb 1879  df-eu 2472  df-mo 2473  df-clab 2607  df-cleq 2613  df-clel 2616  df-nfc 2751  df-v 3197  df-sbc 3430  df-csb 3527  df-dif 3570  df-un 3572  df-nul 3908  df-sn 4169  df-pr 4171
This theorem is referenced by:  bj-clex  32927  bj-snglex  32936
  Copyright terms: Public domain W3C validator