Theorem nfabdwOLD 2930

Description: Obsolete version of nfabdw 2929 as of 23-Sep-2024. (Contributed by Mario Carneiro, 8-Oct-2016.) (Revised by Gino Giotto, 10-Jan-2024.) (Proof modification is discouraged.) (New usage is discouraged.)

Hypotheses

Ref	Expression
nfabdw.1	⊢ Ⅎ𝑦𝜑
nfabdw.2	⊢ (𝜑 → Ⅎ𝑥𝜓)

Assertion

Ref	Expression
nfabdwOLD	⊢ (𝜑 → Ⅎ𝑥{𝑦 ∣ 𝜓})

Distinct variable group:   𝑥,𝑦

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

Proof of Theorem nfabdwOLD

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		nfv 1918	. 2 ⊢ Ⅎ𝑧𝜑
2		df-clab 2716	. . 3 ⊢ (𝑧 ∈ {𝑦 ∣ 𝜓} ↔ [𝑧 / 𝑦]𝜓)
3		nfabdw.1	. . . . 5 ⊢ Ⅎ𝑦𝜑
4		nfabdw.2	. . . . 5 ⊢ (𝜑 → Ⅎ𝑥𝜓)
5	3, 4	alrimi 2209	. . . 4 ⊢ (𝜑 → ∀𝑦Ⅎ𝑥𝜓)
6		nfa1 2150	. . . . . . . . 9 ⊢ Ⅎ𝑦∀𝑦Ⅎ𝑥𝜓
7		sb6 2089	. . . . . . . . . . . 12 ⊢ ([𝑧 / 𝑦]𝜓 ↔ ∀𝑦(𝑦 = 𝑧 → 𝜓))
8	7	a1i 11	. . . . . . . . . . 11 ⊢ (∀𝑦Ⅎ𝑥𝜓 → ([𝑧 / 𝑦]𝜓 ↔ ∀𝑦(𝑦 = 𝑧 → 𝜓)))
9	7	biimpri 227	. . . . . . . . . . . 12 ⊢ (∀𝑦(𝑦 = 𝑧 → 𝜓) → [𝑧 / 𝑦]𝜓)
10	9	axc4i 2320	. . . . . . . . . . 11 ⊢ (∀𝑦(𝑦 = 𝑧 → 𝜓) → ∀𝑦[𝑧 / 𝑦]𝜓)
11	8, 10	syl6bi 252	. . . . . . . . . 10 ⊢ (∀𝑦Ⅎ𝑥𝜓 → ([𝑧 / 𝑦]𝜓 → ∀𝑦[𝑧 / 𝑦]𝜓))
12	6, 11	nf5d 2284	. . . . . . . . 9 ⊢ (∀𝑦Ⅎ𝑥𝜓 → Ⅎ𝑦[𝑧 / 𝑦]𝜓)
13	6, 12	nfim1 2195	. . . . . . . 8 ⊢ Ⅎ𝑦(∀𝑦Ⅎ𝑥𝜓 → [𝑧 / 𝑦]𝜓)
14		sbequ12 2247	. . . . . . . . 9 ⊢ (𝑦 = 𝑧 → (𝜓 ↔ [𝑧 / 𝑦]𝜓))
15	14	imbi2d 340	. . . . . . . 8 ⊢ (𝑦 = 𝑧 → ((∀𝑦Ⅎ𝑥𝜓 → 𝜓) ↔ (∀𝑦Ⅎ𝑥𝜓 → [𝑧 / 𝑦]𝜓)))
16	13, 15	equsalv 2262	. . . . . . 7 ⊢ (∀𝑦(𝑦 = 𝑧 → (∀𝑦Ⅎ𝑥𝜓 → 𝜓)) ↔ (∀𝑦Ⅎ𝑥𝜓 → [𝑧 / 𝑦]𝜓))
17	16	bicomi 223	. . . . . 6 ⊢ ((∀𝑦Ⅎ𝑥𝜓 → [𝑧 / 𝑦]𝜓) ↔ ∀𝑦(𝑦 = 𝑧 → (∀𝑦Ⅎ𝑥𝜓 → 𝜓)))
18		nfv 1918	. . . . . . . 8 ⊢ Ⅎ𝑥 𝑦 = 𝑧
19		nfnf1 2153	. . . . . . . . . 10 ⊢ Ⅎ𝑥Ⅎ𝑥𝜓
20	19	nfal 2321	. . . . . . . . 9 ⊢ Ⅎ𝑥∀𝑦Ⅎ𝑥𝜓
21		sp 2178	. . . . . . . . 9 ⊢ (∀𝑦Ⅎ𝑥𝜓 → Ⅎ𝑥𝜓)
22	20, 21	nfim1 2195	. . . . . . . 8 ⊢ Ⅎ𝑥(∀𝑦Ⅎ𝑥𝜓 → 𝜓)
23	18, 22	nfim 1900	. . . . . . 7 ⊢ Ⅎ𝑥(𝑦 = 𝑧 → (∀𝑦Ⅎ𝑥𝜓 → 𝜓))
24	23	nfal 2321	. . . . . 6 ⊢ Ⅎ𝑥∀𝑦(𝑦 = 𝑧 → (∀𝑦Ⅎ𝑥𝜓 → 𝜓))
25	17, 24	nfxfr 1856	. . . . 5 ⊢ Ⅎ𝑥(∀𝑦Ⅎ𝑥𝜓 → [𝑧 / 𝑦]𝜓)
26		pm5.5 361	. . . . . 6 ⊢ (∀𝑦Ⅎ𝑥𝜓 → ((∀𝑦Ⅎ𝑥𝜓 → [𝑧 / 𝑦]𝜓) ↔ [𝑧 / 𝑦]𝜓))
27	20, 26	nfbidf 2220	. . . . 5 ⊢ (∀𝑦Ⅎ𝑥𝜓 → (Ⅎ𝑥(∀𝑦Ⅎ𝑥𝜓 → [𝑧 / 𝑦]𝜓) ↔ Ⅎ𝑥[𝑧 / 𝑦]𝜓))
28	25, 27	mpbii 232	. . . 4 ⊢ (∀𝑦Ⅎ𝑥𝜓 → Ⅎ𝑥[𝑧 / 𝑦]𝜓)
29	5, 28	syl 17	. . 3 ⊢ (𝜑 → Ⅎ𝑥[𝑧 / 𝑦]𝜓)
30	2, 29	nfxfrd 1857	. 2 ⊢ (𝜑 → Ⅎ𝑥 𝑧 ∈ {𝑦 ∣ 𝜓})
31	1, 30	nfcd 2894	1 ⊢ (𝜑 → Ⅎ𝑥{𝑦 ∣ 𝜓})

Syntax hints:   → wi 4   ↔ wb 205  ∀wal 1537  Ⅎwnf 1787  [wsb 2068   ∈ wcel 2108  {cab 2715  Ⅎwnfc 2886

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

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-ex 1784  df-nf 1788  df-sb 2069  df-clab 2716  df-nfc 2888

This theorem is referenced by: (None)