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

Theorem wl-sbcom2d-lem1 33313
Description: Lemma used to prove wl-sbcom2d 33315. (Contributed by Wolf Lammen, 10-Aug-2019.) (New usage is discouraged.)
Assertion
Ref Expression
wl-sbcom2d-lem1 ((𝑢 = 𝑦𝑣 = 𝑤) → (¬ ∀𝑥 𝑥 = 𝑤 → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)))
Distinct variable groups:   𝑣,𝑢,𝑥   𝑦,𝑢,𝑣   𝑤,𝑢,𝑣   𝑧,𝑢,𝑣   𝜑,𝑢,𝑣
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑧,𝑤)

Proof of Theorem wl-sbcom2d-lem1
StepHypRef Expression
1 nfna1 2027 . . . . . 6 𝑥 ¬ ∀𝑥 𝑥 = 𝑤
2 nfeqf2 2295 . . . . . 6 (¬ ∀𝑥 𝑥 = 𝑤 → Ⅎ𝑥 𝑣 = 𝑤)
31, 2nfan1 2066 . . . . 5 𝑥(¬ ∀𝑥 𝑥 = 𝑤𝑣 = 𝑤)
4 sbequ 2374 . . . . . 6 (𝑣 = 𝑤 → ([𝑣 / 𝑧]𝜑 ↔ [𝑤 / 𝑧]𝜑))
54adantl 482 . . . . 5 ((¬ ∀𝑥 𝑥 = 𝑤𝑣 = 𝑤) → ([𝑣 / 𝑧]𝜑 ↔ [𝑤 / 𝑧]𝜑))
63, 5sbbid 2401 . . . 4 ((¬ ∀𝑥 𝑥 = 𝑤𝑣 = 𝑤) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑢 / 𝑥][𝑤 / 𝑧]𝜑))
76ancoms 469 . . 3 ((𝑣 = 𝑤 ∧ ¬ ∀𝑥 𝑥 = 𝑤) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑢 / 𝑥][𝑤 / 𝑧]𝜑))
8 sbequ 2374 . . 3 (𝑢 = 𝑦 → ([𝑢 / 𝑥][𝑤 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
97, 8sylan9bbr 736 . 2 ((𝑢 = 𝑦 ∧ (𝑣 = 𝑤 ∧ ¬ ∀𝑥 𝑥 = 𝑤)) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
109expr 642 1 ((𝑢 = 𝑦𝑣 = 𝑤) → (¬ ∀𝑥 𝑥 = 𝑤 → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 384  wal 1479  [wsb 1878
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-10 2017  ax-12 2045  ax-13 2244
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-ex 1703  df-nf 1708  df-sb 1879
This theorem is referenced by:  wl-sbcom2d  33315
  Copyright terms: Public domain W3C validator