Users' Mathboxes Mathbox for Wolf Lammen < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  wl-sb8eut Structured version   Visualization version   GIF version

Theorem wl-sb8eut 38510
Description: Substitution of variable in universal quantifier. Closed form of sb8eu 2626. (Contributed by Wolf Lammen, 11-Aug-2019.)
Assertion
Ref Expression
wl-sb8eut (∀𝑥Ⅎ𝑦𝜑 → (∃!𝑥𝜑 ↔ ∃!𝑦[𝑦 / 𝑥]𝜑))

Proof of Theorem wl-sb8eut
Dummy variables 𝑣 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nfnf1 2191 . . . . . 6 Ⅎ𝑦Ⅎ𝑦𝜑
21nfal 2354 . . . . 5 Ⅎ𝑦∀𝑥Ⅎ𝑦𝜑
3 equsb3 2140 . . . . . . 7 ([𝑣 / 𝑥]𝑥 = 𝑢 ↔ 𝑣 = 𝑢)
43sblbis 2342 . . . . . 6 ([𝑣 / 𝑥](𝜑 ↔ 𝑥 = 𝑢) ↔ ([𝑣 / 𝑥]𝜑 ↔ 𝑣 = 𝑢))
5 nfa1 2188 . . . . . . . 8 Ⅎ𝑥∀𝑥Ⅎ𝑦𝜑
6 sp 2220 . . . . . . . 8 (∀𝑥Ⅎ𝑦𝜑 → Ⅎ𝑦𝜑)
75, 6nfsbd 2552 . . . . . . 7 (∀𝑥Ⅎ𝑦𝜑 → Ⅎ𝑦[𝑣 / 𝑥]𝜑)
8 nfvd 1948 . . . . . . 7 (∀𝑥Ⅎ𝑦𝜑 → Ⅎ𝑦 𝑣 = 𝑢)
97, 8nfbid 1935 . . . . . 6 (∀𝑥Ⅎ𝑦𝜑 → Ⅎ𝑦([𝑣 / 𝑥]𝜑 ↔ 𝑣 = 𝑢))
104, 9nfxfrd 1887 . . . . 5 (∀𝑥Ⅎ𝑦𝜑 → Ⅎ𝑦[𝑣 / 𝑥](𝜑 ↔ 𝑥 = 𝑢))
11 sbequ 2120 . . . . . 6 (𝑣 = 𝑦 → ([𝑣 / 𝑥](𝜑 ↔ 𝑥 = 𝑢) ↔ [𝑦 / 𝑥](𝜑 ↔ 𝑥 = 𝑢)))
1211a1i 11 . . . . 5 (∀𝑥Ⅎ𝑦𝜑 → (𝑣 = 𝑦 → ([𝑣 / 𝑥](𝜑 ↔ 𝑥 = 𝑢) ↔ [𝑦 / 𝑥](𝜑 ↔ 𝑥 = 𝑢))))
132, 10, 12cbvald 2437 . . . 4 (∀𝑥Ⅎ𝑦𝜑 → (∀𝑣[𝑣 / 𝑥](𝜑 ↔ 𝑥 = 𝑢) ↔ ∀𝑦[𝑦 / 𝑥](𝜑 ↔ 𝑥 = 𝑢)))
14 nfv 1947 . . . . . 6 Ⅎ𝑣(𝜑 ↔ 𝑥 = 𝑢)
1514sb8 2547 . . . . 5 (∀𝑥(𝜑 ↔ 𝑥 = 𝑢) ↔ ∀𝑣[𝑣 / 𝑥](𝜑 ↔ 𝑥 = 𝑢))
1615bicomi 227 . . . 4 (∀𝑣[𝑣 / 𝑥](𝜑 ↔ 𝑥 = 𝑢) ↔ ∀𝑥(𝜑 ↔ 𝑥 = 𝑢))
17 equsb3 2140 . . . . . 6 ([𝑦 / 𝑥]𝑥 = 𝑢 ↔ 𝑦 = 𝑢)
1817sblbis 2342 . . . . 5 ([𝑦 / 𝑥](𝜑 ↔ 𝑥 = 𝑢) ↔ ([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑢))
1918albii 1852 . . . 4 (∀𝑦[𝑦 / 𝑥](𝜑 ↔ 𝑥 = 𝑢) ↔ ∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑢))
2013, 16, 193bitr3g 316 . . 3 (∀𝑥Ⅎ𝑦𝜑 → (∀𝑥(𝜑 ↔ 𝑥 = 𝑢) ↔ ∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑢)))
2120exbidv 1954 . 2 (∀𝑥Ⅎ𝑦𝜑 → (∃𝑢∀𝑥(𝜑 ↔ 𝑥 = 𝑢) ↔ ∃𝑢∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑢)))
22 eu6 2600 . 2 (∃!𝑥𝜑 ↔ ∃𝑢∀𝑥(𝜑 ↔ 𝑥 = 𝑢))
23 eu6 2600 . 2 (∃!𝑦[𝑦 / 𝑥]𝜑 ↔ ∃𝑢∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑢))
2421, 22, 233bitr4g 317 1 (∀𝑥Ⅎ𝑦𝜑 → (∃!𝑥𝜑 ↔ ∃!𝑦[𝑦 / 𝑥]𝜑))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209  ∀wal 1568  ∃wex 1812  Ⅎwnf 1816  [wsb 2099  ∃!weu 2594
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-10 2178  ax-11 2194  ax-12 2213  ax-13 2402
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-tru 1573  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595
This theorem is used by:  wl-sb8mot  38512
  Copyright terms: Public domain W3C validator