Theorem axpowndlem2 10354

Description: Lemma for the Axiom of Power Sets with no distinct variable conditions. Revised to remove a redundant antecedent from the consequence. Usage of this theorem is discouraged because it depends on ax-13 2372. (Contributed by NM, 4-Jan-2002.) (Proof shortened by Mario Carneiro, 6-Dec-2016.) (Revised and shortened by Wolf Lammen, 9-Jun-2019.) (New usage is discouraged.)

Assertion

Ref	Expression
axpowndlem2	⊢ (¬ ∀𝑥 𝑥 = 𝑦 → (¬ ∀𝑥 𝑥 = 𝑧 → ∃𝑥∀𝑦(∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧) → 𝑦 ∈ 𝑥)))

Distinct variable group:   𝑦,𝑧

Proof of Theorem axpowndlem2

Dummy variable 𝑤 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		zfpow 5289	. . . 4 ⊢ ∃𝑤∀𝑦(∀𝑤(𝑤 ∈ 𝑦 → 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤)
2		19.8a 2174	. . . . . . . 8 ⊢ (𝑤 ∈ 𝑦 → ∃𝑧 𝑤 ∈ 𝑦)
3		sp 2176	. . . . . . . 8 ⊢ (∀𝑦 𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑧)
4	2, 3	imim12i 62	. . . . . . 7 ⊢ ((∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → (𝑤 ∈ 𝑦 → 𝑤 ∈ 𝑧))
5	4	alimi 1814	. . . . . 6 ⊢ (∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → ∀𝑤(𝑤 ∈ 𝑦 → 𝑤 ∈ 𝑧))
6	5	imim1i 63	. . . . 5 ⊢ ((∀𝑤(𝑤 ∈ 𝑦 → 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤) → (∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤))
7	6	alimi 1814	. . . 4 ⊢ (∀𝑦(∀𝑤(𝑤 ∈ 𝑦 → 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤) → ∀𝑦(∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤))
8	1, 7	eximii 1839	. . 3 ⊢ ∃𝑤∀𝑦(∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤)
9		nfnae 2434	. . . . 5 ⊢ Ⅎ𝑥 ¬ ∀𝑥 𝑥 = 𝑦
10		nfnae 2434	. . . . 5 ⊢ Ⅎ𝑥 ¬ ∀𝑥 𝑥 = 𝑧
11	9, 10	nfan 1902	. . . 4 ⊢ Ⅎ𝑥(¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧)
12		nfnae 2434	. . . . . 6 ⊢ Ⅎ𝑦 ¬ ∀𝑥 𝑥 = 𝑦
13		nfnae 2434	. . . . . 6 ⊢ Ⅎ𝑦 ¬ ∀𝑥 𝑥 = 𝑧
14	12, 13	nfan 1902	. . . . 5 ⊢ Ⅎ𝑦(¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧)
15		nfv 1917	. . . . . . 7 ⊢ Ⅎ𝑤(¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧)
16		nfnae 2434	. . . . . . . . . 10 ⊢ Ⅎ𝑧 ¬ ∀𝑥 𝑥 = 𝑦
17		nfcvd 2908	. . . . . . . . . . 11 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → Ⅎ𝑥𝑤)
18		nfcvf 2936	. . . . . . . . . . 11 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → Ⅎ𝑥𝑦)
19	17, 18	nfeld 2918	. . . . . . . . . 10 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → Ⅎ𝑥 𝑤 ∈ 𝑦)
20	16, 19	nfexd 2323	. . . . . . . . 9 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → Ⅎ𝑥∃𝑧 𝑤 ∈ 𝑦)
21	20	adantr 481	. . . . . . . 8 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → Ⅎ𝑥∃𝑧 𝑤 ∈ 𝑦)
22		nfcvd 2908	. . . . . . . . . . 11 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → Ⅎ𝑥𝑤)
23		nfcvf 2936	. . . . . . . . . . 11 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → Ⅎ𝑥𝑧)
24	22, 23	nfeld 2918	. . . . . . . . . 10 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → Ⅎ𝑥 𝑤 ∈ 𝑧)
25	13, 24	nfald 2322	. . . . . . . . 9 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → Ⅎ𝑥∀𝑦 𝑤 ∈ 𝑧)
26	25	adantl 482	. . . . . . . 8 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → Ⅎ𝑥∀𝑦 𝑤 ∈ 𝑧)
27	21, 26	nfimd 1897	. . . . . . 7 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → Ⅎ𝑥(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧))
28	15, 27	nfald 2322	. . . . . 6 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → Ⅎ𝑥∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧))
29	18, 17	nfeld 2918	. . . . . . 7 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → Ⅎ𝑥 𝑦 ∈ 𝑤)
30	29	adantr 481	. . . . . 6 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → Ⅎ𝑥 𝑦 ∈ 𝑤)
31	28, 30	nfimd 1897	. . . . 5 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → Ⅎ𝑥(∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤))
32	14, 31	nfald 2322	. . . 4 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → Ⅎ𝑥∀𝑦(∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤))
33		nfeqf2 2377	. . . . . . . . 9 ⊢ (¬ ∀𝑦 𝑦 = 𝑥 → Ⅎ𝑦 𝑤 = 𝑥)
34	33	naecoms 2429	. . . . . . . 8 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → Ⅎ𝑦 𝑤 = 𝑥)
35	34	adantr 481	. . . . . . 7 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → Ⅎ𝑦 𝑤 = 𝑥)
36	14, 35	nfan1 2193	. . . . . 6 ⊢ Ⅎ𝑦((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) ∧ 𝑤 = 𝑥)
37		nfnae 2434	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑧 ¬ ∀𝑥 𝑥 = 𝑧
38		nfeqf2 2377	. . . . . . . . . . . . . . 15 ⊢ (¬ ∀𝑧 𝑧 = 𝑥 → Ⅎ𝑧 𝑤 = 𝑥)
39	38	naecoms 2429	. . . . . . . . . . . . . 14 ⊢ (¬ ∀𝑥 𝑥 = 𝑧 → Ⅎ𝑧 𝑤 = 𝑥)
40	37, 39	nfan1 2193	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑧(¬ ∀𝑥 𝑥 = 𝑧 ∧ 𝑤 = 𝑥)
41		elequ1 2113	. . . . . . . . . . . . . 14 ⊢ (𝑤 = 𝑥 → (𝑤 ∈ 𝑦 ↔ 𝑥 ∈ 𝑦))
42	41	adantl 482	. . . . . . . . . . . . 13 ⊢ ((¬ ∀𝑥 𝑥 = 𝑧 ∧ 𝑤 = 𝑥) → (𝑤 ∈ 𝑦 ↔ 𝑥 ∈ 𝑦))
43	40, 42	exbid 2216	. . . . . . . . . . . 12 ⊢ ((¬ ∀𝑥 𝑥 = 𝑧 ∧ 𝑤 = 𝑥) → (∃𝑧 𝑤 ∈ 𝑦 ↔ ∃𝑧 𝑥 ∈ 𝑦))
44	43	adantll 711	. . . . . . . . . . 11 ⊢ (((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) ∧ 𝑤 = 𝑥) → (∃𝑧 𝑤 ∈ 𝑦 ↔ ∃𝑧 𝑥 ∈ 𝑦))
45	12, 34	nfan1 2193	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑦(¬ ∀𝑥 𝑥 = 𝑦 ∧ 𝑤 = 𝑥)
46		elequ1 2113	. . . . . . . . . . . . . 14 ⊢ (𝑤 = 𝑥 → (𝑤 ∈ 𝑧 ↔ 𝑥 ∈ 𝑧))
47	46	adantl 482	. . . . . . . . . . . . 13 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ 𝑤 = 𝑥) → (𝑤 ∈ 𝑧 ↔ 𝑥 ∈ 𝑧))
48	45, 47	albid 2215	. . . . . . . . . . . 12 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ 𝑤 = 𝑥) → (∀𝑦 𝑤 ∈ 𝑧 ↔ ∀𝑦 𝑥 ∈ 𝑧))
49	48	adantlr 712	. . . . . . . . . . 11 ⊢ (((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) ∧ 𝑤 = 𝑥) → (∀𝑦 𝑤 ∈ 𝑧 ↔ ∀𝑦 𝑥 ∈ 𝑧))
50	44, 49	imbi12d 345	. . . . . . . . . 10 ⊢ (((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) ∧ 𝑤 = 𝑥) → ((∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) ↔ (∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧)))
51	50	ex 413	. . . . . . . . 9 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → (𝑤 = 𝑥 → ((∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) ↔ (∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧))))
52	11, 27, 51	cbvald 2407	. . . . . . . 8 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → (∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) ↔ ∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧)))
53	52	adantr 481	. . . . . . 7 ⊢ (((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) ∧ 𝑤 = 𝑥) → (∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) ↔ ∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧)))
54		elequ2 2121	. . . . . . . 8 ⊢ (𝑤 = 𝑥 → (𝑦 ∈ 𝑤 ↔ 𝑦 ∈ 𝑥))
55	54	adantl 482	. . . . . . 7 ⊢ (((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) ∧ 𝑤 = 𝑥) → (𝑦 ∈ 𝑤 ↔ 𝑦 ∈ 𝑥))
56	53, 55	imbi12d 345	. . . . . 6 ⊢ (((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) ∧ 𝑤 = 𝑥) → ((∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤) ↔ (∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧) → 𝑦 ∈ 𝑥)))
57	36, 56	albid 2215	. . . . 5 ⊢ (((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) ∧ 𝑤 = 𝑥) → (∀𝑦(∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤) ↔ ∀𝑦(∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧) → 𝑦 ∈ 𝑥)))
58	57	ex 413	. . . 4 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → (𝑤 = 𝑥 → (∀𝑦(∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤) ↔ ∀𝑦(∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧) → 𝑦 ∈ 𝑥))))
59	11, 32, 58	cbvexd 2408	. . 3 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → (∃𝑤∀𝑦(∀𝑤(∃𝑧 𝑤 ∈ 𝑦 → ∀𝑦 𝑤 ∈ 𝑧) → 𝑦 ∈ 𝑤) ↔ ∃𝑥∀𝑦(∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧) → 𝑦 ∈ 𝑥)))
60	8, 59	mpbii 232	. 2 ⊢ ((¬ ∀𝑥 𝑥 = 𝑦 ∧ ¬ ∀𝑥 𝑥 = 𝑧) → ∃𝑥∀𝑦(∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧) → 𝑦 ∈ 𝑥))
61	60	ex 413	1 ⊢ (¬ ∀𝑥 𝑥 = 𝑦 → (¬ ∀𝑥 𝑥 = 𝑧 → ∃𝑥∀𝑦(∀𝑥(∃𝑧 𝑥 ∈ 𝑦 → ∀𝑦 𝑥 ∈ 𝑧) → 𝑦 ∈ 𝑥)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396  ∀wal 1537  ∃wex 1782  Ⅎwnf 1786

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-13 2372  ax-ext 2709  ax-pow 5288

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-tru 1542  df-ex 1783  df-nf 1787  df-cleq 2730  df-clel 2816  df-nfc 2889

This theorem is referenced by:  axpowndlem3  10355