Theorem sb9 2513

Description: Commutation of quantification and substitution variables. (Contributed by NM, 5-Aug-1993.) Allow a shortening of sb9i 2514. (Revised by Wolf Lammen, 15-Jun-2019.)

Assertion

Ref	Expression
sb9	⊢ (∀𝑥[𝑥 / 𝑦]𝜑 ↔ ∀𝑦[𝑦 / 𝑥]𝜑)

Proof of Theorem sb9

Step	Hyp	Ref	Expression
1		sbequ12a 2217	. . . . 5 ⊢ (𝑦 = 𝑥 → ([𝑥 / 𝑦]𝜑 ↔ [𝑦 / 𝑥]𝜑))
2	1	equcoms 2002	. . . 4 ⊢ (𝑥 = 𝑦 → ([𝑥 / 𝑦]𝜑 ↔ [𝑦 / 𝑥]𝜑))
3	2	sps 2146	. . 3 ⊢ (∀𝑥 𝑥 = 𝑦 → ([𝑥 / 𝑦]𝜑 ↔ [𝑦 / 𝑥]𝜑))
4	3	dral1 2416	. 2 ⊢ (∀𝑥 𝑥 = 𝑦 → (∀𝑥[𝑥 / 𝑦]𝜑 ↔ ∀𝑦[𝑦 / 𝑥]𝜑))
5		nfnae 2411	. . 3 ⊢ Ⅎ𝑥 ¬ ∀𝑥 𝑥 = 𝑦
6		nfnae 2411	. . 3 ⊢ Ⅎ𝑦 ¬ ∀𝑥 𝑥 = 𝑦
7		nfsb2 2474	. . . 4 ⊢ (¬ ∀𝑦 𝑦 = 𝑥 → Ⅎ𝑦[𝑥 / 𝑦]𝜑)
8	7	naecoms 2406	. . 3 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → Ⅎ𝑦[𝑥 / 𝑦]𝜑)
9		nfsb2 2474	. . 3 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → Ⅎ𝑥[𝑦 / 𝑥]𝜑)
10	2	a1i 11	. . 3 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → (𝑥 = 𝑦 → ([𝑥 / 𝑦]𝜑 ↔ [𝑦 / 𝑥]𝜑)))
11	5, 6, 8, 9, 10	cbv2 2377	. 2 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → (∀𝑥[𝑥 / 𝑦]𝜑 ↔ ∀𝑦[𝑦 / 𝑥]𝜑))
12	4, 11	pm2.61i 183	1 ⊢ (∀𝑥[𝑥 / 𝑦]𝜑 ↔ ∀𝑦[𝑦 / 𝑥]𝜑)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 207  ∀wal 1518  Ⅎwnf 1763  [wsb 2040

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1775  ax-4 1789  ax-5 1886  ax-6 1945  ax-7 1990  ax-10 2110  ax-11 2124  ax-12 2139  ax-13 2342

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-tru 1523  df-ex 1760  df-nf 1764  df-sb 2041

This theorem is referenced by:  sb9i  2514