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

Theorem cbvralcsf 3939
Description: A more general version of cbvralf 3355 that doesn't require 𝐴 and 𝐵 to be distinct from 𝑥 or 𝑦. Changes bound variables using implicit substitution. Usage of this theorem is discouraged because it depends on ax-13 2370. (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
cbvralcsf (∀𝑥𝐴 𝜑 ↔ ∀𝑦𝐵 𝜓)

Proof of Theorem cbvralcsf
Dummy variables 𝑣 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nfv 1916 . . . 4 𝑧(𝑥𝐴𝜑)
2 nfcsb1v 3919 . . . . . 6 𝑥𝑧 / 𝑥𝐴
32nfcri 2889 . . . . 5 𝑥 𝑧𝑧 / 𝑥𝐴
4 nfsbc1v 3798 . . . . 5 𝑥[𝑧 / 𝑥]𝜑
53, 4nfim 1898 . . . 4 𝑥(𝑧𝑧 / 𝑥𝐴[𝑧 / 𝑥]𝜑)
6 id 22 . . . . . 6 (𝑥 = 𝑧𝑥 = 𝑧)
7 csbeq1a 3908 . . . . . 6 (𝑥 = 𝑧𝐴 = 𝑧 / 𝑥𝐴)
86, 7eleq12d 2826 . . . . 5 (𝑥 = 𝑧 → (𝑥𝐴𝑧𝑧 / 𝑥𝐴))
9 sbceq1a 3789 . . . . 5 (𝑥 = 𝑧 → (𝜑[𝑧 / 𝑥]𝜑))
108, 9imbi12d 343 . . . 4 (𝑥 = 𝑧 → ((𝑥𝐴𝜑) ↔ (𝑧𝑧 / 𝑥𝐴[𝑧 / 𝑥]𝜑)))
111, 5, 10cbvalv1 2336 . . 3 (∀𝑥(𝑥𝐴𝜑) ↔ ∀𝑧(𝑧𝑧 / 𝑥𝐴[𝑧 / 𝑥]𝜑))
12 nfcv 2902 . . . . . . 7 𝑦𝑧
13 cbvralcsf.1 . . . . . . 7 𝑦𝐴
1412, 13nfcsb 3922 . . . . . 6 𝑦𝑧 / 𝑥𝐴
1514nfcri 2889 . . . . 5 𝑦 𝑧𝑧 / 𝑥𝐴
16 cbvralcsf.3 . . . . . 6 𝑦𝜑
1712, 16nfsbc 3803 . . . . 5 𝑦[𝑧 / 𝑥]𝜑
1815, 17nfim 1898 . . . 4 𝑦(𝑧𝑧 / 𝑥𝐴[𝑧 / 𝑥]𝜑)
19 nfv 1916 . . . 4 𝑧(𝑦𝐵𝜓)
20 id 22 . . . . . 6 (𝑧 = 𝑦𝑧 = 𝑦)
21 csbeq1 3897 . . . . . . 7 (𝑧 = 𝑦𝑧 / 𝑥𝐴 = 𝑦 / 𝑥𝐴)
22 df-csb 3895 . . . . . . . 8 𝑦 / 𝑥𝐴 = {𝑣[𝑦 / 𝑥]𝑣𝐴}
23 cbvralcsf.2 . . . . . . . . . . . 12 𝑥𝐵
2423nfcri 2889 . . . . . . . . . . 11 𝑥 𝑣𝐵
25 cbvralcsf.5 . . . . . . . . . . . 12 (𝑥 = 𝑦𝐴 = 𝐵)
2625eleq2d 2818 . . . . . . . . . . 11 (𝑥 = 𝑦 → (𝑣𝐴𝑣𝐵))
2724, 26sbie 2500 . . . . . . . . . 10 ([𝑦 / 𝑥]𝑣𝐴𝑣𝐵)
28 sbsbc 3782 . . . . . . . . . 10 ([𝑦 / 𝑥]𝑣𝐴[𝑦 / 𝑥]𝑣𝐴)
2927, 28bitr3i 276 . . . . . . . . 9 (𝑣𝐵[𝑦 / 𝑥]𝑣𝐴)
3029eqabi 2868 . . . . . . . 8 𝐵 = {𝑣[𝑦 / 𝑥]𝑣𝐴}
3122, 30eqtr4i 2762 . . . . . . 7 𝑦 / 𝑥𝐴 = 𝐵
3221, 31eqtrdi 2787 . . . . . 6 (𝑧 = 𝑦𝑧 / 𝑥𝐴 = 𝐵)
3320, 32eleq12d 2826 . . . . 5 (𝑧 = 𝑦 → (𝑧𝑧 / 𝑥𝐴𝑦𝐵))
34 dfsbcq 3780 . . . . . 6 (𝑧 = 𝑦 → ([𝑧 / 𝑥]𝜑[𝑦 / 𝑥]𝜑))
35 sbsbc 3782 . . . . . . 7 ([𝑦 / 𝑥]𝜑[𝑦 / 𝑥]𝜑)
36 cbvralcsf.4 . . . . . . . 8 𝑥𝜓
37 cbvralcsf.6 . . . . . . . 8 (𝑥 = 𝑦 → (𝜑𝜓))
3836, 37sbie 2500 . . . . . . 7 ([𝑦 / 𝑥]𝜑𝜓)
3935, 38bitr3i 276 . . . . . 6 ([𝑦 / 𝑥]𝜑𝜓)
4034, 39bitrdi 286 . . . . 5 (𝑧 = 𝑦 → ([𝑧 / 𝑥]𝜑𝜓))
4133, 40imbi12d 343 . . . 4 (𝑧 = 𝑦 → ((𝑧𝑧 / 𝑥𝐴[𝑧 / 𝑥]𝜑) ↔ (𝑦𝐵𝜓)))
4218, 19, 41cbvalv1 2336 . . 3 (∀𝑧(𝑧𝑧 / 𝑥𝐴[𝑧 / 𝑥]𝜑) ↔ ∀𝑦(𝑦𝐵𝜓))
4311, 42bitri 274 . 2 (∀𝑥(𝑥𝐴𝜑) ↔ ∀𝑦(𝑦𝐵𝜓))
44 df-ral 3061 . 2 (∀𝑥𝐴 𝜑 ↔ ∀𝑥(𝑥𝐴𝜑))
45 df-ral 3061 . 2 (∀𝑦𝐵 𝜓 ↔ ∀𝑦(𝑦𝐵𝜓))
4643, 44, 453bitr4i 302 1 (∀𝑥𝐴 𝜑 ↔ ∀𝑦𝐵 𝜓)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wal 1538   = wceq 1540  wnf 1784  [wsb 2066  wcel 2105  {cab 2708  wnfc 2882  wral 3060  [wsbc 3778  csb 3894
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 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-13 2370  ax-ext 2702
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-tru 1543  df-ex 1781  df-nf 1785  df-sb 2067  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ral 3061  df-sbc 3779  df-csb 3895
This theorem is referenced by:  cbvrexcsf  3940  cbvralv2  3943
  Copyright terms: Public domain W3C validator