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

Theorem sbcom2 2432
Description: Commutativity law for substitution. Used in proof of Theorem 9.7 of [Megill] p. 449 (p. 16 of the preprint). (Contributed by NM, 27-May-1997.) (Proof shortened by Wolf Lammen, 24-Sep-2018.)
Assertion
Ref Expression
sbcom2 ([𝑤 / 𝑧][𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)
Distinct variable groups:   𝑥,𝑧   𝑥,𝑤   𝑦,𝑧
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑧,𝑤)

Proof of Theorem sbcom2
Dummy variables 𝑣 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ax6ev 1876 . 2 𝑢 𝑢 = 𝑦
2 ax6ev 1876 . 2 𝑣 𝑣 = 𝑤
3 2sb6 2431 . . . . . . . . . 10 ([𝑣 / 𝑧][𝑢 / 𝑥]𝜑 ↔ ∀𝑧𝑥((𝑧 = 𝑣𝑥 = 𝑢) → 𝜑))
4 alcom 2023 . . . . . . . . . 10 (∀𝑧𝑥((𝑧 = 𝑣𝑥 = 𝑢) → 𝜑) ↔ ∀𝑥𝑧((𝑧 = 𝑣𝑥 = 𝑢) → 𝜑))
5 ancomst 466 . . . . . . . . . . 11 (((𝑧 = 𝑣𝑥 = 𝑢) → 𝜑) ↔ ((𝑥 = 𝑢𝑧 = 𝑣) → 𝜑))
652albii 1737 . . . . . . . . . 10 (∀𝑥𝑧((𝑧 = 𝑣𝑥 = 𝑢) → 𝜑) ↔ ∀𝑥𝑧((𝑥 = 𝑢𝑧 = 𝑣) → 𝜑))
73, 4, 63bitri 284 . . . . . . . . 9 ([𝑣 / 𝑧][𝑢 / 𝑥]𝜑 ↔ ∀𝑥𝑧((𝑥 = 𝑢𝑧 = 𝑣) → 𝜑))
8 2sb6 2431 . . . . . . . . 9 ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ ∀𝑥𝑧((𝑥 = 𝑢𝑧 = 𝑣) → 𝜑))
97, 8bitr4i 265 . . . . . . . 8 ([𝑣 / 𝑧][𝑢 / 𝑥]𝜑 ↔ [𝑢 / 𝑥][𝑣 / 𝑧]𝜑)
10 nfv 1829 . . . . . . . . 9 𝑧 𝑢 = 𝑦
11 sbequ 2363 . . . . . . . . 9 (𝑢 = 𝑦 → ([𝑢 / 𝑥]𝜑 ↔ [𝑦 / 𝑥]𝜑))
1210, 11sbbid 2390 . . . . . . . 8 (𝑢 = 𝑦 → ([𝑣 / 𝑧][𝑢 / 𝑥]𝜑 ↔ [𝑣 / 𝑧][𝑦 / 𝑥]𝜑))
139, 12syl5bbr 272 . . . . . . 7 (𝑢 = 𝑦 → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑣 / 𝑧][𝑦 / 𝑥]𝜑))
14 sbequ 2363 . . . . . . 7 (𝑣 = 𝑤 → ([𝑣 / 𝑧][𝑦 / 𝑥]𝜑 ↔ [𝑤 / 𝑧][𝑦 / 𝑥]𝜑))
1513, 14sylan9bb 731 . . . . . 6 ((𝑢 = 𝑦𝑣 = 𝑤) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑤 / 𝑧][𝑦 / 𝑥]𝜑))
16 nfv 1829 . . . . . . . 8 𝑥 𝑣 = 𝑤
17 sbequ 2363 . . . . . . . 8 (𝑣 = 𝑤 → ([𝑣 / 𝑧]𝜑 ↔ [𝑤 / 𝑧]𝜑))
1816, 17sbbid 2390 . . . . . . 7 (𝑣 = 𝑤 → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑢 / 𝑥][𝑤 / 𝑧]𝜑))
19 sbequ 2363 . . . . . . 7 (𝑢 = 𝑦 → ([𝑢 / 𝑥][𝑤 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
2018, 19sylan9bbr 732 . . . . . 6 ((𝑢 = 𝑦𝑣 = 𝑤) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
2115, 20bitr3d 268 . . . . 5 ((𝑢 = 𝑦𝑣 = 𝑤) → ([𝑤 / 𝑧][𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
2221ex 448 . . . 4 (𝑢 = 𝑦 → (𝑣 = 𝑤 → ([𝑤 / 𝑧][𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)))
2322exlimdv 1847 . . 3 (𝑢 = 𝑦 → (∃𝑣 𝑣 = 𝑤 → ([𝑤 / 𝑧][𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)))
2423exlimiv 1844 . 2 (∃𝑢 𝑢 = 𝑦 → (∃𝑣 𝑣 = 𝑤 → ([𝑤 / 𝑧][𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)))
251, 2, 24mp2 9 1 ([𝑤 / 𝑧][𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 194  wa 382  wal 1472  wex 1694  [wsb 1866
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1712  ax-4 1727  ax-5 1826  ax-6 1874  ax-7 1921  ax-10 2005  ax-11 2020  ax-12 2032  ax-13 2232
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1867
This theorem is referenced by:  sbco4lem  2452  sbco4  2453  2mo  2538  cnvopab  5439
  Copyright terms: Public domain W3C validator