Theorem wl-sbcom2d-lem1 34242

Description: Lemma used to prove wl-sbcom2d 34244. (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

Step	Hyp	Ref	Expression
1		nfna1 2089	. . . . . 6 ⊢ Ⅎ𝑥 ¬ ∀𝑥 𝑥 = 𝑤
2		nfeqf2 2306	. . . . . 6 ⊢ (¬ ∀𝑥 𝑥 = 𝑤 → Ⅎ𝑥 𝑣 = 𝑤)
3	1, 2	nfan1 2129	. . . . 5 ⊢ Ⅎ𝑥(¬ ∀𝑥 𝑥 = 𝑤 ∧ 𝑣 = 𝑤)
4		sbequ 2035	. . . . . 6 ⊢ (𝑣 = 𝑤 → ([𝑣 / 𝑧]𝜑 ↔ [𝑤 / 𝑧]𝜑))
5	4	adantl 474	. . . . 5 ⊢ ((¬ ∀𝑥 𝑥 = 𝑤 ∧ 𝑣 = 𝑤) → ([𝑣 / 𝑧]𝜑 ↔ [𝑤 / 𝑧]𝜑))
6	3, 5	sbbid 2173	. . . 4 ⊢ ((¬ ∀𝑥 𝑥 = 𝑤 ∧ 𝑣 = 𝑤) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑢 / 𝑥][𝑤 / 𝑧]𝜑))
7	6	ancoms 451	. . 3 ⊢ ((𝑣 = 𝑤 ∧ ¬ ∀𝑥 𝑥 = 𝑤) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑢 / 𝑥][𝑤 / 𝑧]𝜑))
8		sbequ 2035	. . 3 ⊢ (𝑢 = 𝑦 → ([𝑢 / 𝑥][𝑤 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
9	7, 8	sylan9bbr 503	. 2 ⊢ ((𝑢 = 𝑦 ∧ (𝑣 = 𝑤 ∧ ¬ ∀𝑥 𝑥 = 𝑤)) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
10	9	expr 449	1 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑤) → (¬ ∀𝑥 𝑥 = 𝑤 → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 198   ∧ wa 387  ∀wal 1505  [wsb 2015

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1965  ax-10 2079  ax-12 2106  ax-13 2301

This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-ex 1743  df-nf 1747  df-sb 2016

This theorem is referenced by:  wl-sbcom2d  34244