Theorem bj-nnelirr 16723

Description: A natural number does not belong to itself. Version of elirr 4663 for natural numbers, which does not require ax-setind 4659. (Contributed by BJ, 24-Nov-2019.) (Proof modification is discouraged.)

Assertion

Ref	Expression
bj-nnelirr	⊢ (𝐴 ∈ ω → ¬ 𝐴 ∈ 𝐴)

Proof of Theorem bj-nnelirr

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		noel 3512	. 2 ⊢ ¬ ∅ ∈ ∅
2		df-suc 4492	. . . . . 6 ⊢ suc 𝑦 = (𝑦 ∪ {𝑦})
3	2	eleq2i 2299	. . . . 5 ⊢ (suc 𝑦 ∈ suc 𝑦 ↔ suc 𝑦 ∈ (𝑦 ∪ {𝑦}))
4		elun 3360	. . . . . 6 ⊢ (suc 𝑦 ∈ (𝑦 ∪ {𝑦}) ↔ (suc 𝑦 ∈ 𝑦 ∨ suc 𝑦 ∈ {𝑦}))
5		bj-nntrans 16721	. . . . . . . 8 ⊢ (𝑦 ∈ ω → (suc 𝑦 ∈ 𝑦 → suc 𝑦 ⊆ 𝑦))
6		sucssel 4545	. . . . . . . 8 ⊢ (𝑦 ∈ ω → (suc 𝑦 ⊆ 𝑦 → 𝑦 ∈ 𝑦))
7	5, 6	syld 45	. . . . . . 7 ⊢ (𝑦 ∈ ω → (suc 𝑦 ∈ 𝑦 → 𝑦 ∈ 𝑦))
8		vex 2816	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
9	8	sucid 4538	. . . . . . . . 9 ⊢ 𝑦 ∈ suc 𝑦
10		elsni 3707	. . . . . . . . 9 ⊢ (suc 𝑦 ∈ {𝑦} → suc 𝑦 = 𝑦)
11	9, 10	eleqtrid 2321	. . . . . . . 8 ⊢ (suc 𝑦 ∈ {𝑦} → 𝑦 ∈ 𝑦)
12	11	a1i 9	. . . . . . 7 ⊢ (𝑦 ∈ ω → (suc 𝑦 ∈ {𝑦} → 𝑦 ∈ 𝑦))
13	7, 12	jaod 725	. . . . . 6 ⊢ (𝑦 ∈ ω → ((suc 𝑦 ∈ 𝑦 ∨ suc 𝑦 ∈ {𝑦}) → 𝑦 ∈ 𝑦))
14	4, 13	biimtrid 152	. . . . 5 ⊢ (𝑦 ∈ ω → (suc 𝑦 ∈ (𝑦 ∪ {𝑦}) → 𝑦 ∈ 𝑦))
15	3, 14	biimtrid 152	. . . 4 ⊢ (𝑦 ∈ ω → (suc 𝑦 ∈ suc 𝑦 → 𝑦 ∈ 𝑦))
16	15	con3d 636	. . 3 ⊢ (𝑦 ∈ ω → (¬ 𝑦 ∈ 𝑦 → ¬ suc 𝑦 ∈ suc 𝑦))
17	16	rgen 2595	. 2 ⊢ ∀𝑦 ∈ ω (¬ 𝑦 ∈ 𝑦 → ¬ suc 𝑦 ∈ suc 𝑦)
18		ax-bdel 16591	. . . 4 ⊢ BOUNDED 𝑥 ∈ 𝑥
19	18	ax-bdn 16587	. . 3 ⊢ BOUNDED ¬ 𝑥 ∈ 𝑥
20		nfv 1577	. . 3 ⊢ Ⅎ𝑥 ¬ ∅ ∈ ∅
21		nfv 1577	. . 3 ⊢ Ⅎ𝑥 ¬ 𝑦 ∈ 𝑦
22		nfv 1577	. . 3 ⊢ Ⅎ𝑥 ¬ suc 𝑦 ∈ suc 𝑦
23		eleq1 2295	. . . . . 6 ⊢ (𝑥 = ∅ → (𝑥 ∈ 𝑥 ↔ ∅ ∈ 𝑥))
24		eleq2 2296	. . . . . 6 ⊢ (𝑥 = ∅ → (∅ ∈ 𝑥 ↔ ∅ ∈ ∅))
25	23, 24	bitrd 188	. . . . 5 ⊢ (𝑥 = ∅ → (𝑥 ∈ 𝑥 ↔ ∅ ∈ ∅))
26	25	notbid 673	. . . 4 ⊢ (𝑥 = ∅ → (¬ 𝑥 ∈ 𝑥 ↔ ¬ ∅ ∈ ∅))
27	26	biimprd 158	. . 3 ⊢ (𝑥 = ∅ → (¬ ∅ ∈ ∅ → ¬ 𝑥 ∈ 𝑥))
28		elequ1 2207	. . . . . 6 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ 𝑥 ↔ 𝑦 ∈ 𝑥))
29		elequ2 2208	. . . . . 6 ⊢ (𝑥 = 𝑦 → (𝑦 ∈ 𝑥 ↔ 𝑦 ∈ 𝑦))
30	28, 29	bitrd 188	. . . . 5 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ 𝑥 ↔ 𝑦 ∈ 𝑦))
31	30	notbid 673	. . . 4 ⊢ (𝑥 = 𝑦 → (¬ 𝑥 ∈ 𝑥 ↔ ¬ 𝑦 ∈ 𝑦))
32	31	biimpd 144	. . 3 ⊢ (𝑥 = 𝑦 → (¬ 𝑥 ∈ 𝑥 → ¬ 𝑦 ∈ 𝑦))
33		eleq1 2295	. . . . . 6 ⊢ (𝑥 = suc 𝑦 → (𝑥 ∈ 𝑥 ↔ suc 𝑦 ∈ 𝑥))
34		eleq2 2296	. . . . . 6 ⊢ (𝑥 = suc 𝑦 → (suc 𝑦 ∈ 𝑥 ↔ suc 𝑦 ∈ suc 𝑦))
35	33, 34	bitrd 188	. . . . 5 ⊢ (𝑥 = suc 𝑦 → (𝑥 ∈ 𝑥 ↔ suc 𝑦 ∈ suc 𝑦))
36	35	notbid 673	. . . 4 ⊢ (𝑥 = suc 𝑦 → (¬ 𝑥 ∈ 𝑥 ↔ ¬ suc 𝑦 ∈ suc 𝑦))
37	36	biimprd 158	. . 3 ⊢ (𝑥 = suc 𝑦 → (¬ suc 𝑦 ∈ suc 𝑦 → ¬ 𝑥 ∈ 𝑥))
38		nfcv 2384	. . 3 ⊢ Ⅎ𝑥𝐴
39		nfv 1577	. . 3 ⊢ Ⅎ𝑥 ¬ 𝐴 ∈ 𝐴
40		eleq1 2295	. . . . . 6 ⊢ (𝑥 = 𝐴 → (𝑥 ∈ 𝑥 ↔ 𝐴 ∈ 𝑥))
41		eleq2 2296	. . . . . 6 ⊢ (𝑥 = 𝐴 → (𝐴 ∈ 𝑥 ↔ 𝐴 ∈ 𝐴))
42	40, 41	bitrd 188	. . . . 5 ⊢ (𝑥 = 𝐴 → (𝑥 ∈ 𝑥 ↔ 𝐴 ∈ 𝐴))
43	42	notbid 673	. . . 4 ⊢ (𝑥 = 𝐴 → (¬ 𝑥 ∈ 𝑥 ↔ ¬ 𝐴 ∈ 𝐴))
44	43	biimpd 144	. . 3 ⊢ (𝑥 = 𝐴 → (¬ 𝑥 ∈ 𝑥 → ¬ 𝐴 ∈ 𝐴))
45	19, 20, 21, 22, 27, 32, 37, 38, 39, 44	bj-bdfindisg 16718	. 2 ⊢ ((¬ ∅ ∈ ∅ ∧ ∀𝑦 ∈ ω (¬ 𝑦 ∈ 𝑦 → ¬ suc 𝑦 ∈ suc 𝑦)) → (𝐴 ∈ ω → ¬ 𝐴 ∈ 𝐴))
46	1, 17, 45	mp2an 426	1 ⊢ (𝐴 ∈ ω → ¬ 𝐴 ∈ 𝐴)

Syntax hints:  ¬ wn 3   → wi 4   ∨ wo 716   = wceq 1398   ∈ wcel 2203  ∀wral 2520   ∪ cun 3209   ⊆ wss 3211  ∅c0 3508  {csn 3689  suc csuc 4486  ωcom 4712

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2205  ax-14 2206  ax-ext 2214  ax-nul 4236  ax-pr 4322  ax-un 4554  ax-bd0 16583  ax-bdor 16586  ax-bdn 16587  ax-bdal 16588  ax-bdex 16589  ax-bdeq 16590  ax-bdel 16591  ax-bdsb 16592  ax-bdsep 16654  ax-infvn 16711

This theorem depends on definitions:  df-bi 117  df-tru 1401  df-nf 1510  df-sb 1812  df-clab 2219  df-cleq 2225  df-clel 2228  df-nfc 2373  df-ral 2525  df-rex 2526  df-rab 2529  df-v 2815  df-dif 3213  df-un 3215  df-in 3217  df-ss 3224  df-nul 3509  df-sn 3695  df-pr 3696  df-uni 3915  df-int 3950  df-suc 4492  df-iom 4713  df-bdc 16611  df-bj-ind 16697

This theorem is referenced by:  bj-nnen2lp  16724