Theorem card2inf 9244

Description: The alternate definition of the cardinal of a set given in cardval2 9680 has the curious property that for non-numerable sets (for which ndmfv 6786 yields ∅), it still evaluates to a nonempty set, and indeed it contains ω. (Contributed by Mario Carneiro, 15-Jan-2013.) (Revised by Mario Carneiro, 27-Apr-2015.)

Hypothesis

Ref	Expression
card2inf.1	⊢ 𝐴 ∈ V

Assertion

Ref	Expression
card2inf	⊢ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 → ω ⊆ {𝑥 ∈ On ∣ 𝑥 ≺ 𝐴})

Distinct variable group:   𝑥,𝐴,𝑦

Proof of Theorem card2inf

Dummy variable 𝑛 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		breq1 5073	. . . . 5 ⊢ (𝑥 = ∅ → (𝑥 ≺ 𝐴 ↔ ∅ ≺ 𝐴))
2		breq1 5073	. . . . 5 ⊢ (𝑥 = 𝑛 → (𝑥 ≺ 𝐴 ↔ 𝑛 ≺ 𝐴))
3		breq1 5073	. . . . 5 ⊢ (𝑥 = suc 𝑛 → (𝑥 ≺ 𝐴 ↔ suc 𝑛 ≺ 𝐴))
4		0elon 6304	. . . . . . . 8 ⊢ ∅ ∈ On
5		breq1 5073	. . . . . . . . 9 ⊢ (𝑦 = ∅ → (𝑦 ≈ 𝐴 ↔ ∅ ≈ 𝐴))
6	5	rspcev 3552	. . . . . . . 8 ⊢ ((∅ ∈ On ∧ ∅ ≈ 𝐴) → ∃𝑦 ∈ On 𝑦 ≈ 𝐴)
7	4, 6	mpan 686	. . . . . . 7 ⊢ (∅ ≈ 𝐴 → ∃𝑦 ∈ On 𝑦 ≈ 𝐴)
8	7	con3i 154	. . . . . 6 ⊢ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 → ¬ ∅ ≈ 𝐴)
9		card2inf.1	. . . . . . . 8 ⊢ 𝐴 ∈ V
10	9	0dom 8843	. . . . . . 7 ⊢ ∅ ≼ 𝐴
11		brsdom 8718	. . . . . . 7 ⊢ (∅ ≺ 𝐴 ↔ (∅ ≼ 𝐴 ∧ ¬ ∅ ≈ 𝐴))
12	10, 11	mpbiran 705	. . . . . 6 ⊢ (∅ ≺ 𝐴 ↔ ¬ ∅ ≈ 𝐴)
13	8, 12	sylibr 233	. . . . 5 ⊢ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 → ∅ ≺ 𝐴)
14		sucdom2 8822	. . . . . . . 8 ⊢ (𝑛 ≺ 𝐴 → suc 𝑛 ≼ 𝐴)
15	14	ad2antll 725	. . . . . . 7 ⊢ ((𝑛 ∈ ω ∧ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 ∧ 𝑛 ≺ 𝐴)) → suc 𝑛 ≼ 𝐴)
16		nnon 7693	. . . . . . . . . 10 ⊢ (𝑛 ∈ ω → 𝑛 ∈ On)
17		suceloni 7635	. . . . . . . . . 10 ⊢ (𝑛 ∈ On → suc 𝑛 ∈ On)
18		breq1 5073	. . . . . . . . . . . 12 ⊢ (𝑦 = suc 𝑛 → (𝑦 ≈ 𝐴 ↔ suc 𝑛 ≈ 𝐴))
19	18	rspcev 3552	. . . . . . . . . . 11 ⊢ ((suc 𝑛 ∈ On ∧ suc 𝑛 ≈ 𝐴) → ∃𝑦 ∈ On 𝑦 ≈ 𝐴)
20	19	ex 412	. . . . . . . . . 10 ⊢ (suc 𝑛 ∈ On → (suc 𝑛 ≈ 𝐴 → ∃𝑦 ∈ On 𝑦 ≈ 𝐴))
21	16, 17, 20	3syl 18	. . . . . . . . 9 ⊢ (𝑛 ∈ ω → (suc 𝑛 ≈ 𝐴 → ∃𝑦 ∈ On 𝑦 ≈ 𝐴))
22	21	con3dimp 408	. . . . . . . 8 ⊢ ((𝑛 ∈ ω ∧ ¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴) → ¬ suc 𝑛 ≈ 𝐴)
23	22	adantrr 713	. . . . . . 7 ⊢ ((𝑛 ∈ ω ∧ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 ∧ 𝑛 ≺ 𝐴)) → ¬ suc 𝑛 ≈ 𝐴)
24		brsdom 8718	. . . . . . 7 ⊢ (suc 𝑛 ≺ 𝐴 ↔ (suc 𝑛 ≼ 𝐴 ∧ ¬ suc 𝑛 ≈ 𝐴))
25	15, 23, 24	sylanbrc 582	. . . . . 6 ⊢ ((𝑛 ∈ ω ∧ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 ∧ 𝑛 ≺ 𝐴)) → suc 𝑛 ≺ 𝐴)
26	25	exp32 420	. . . . 5 ⊢ (𝑛 ∈ ω → (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 → (𝑛 ≺ 𝐴 → suc 𝑛 ≺ 𝐴)))
27	1, 2, 3, 13, 26	finds2 7721	. . . 4 ⊢ (𝑥 ∈ ω → (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 → 𝑥 ≺ 𝐴))
28	27	com12 32	. . 3 ⊢ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 → (𝑥 ∈ ω → 𝑥 ≺ 𝐴))
29	28	ralrimiv 3106	. 2 ⊢ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 → ∀𝑥 ∈ ω 𝑥 ≺ 𝐴)
30		omsson 7691	. . 3 ⊢ ω ⊆ On
31		ssrab 4002	. . 3 ⊢ (ω ⊆ {𝑥 ∈ On ∣ 𝑥 ≺ 𝐴} ↔ (ω ⊆ On ∧ ∀𝑥 ∈ ω 𝑥 ≺ 𝐴))
32	30, 31	mpbiran 705	. 2 ⊢ (ω ⊆ {𝑥 ∈ On ∣ 𝑥 ≺ 𝐴} ↔ ∀𝑥 ∈ ω 𝑥 ≺ 𝐴)
33	29, 32	sylibr 233	1 ⊢ (¬ ∃𝑦 ∈ On 𝑦 ≈ 𝐴 → ω ⊆ {𝑥 ∈ On ∣ 𝑥 ≺ 𝐴})

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∈ wcel 2108  ∀wral 3063  ∃wrex 3064  {crab 3067  Vcvv 3422   ⊆ wss 3883  ∅c0 4253   class class class wbr 5070  Oncon0 6251  suc csuc 6253  ωcom 7687   ≈ cen 8688   ≼ cdom 8689   ≺ csdm 8690

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-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-rab 3072  df-v 3424  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-br 5071  df-opab 5133  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-om 7688  df-en 8692  df-dom 8693  df-sdom 8694

This theorem is referenced by: (None)