Theorem sbal1 2533

Description: Check out sbal 2161 for a version not dependent on ax-13 2372. A theorem used in elimination of disjoint variable restriction on 𝑥 and 𝑧 by replacing it with a distinctor ¬ ∀𝑥𝑥 = 𝑧. (Contributed by NM, 15-May-1993.) (Proof shortened by Wolf Lammen, 3-Oct-2018.) (New usage is discouraged.) (Proof modification is discouraged.)

Assertion

Ref	Expression
sbal1	⊢ (¬ ∀𝑥 𝑥 = 𝑧 → ([𝑧 / 𝑦]∀𝑥𝜑 ↔ ∀𝑥[𝑧 / 𝑦]𝜑))

Distinct variable group:   𝑥,𝑦

Allowed substitution hints:   𝜑(𝑥,𝑦,𝑧)

Proof of Theorem sbal1

Step	Hyp	Ref	Expression
1		sb4b 2475	. . . . 5 ⊢ (¬ ∀𝑦 𝑦 = 𝑧 → ([𝑧 / 𝑦]∀𝑥𝜑 ↔ ∀𝑦(𝑦 = 𝑧 → ∀𝑥𝜑)))
2		nfnae 2434	. . . . . 6 ⊢ Ⅎ𝑦 ¬ ∀𝑥 𝑥 = 𝑧
3		nfeqf2 2377	. . . . . . 7 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → Ⅎ𝑥 𝑦 = 𝑧)
4		19.21t 2202	. . . . . . . 8 ⊢ (Ⅎ𝑥 𝑦 = 𝑧 → (∀𝑥(𝑦 = 𝑧 → 𝜑) ↔ (𝑦 = 𝑧 → ∀𝑥𝜑)))
5	4	bicomd 222	. . . . . . 7 ⊢ (Ⅎ𝑥 𝑦 = 𝑧 → ((𝑦 = 𝑧 → ∀𝑥𝜑) ↔ ∀𝑥(𝑦 = 𝑧 → 𝜑)))
6	3, 5	syl 17	. . . . . 6 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → ((𝑦 = 𝑧 → ∀𝑥𝜑) ↔ ∀𝑥(𝑦 = 𝑧 → 𝜑)))
7	2, 6	albid 2218	. . . . 5 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → (∀𝑦(𝑦 = 𝑧 → ∀𝑥𝜑) ↔ ∀𝑦∀𝑥(𝑦 = 𝑧 → 𝜑)))
8	1, 7	sylan9bbr 510	. . . 4 ⊢ ((¬ ∀𝑥 𝑥 = 𝑧 ∧ ¬ ∀𝑦 𝑦 = 𝑧) → ([𝑧 / 𝑦]∀𝑥𝜑 ↔ ∀𝑦∀𝑥(𝑦 = 𝑧 → 𝜑)))
9		nfnae 2434	. . . . . . 7 ⊢ Ⅎ𝑥 ¬ ∀𝑦 𝑦 = 𝑧
10		sb4b 2475	. . . . . . 7 ⊢ (¬ ∀𝑦 𝑦 = 𝑧 → ([𝑧 / 𝑦]𝜑 ↔ ∀𝑦(𝑦 = 𝑧 → 𝜑)))
11	9, 10	albid 2218	. . . . . 6 ⊢ (¬ ∀𝑦 𝑦 = 𝑧 → (∀𝑥[𝑧 / 𝑦]𝜑 ↔ ∀𝑥∀𝑦(𝑦 = 𝑧 → 𝜑)))
12		alcom 2158	. . . . . 6 ⊢ (∀𝑥∀𝑦(𝑦 = 𝑧 → 𝜑) ↔ ∀𝑦∀𝑥(𝑦 = 𝑧 → 𝜑))
13	11, 12	bitrdi 286	. . . . 5 ⊢ (¬ ∀𝑦 𝑦 = 𝑧 → (∀𝑥[𝑧 / 𝑦]𝜑 ↔ ∀𝑦∀𝑥(𝑦 = 𝑧 → 𝜑)))
14	13	adantl 481	. . . 4 ⊢ ((¬ ∀𝑥 𝑥 = 𝑧 ∧ ¬ ∀𝑦 𝑦 = 𝑧) → (∀𝑥[𝑧 / 𝑦]𝜑 ↔ ∀𝑦∀𝑥(𝑦 = 𝑧 → 𝜑)))
15	8, 14	bitr4d 281	. . 3 ⊢ ((¬ ∀𝑥 𝑥 = 𝑧 ∧ ¬ ∀𝑦 𝑦 = 𝑧) → ([𝑧 / 𝑦]∀𝑥𝜑 ↔ ∀𝑥[𝑧 / 𝑦]𝜑))
16	15	ex 412	. 2 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → (¬ ∀𝑦 𝑦 = 𝑧 → ([𝑧 / 𝑦]∀𝑥𝜑 ↔ ∀𝑥[𝑧 / 𝑦]𝜑)))
17		sbequ12 2247	. . . 4 ⊢ (𝑦 = 𝑧 → (∀𝑥𝜑 ↔ [𝑧 / 𝑦]∀𝑥𝜑))
18	17	sps 2180	. . 3 ⊢ (∀𝑦 𝑦 = 𝑧 → (∀𝑥𝜑 ↔ [𝑧 / 𝑦]∀𝑥𝜑))
19		sbequ12 2247	. . . . 5 ⊢ (𝑦 = 𝑧 → (𝜑 ↔ [𝑧 / 𝑦]𝜑))
20	19	sps 2180	. . . 4 ⊢ (∀𝑦 𝑦 = 𝑧 → (𝜑 ↔ [𝑧 / 𝑦]𝜑))
21	20	dral2 2438	. . 3 ⊢ (∀𝑦 𝑦 = 𝑧 → (∀𝑥𝜑 ↔ ∀𝑥[𝑧 / 𝑦]𝜑))
22	18, 21	bitr3d 280	. 2 ⊢ (∀𝑦 𝑦 = 𝑧 → ([𝑧 / 𝑦]∀𝑥𝜑 ↔ ∀𝑥[𝑧 / 𝑦]𝜑))
23	16, 22	pm2.61d2 181	1 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → ([𝑧 / 𝑦]∀𝑥𝜑 ↔ ∀𝑥[𝑧 / 𝑦]𝜑))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 395  ∀wal 1537  Ⅎwnf 1787  [wsb 2068

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-10 2139  ax-11 2156  ax-12 2173  ax-13 2372

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-tru 1542  df-ex 1784  df-nf 1788  df-sb 2069

This theorem is referenced by: (None)