MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  cbvrabcsf Structured version   Visualization version   GIF version

Theorem cbvrabcsf 3873
Description: A more general version of cbvrab 3413 with no distinct variable restrictions. Usage of this theorem is discouraged because it depends on ax-13 2372. (Contributed by Andrew Salmon, 13-Jul-2011.) (New usage is discouraged.)
Hypotheses
Ref Expression
cbvralcsf.1 𝑦𝐴
cbvralcsf.2 𝑥𝐵
cbvralcsf.3 𝑦𝜑
cbvralcsf.4 𝑥𝜓
cbvralcsf.5 (𝑥 = 𝑦𝐴 = 𝐵)
cbvralcsf.6 (𝑥 = 𝑦 → (𝜑𝜓))
Assertion
Ref Expression
cbvrabcsf {𝑥𝐴𝜑} = {𝑦𝐵𝜓}

Proof of Theorem cbvrabcsf
Dummy variables 𝑣 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nfv 1922 . . . 4 𝑧(𝑥𝐴𝜑)
2 nfcsb1v 3850 . . . . . 6 𝑥𝑧 / 𝑥𝐴
32nfcri 2892 . . . . 5 𝑥 𝑧𝑧 / 𝑥𝐴
4 nfs1v 2158 . . . . 5 𝑥[𝑧 / 𝑥]𝜑
53, 4nfan 1907 . . . 4 𝑥(𝑧𝑧 / 𝑥𝐴 ∧ [𝑧 / 𝑥]𝜑)
6 id 22 . . . . . 6 (𝑥 = 𝑧𝑥 = 𝑧)
7 csbeq1a 3839 . . . . . 6 (𝑥 = 𝑧𝐴 = 𝑧 / 𝑥𝐴)
86, 7eleq12d 2833 . . . . 5 (𝑥 = 𝑧 → (𝑥𝐴𝑧𝑧 / 𝑥𝐴))
9 sbequ12 2250 . . . . 5 (𝑥 = 𝑧 → (𝜑 ↔ [𝑧 / 𝑥]𝜑))
108, 9anbi12d 634 . . . 4 (𝑥 = 𝑧 → ((𝑥𝐴𝜑) ↔ (𝑧𝑧 / 𝑥𝐴 ∧ [𝑧 / 𝑥]𝜑)))
111, 5, 10cbvab 2815 . . 3 {𝑥 ∣ (𝑥𝐴𝜑)} = {𝑧 ∣ (𝑧𝑧 / 𝑥𝐴 ∧ [𝑧 / 𝑥]𝜑)}
12 nfcv 2905 . . . . . . 7 𝑦𝑧
13 cbvralcsf.1 . . . . . . 7 𝑦𝐴
1412, 13nfcsb 3853 . . . . . 6 𝑦𝑧 / 𝑥𝐴
1514nfcri 2892 . . . . 5 𝑦 𝑧𝑧 / 𝑥𝐴
16 cbvralcsf.3 . . . . . 6 𝑦𝜑
1716nfsb 2527 . . . . 5 𝑦[𝑧 / 𝑥]𝜑
1815, 17nfan 1907 . . . 4 𝑦(𝑧𝑧 / 𝑥𝐴 ∧ [𝑧 / 𝑥]𝜑)
19 nfv 1922 . . . 4 𝑧(𝑦𝐵𝜓)
20 id 22 . . . . . 6 (𝑧 = 𝑦𝑧 = 𝑦)
21 csbeq1 3828 . . . . . . 7 (𝑧 = 𝑦𝑧 / 𝑥𝐴 = 𝑦 / 𝑥𝐴)
22 df-csb 3826 . . . . . . . 8 𝑦 / 𝑥𝐴 = {𝑣[𝑦 / 𝑥]𝑣𝐴}
23 cbvralcsf.2 . . . . . . . . . . . 12 𝑥𝐵
2423nfcri 2892 . . . . . . . . . . 11 𝑥 𝑣𝐵
25 cbvralcsf.5 . . . . . . . . . . . 12 (𝑥 = 𝑦𝐴 = 𝐵)
2625eleq2d 2824 . . . . . . . . . . 11 (𝑥 = 𝑦 → (𝑣𝐴𝑣𝐵))
2724, 26sbie 2506 . . . . . . . . . 10 ([𝑦 / 𝑥]𝑣𝐴𝑣𝐵)
28 sbsbc 3712 . . . . . . . . . 10 ([𝑦 / 𝑥]𝑣𝐴[𝑦 / 𝑥]𝑣𝐴)
2927, 28bitr3i 280 . . . . . . . . 9 (𝑣𝐵[𝑦 / 𝑥]𝑣𝐴)
3029abbi2i 2877 . . . . . . . 8 𝐵 = {𝑣[𝑦 / 𝑥]𝑣𝐴}
3122, 30eqtr4i 2769 . . . . . . 7 𝑦 / 𝑥𝐴 = 𝐵
3221, 31eqtrdi 2795 . . . . . 6 (𝑧 = 𝑦𝑧 / 𝑥𝐴 = 𝐵)
3320, 32eleq12d 2833 . . . . 5 (𝑧 = 𝑦 → (𝑧𝑧 / 𝑥𝐴𝑦𝐵))
34 sbequ 2090 . . . . . 6 (𝑧 = 𝑦 → ([𝑧 / 𝑥]𝜑 ↔ [𝑦 / 𝑥]𝜑))
35 cbvralcsf.4 . . . . . . 7 𝑥𝜓
36 cbvralcsf.6 . . . . . . 7 (𝑥 = 𝑦 → (𝜑𝜓))
3735, 36sbie 2506 . . . . . 6 ([𝑦 / 𝑥]𝜑𝜓)
3834, 37bitrdi 290 . . . . 5 (𝑧 = 𝑦 → ([𝑧 / 𝑥]𝜑𝜓))
3933, 38anbi12d 634 . . . 4 (𝑧 = 𝑦 → ((𝑧𝑧 / 𝑥𝐴 ∧ [𝑧 / 𝑥]𝜑) ↔ (𝑦𝐵𝜓)))
4018, 19, 39cbvab 2815 . . 3 {𝑧 ∣ (𝑧𝑧 / 𝑥𝐴 ∧ [𝑧 / 𝑥]𝜑)} = {𝑦 ∣ (𝑦𝐵𝜓)}
4111, 40eqtri 2766 . 2 {𝑥 ∣ (𝑥𝐴𝜑)} = {𝑦 ∣ (𝑦𝐵𝜓)}
42 df-rab 3071 . 2 {𝑥𝐴𝜑} = {𝑥 ∣ (𝑥𝐴𝜑)}
43 df-rab 3071 . 2 {𝑦𝐵𝜓} = {𝑦 ∣ (𝑦𝐵𝜓)}
4441, 42, 433eqtr4i 2776 1 {𝑥𝐴𝜑} = {𝑦𝐵𝜓}
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399   = wceq 1543  wnf 1791  [wsb 2071  wcel 2111  {cab 2715  wnfc 2885  {crab 3066  [wsbc 3708  csb 3825
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2159  ax-12 2176  ax-13 2372  ax-ext 2709
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-tru 1546  df-ex 1788  df-nf 1792  df-sb 2072  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2887  df-rab 3071  df-sbc 3709  df-csb 3826
This theorem is referenced by:  cbvrabv2  42377
  Copyright terms: Public domain W3C validator