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

Step	Hyp	Ref	Expression
1		nfna1 2027	. . . . . 6 ⊢ Ⅎ𝑥 ¬ ∀𝑥 𝑥 = 𝑤
2		nfeqf2 2295	. . . . . 6 ⊢ (¬ ∀𝑥 𝑥 = 𝑤 → Ⅎ𝑥 𝑣 = 𝑤)
3	1, 2	nfan1 2066	. . . . 5 ⊢ Ⅎ𝑥(¬ ∀𝑥 𝑥 = 𝑤 ∧ 𝑣 = 𝑤)
4		sbequ 2374	. . . . . 6 ⊢ (𝑣 = 𝑤 → ([𝑣 / 𝑧]𝜑 ↔ [𝑤 / 𝑧]𝜑))
5	4	adantl 482	. . . . 5 ⊢ ((¬ ∀𝑥 𝑥 = 𝑤 ∧ 𝑣 = 𝑤) → ([𝑣 / 𝑧]𝜑 ↔ [𝑤 / 𝑧]𝜑))
6	3, 5	sbbid 2401	. . . 4 ⊢ ((¬ ∀𝑥 𝑥 = 𝑤 ∧ 𝑣 = 𝑤) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑢 / 𝑥][𝑤 / 𝑧]𝜑))
7	6	ancoms 469	. . 3 ⊢ ((𝑣 = 𝑤 ∧ ¬ ∀𝑥 𝑥 = 𝑤) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑢 / 𝑥][𝑤 / 𝑧]𝜑))
8		sbequ 2374	. . 3 ⊢ (𝑢 = 𝑦 → ([𝑢 / 𝑥][𝑤 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
9	7, 8	sylan9bbr 736	. 2 ⊢ ((𝑢 = 𝑦 ∧ (𝑣 = 𝑤 ∧ ¬ ∀𝑥 𝑥 = 𝑤)) → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑))
10	9	expr 642	1 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑤) → (¬ ∀𝑥 𝑥 = 𝑤 → ([𝑢 / 𝑥][𝑣 / 𝑧]𝜑 ↔ [𝑦 / 𝑥][𝑤 / 𝑧]𝜑)))

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