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 33263
Description: The class of sets "whose singletons" belong to a set is a set. Nice application of ax-rep 4971. (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 3416 . . . 4 (𝐴𝑉 → ∃𝑦 𝑦 = 𝐴)
2 eleq2 2881 . . . . . . 7 (𝑦 = 𝐴 → ({𝑥} ∈ 𝑦 ↔ {𝑥} ∈ 𝐴))
32abbidv 2932 . . . . . 6 (𝑦 = 𝐴 → {𝑥 ∣ {𝑥} ∈ 𝑦} = {𝑥 ∣ {𝑥} ∈ 𝐴})
4 eleq1 2880 . . . . . . 7 ({𝑥 ∣ {𝑥} ∈ 𝑦} = {𝑥 ∣ {𝑥} ∈ 𝐴} → ({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V ↔ {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
54biimpd 220 . . . . . 6 ({𝑥 ∣ {𝑥} ∈ 𝑦} = {𝑥 ∣ {𝑥} ∈ 𝐴} → ({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
63, 5syl 17 . . . . 5 (𝑦 = 𝐴 → ({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
76eximi 1919 . . . 4 (∃𝑦 𝑦 = 𝐴 → ∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
81, 7syl 17 . . 3 (𝐴𝑉 → ∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
9 19.35 1967 . . . . . 6 (∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V) ↔ (∀𝑦{𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
109biimpi 207 . . . . 5 (∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V) → (∀𝑦{𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
1110com12 32 . . . 4 (∀𝑦{𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → (∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V) → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V))
12 ax-rep 4971 . . . . . . . 8 (∀𝑢𝑧𝑡(∀𝑧 𝑢 = {𝑡} → 𝑡 = 𝑧) → ∃𝑧𝑡(𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡})))
13 19.3v 2078 . . . . . . . . . . 11 (∀𝑧 𝑢 = {𝑡} ↔ 𝑢 = {𝑡})
1413sbbii 2068 . . . . . . . . . . 11 ([𝑧 / 𝑡]∀𝑧 𝑢 = {𝑡} ↔ [𝑧 / 𝑡]𝑢 = {𝑡})
15 sbsbc 3644 . . . . . . . . . . . . . 14 ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ [𝑧 / 𝑡]𝑢 = {𝑡})
16 vex 3401 . . . . . . . . . . . . . . 15 𝑧 ∈ V
17 sbceq2g 4194 . . . . . . . . . . . . . . 15 (𝑧 ∈ V → ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ 𝑢 = 𝑧 / 𝑡{𝑡}))
1816, 17ax-mp 5 . . . . . . . . . . . . . 14 ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ 𝑢 = 𝑧 / 𝑡{𝑡})
1915, 18bitri 266 . . . . . . . . . . . . 13 ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ 𝑢 = 𝑧 / 𝑡{𝑡})
20 bj-csbsn 33209 . . . . . . . . . . . . . 14 𝑧 / 𝑡{𝑡} = {𝑧}
2120eqeq2i 2825 . . . . . . . . . . . . 13 (𝑢 = 𝑧 / 𝑡{𝑡} ↔ 𝑢 = {𝑧})
2219, 21bitri 266 . . . . . . . . . . . 12 ([𝑧 / 𝑡]𝑢 = {𝑡} ↔ 𝑢 = {𝑧})
23 eqtr2 2833 . . . . . . . . . . . . 13 ((𝑢 = {𝑡} ∧ 𝑢 = {𝑧}) → {𝑡} = {𝑧})
24 vex 3401 . . . . . . . . . . . . . 14 𝑡 ∈ V
2524sneqr 4566 . . . . . . . . . . . . 13 ({𝑡} = {𝑧} → 𝑡 = 𝑧)
2623, 25syl 17 . . . . . . . . . . . 12 ((𝑢 = {𝑡} ∧ 𝑢 = {𝑧}) → 𝑡 = 𝑧)
2722, 26sylan2b 583 . . . . . . . . . . 11 ((𝑢 = {𝑡} ∧ [𝑧 / 𝑡]𝑢 = {𝑡}) → 𝑡 = 𝑧)
2813, 14, 27syl2anb 587 . . . . . . . . . 10 ((∀𝑧 𝑢 = {𝑡} ∧ [𝑧 / 𝑡]∀𝑧 𝑢 = {𝑡}) → 𝑡 = 𝑧)
2928gen2 1878 . . . . . . . . 9 𝑡𝑧((∀𝑧 𝑢 = {𝑡} ∧ [𝑧 / 𝑡]∀𝑧 𝑢 = {𝑡}) → 𝑡 = 𝑧)
30 nfa1 2196 . . . . . . . . . 10 𝑧𝑧 𝑢 = {𝑡}
3130mo 2678 . . . . . . . . 9 (∃𝑧𝑡(∀𝑧 𝑢 = {𝑡} → 𝑡 = 𝑧) ↔ ∀𝑡𝑧((∀𝑧 𝑢 = {𝑡} ∧ [𝑧 / 𝑡]∀𝑧 𝑢 = {𝑡}) → 𝑡 = 𝑧))
3229, 31mpbir 222 . . . . . . . 8 𝑧𝑡(∀𝑧 𝑢 = {𝑡} → 𝑡 = 𝑧)
3312, 32mpg 1879 . . . . . . 7 𝑧𝑡(𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}))
34 bj-sbel1 33210 . . . . . . . . . . . 12 ([𝑡 / 𝑥]{𝑥} ∈ 𝑦𝑡 / 𝑥{𝑥} ∈ 𝑦)
35 bj-csbsn 33209 . . . . . . . . . . . . 13 𝑡 / 𝑥{𝑥} = {𝑡}
3635eleq1i 2883 . . . . . . . . . . . 12 (𝑡 / 𝑥{𝑥} ∈ 𝑦 ↔ {𝑡} ∈ 𝑦)
3734, 36bitri 266 . . . . . . . . . . 11 ([𝑡 / 𝑥]{𝑥} ∈ 𝑦 ↔ {𝑡} ∈ 𝑦)
38 df-clab 2800 . . . . . . . . . . 11 (𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦} ↔ [𝑡 / 𝑥]{𝑥} ∈ 𝑦)
3913anbi2i 611 . . . . . . . . . . . . . 14 ((𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ (𝑢𝑦𝑢 = {𝑡}))
40 eleq1a 2887 . . . . . . . . . . . . . . . . . 18 (𝑢𝑦 → ({𝑡} = 𝑢 → {𝑡} ∈ 𝑦))
4140com12 32 . . . . . . . . . . . . . . . . 17 ({𝑡} = 𝑢 → (𝑢𝑦 → {𝑡} ∈ 𝑦))
4241eqcoms 2821 . . . . . . . . . . . . . . . 16 (𝑢 = {𝑡} → (𝑢𝑦 → {𝑡} ∈ 𝑦))
4342imdistanri 561 . . . . . . . . . . . . . . 15 ((𝑢𝑦𝑢 = {𝑡}) → ({𝑡} ∈ 𝑦𝑢 = {𝑡}))
44 eleq1a 2887 . . . . . . . . . . . . . . . 16 ({𝑡} ∈ 𝑦 → (𝑢 = {𝑡} → 𝑢𝑦))
4544impac 544 . . . . . . . . . . . . . . 15 (({𝑡} ∈ 𝑦𝑢 = {𝑡}) → (𝑢𝑦𝑢 = {𝑡}))
4643, 45impbii 200 . . . . . . . . . . . . . 14 ((𝑢𝑦𝑢 = {𝑡}) ↔ ({𝑡} ∈ 𝑦𝑢 = {𝑡}))
4739, 46bitri 266 . . . . . . . . . . . . 13 ((𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ ({𝑡} ∈ 𝑦𝑢 = {𝑡}))
4847exbii 1933 . . . . . . . . . . . 12 (∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ ∃𝑢({𝑡} ∈ 𝑦𝑢 = {𝑡}))
49 snex 5105 . . . . . . . . . . . . . 14 {𝑡} ∈ V
5049isseti 3410 . . . . . . . . . . . . 13 𝑢 𝑢 = {𝑡}
51 19.42v 2044 . . . . . . . . . . . . 13 (∃𝑢({𝑡} ∈ 𝑦𝑢 = {𝑡}) ↔ ({𝑡} ∈ 𝑦 ∧ ∃𝑢 𝑢 = {𝑡}))
5250, 51mpbiran2 692 . . . . . . . . . . . 12 (∃𝑢({𝑡} ∈ 𝑦𝑢 = {𝑡}) ↔ {𝑡} ∈ 𝑦)
5348, 52bitri 266 . . . . . . . . . . 11 (∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ {𝑡} ∈ 𝑦)
5437, 38, 533bitr4ri 295 . . . . . . . . . 10 (∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡}) ↔ 𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦})
5554bibi2i 328 . . . . . . . . 9 ((𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡})) ↔ (𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
5655albii 1904 . . . . . . . 8 (∀𝑡(𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡})) ↔ ∀𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
5756exbii 1933 . . . . . . 7 (∃𝑧𝑡(𝑡𝑧 ↔ ∃𝑢(𝑢𝑦 ∧ ∀𝑧 𝑢 = {𝑡})) ↔ ∃𝑧𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
5833, 57mpbi 221 . . . . . 6 𝑧𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦})
59 dfcleq 2807 . . . . . . 7 (𝑧 = {𝑥 ∣ {𝑥} ∈ 𝑦} ↔ ∀𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
6059exbii 1933 . . . . . 6 (∃𝑧 𝑧 = {𝑥 ∣ {𝑥} ∈ 𝑦} ↔ ∃𝑧𝑡(𝑡𝑧𝑡 ∈ {𝑥 ∣ {𝑥} ∈ 𝑦}))
6158, 60mpbir 222 . . . . 5 𝑧 𝑧 = {𝑥 ∣ {𝑥} ∈ 𝑦}
6261issetri 3411 . . . 4 {𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V
6311, 62mpg 1879 . . 3 (∃𝑦({𝑥 ∣ {𝑥} ∈ 𝑦} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V) → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
648, 63syl 17 . 2 (𝐴𝑉 → ∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
65 ax5e 2003 . 2 (∃𝑦{𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
6664, 65syl 17 1 (𝐴𝑉 → {𝑥 ∣ {𝑥} ∈ 𝐴} ∈ V)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 197  wa 384  wal 1635   = wceq 1637  wex 1859  [wsb 2061  wcel 2157  {cab 2799  Vcvv 3398  [wsbc 3640  csb 3735  {csn 4377
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1877  ax-4 1894  ax-5 2001  ax-6 2069  ax-7 2105  ax-9 2166  ax-10 2186  ax-11 2202  ax-12 2215  ax-13 2422  ax-ext 2791  ax-rep 4971  ax-sep 4982  ax-nul 4990  ax-pr 5103
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 866  df-tru 1641  df-fal 1651  df-ex 1860  df-nf 1864  df-sb 2062  df-mo 2635  df-eu 2638  df-clab 2800  df-cleq 2806  df-clel 2809  df-nfc 2944  df-v 3400  df-sbc 3641  df-csb 3736  df-dif 3779  df-un 3781  df-nul 4124  df-sn 4378  df-pr 4380
This theorem is referenced by:  bj-clex  33264  bj-snglex  33273
  Copyright terms: Public domain W3C validator