Metamath Proof Explorer


Theorem karden

Description: If we allow the Axiom of Regularity, we can avoid the Axiom of Choice by defining the cardinal number of a set as the set of all sets equinumerous to it and having the least possible rank. This theorem proves the equinumerosity relationship for this definition (compare carden ). The hypotheses correspond to the definition of kard of Enderton p. 222 (which we don't define separately since currently we do not use it elsewhere). This theorem along with kardex justify the definition of kard. The restriction to the least rank prevents the proper class that would result from { x | x ~A } . (Contributed by NM, 18-Dec-2003) (Revised by AV, 12-Jul-2022) Use the Scott operation. (Revised by BTernaryTau, 19-Jul-2026)

Ref Expression
Hypotheses karden.a 𝐴 ∈ V
karden.c 𝐶 = Scott { 𝑥𝑥𝐴 }
karden.d 𝐷 = Scott { 𝑥𝑥𝐵 }
Assertion karden ( 𝐶 = 𝐷𝐴𝐵 )

Proof

Step Hyp Ref Expression
1 karden.a 𝐴 ∈ V
2 karden.c 𝐶 = Scott { 𝑥𝑥𝐴 }
3 karden.d 𝐷 = Scott { 𝑥𝑥𝐵 }
4 breq1 ( 𝑥 = 𝐴 → ( 𝑥𝐴𝐴𝐴 ) )
5 1 enref 𝐴𝐴
6 1 4 5 ceqsexv2d 𝑥 𝑥𝐴
7 2 neeq1i ( 𝐶 ≠ ∅ ↔ Scott { 𝑥𝑥𝐴 } ≠ ∅ )
8 scott0b ( { 𝑥𝑥𝐴 } = ∅ ↔ Scott { 𝑥𝑥𝐴 } = ∅ )
9 8 necon3bii ( { 𝑥𝑥𝐴 } ≠ ∅ ↔ Scott { 𝑥𝑥𝐴 } ≠ ∅ )
10 abn0 ( { 𝑥𝑥𝐴 } ≠ ∅ ↔ ∃ 𝑥 𝑥𝐴 )
11 7 9 10 3bitr2i ( 𝐶 ≠ ∅ ↔ ∃ 𝑥 𝑥𝐴 )
12 6 11 mpbir 𝐶 ≠ ∅
13 n0 ( 𝐶 ≠ ∅ ↔ ∃ 𝑦 𝑦𝐶 )
14 12 13 mpbi 𝑦 𝑦𝐶
15 eleq2 ( 𝐶 = 𝐷 → ( 𝑦𝐶𝑦𝐷 ) )
16 15 pm4.71da ( 𝐶 = 𝐷 → ( 𝑦𝐶 ↔ ( 𝑦𝐶𝑦𝐷 ) ) )
17 breq1 ( 𝑥 = 𝑦 → ( 𝑥𝐴𝑦𝐴 ) )
18 17 elscottab ( 𝑦 ∈ Scott { 𝑥𝑥𝐴 } → 𝑦𝐴 )
19 18 2 eleq2s ( 𝑦𝐶𝑦𝐴 )
20 19 ensymd ( 𝑦𝐶𝐴𝑦 )
21 breq1 ( 𝑥 = 𝑦 → ( 𝑥𝐵𝑦𝐵 ) )
22 21 elscottab ( 𝑦 ∈ Scott { 𝑥𝑥𝐵 } → 𝑦𝐵 )
23 22 3 eleq2s ( 𝑦𝐷𝑦𝐵 )
24 entr ( ( 𝐴𝑦𝑦𝐵 ) → 𝐴𝐵 )
25 20 23 24 syl2an ( ( 𝑦𝐶𝑦𝐷 ) → 𝐴𝐵 )
26 16 25 biimtrdi ( 𝐶 = 𝐷 → ( 𝑦𝐶𝐴𝐵 ) )
27 26 exlimdv ( 𝐶 = 𝐷 → ( ∃ 𝑦 𝑦𝐶𝐴𝐵 ) )
28 14 27 mpi ( 𝐶 = 𝐷𝐴𝐵 )
29 enen2 ( 𝐴𝐵 → ( 𝑥𝐴𝑥𝐵 ) )
30 29 abbidv ( 𝐴𝐵 → { 𝑥𝑥𝐴 } = { 𝑥𝑥𝐵 } )
31 30 scotteqd ( 𝐴𝐵 → Scott { 𝑥𝑥𝐴 } = Scott { 𝑥𝑥𝐵 } )
32 31 2 3 3eqtr4g ( 𝐴𝐵𝐶 = 𝐷 )
33 28 32 impbii ( 𝐶 = 𝐷𝐴𝐵 )