MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  en1 Structured version   Visualization version   GIF version

Theorem en1 9055
Description: A set is equinumerous to ordinal one iff it is a singleton. (Contributed by NM, 25-Jul-2004.) Avoid ax-un 7752. (Revised by BTernaryTau, 23-Sep-2024.)
Assertion
Ref Expression
en1 (𝐴 ≈ 1o ↔ ∃𝑥 𝐴 = {𝑥})
Distinct variable group:   𝑥,𝐴

Proof of Theorem en1
Dummy variable 𝑓 is distinct from all other variables.
StepHypRef Expression
1 df1o2 8487 . . . . 5 1o = {∅}
21breq2i 5110 . . . 4 (𝐴 ≈ 1o ↔ 𝐴 ≈ {∅})
3 encv 8985 . . . . . 6 (𝐴 ≈ {∅} → (𝐴 ∈ V ∧ {∅} ∈ V))
4 breng 8986 . . . . . 6 ((𝐴 ∈ V ∧ {∅} ∈ V) → (𝐴 ≈ {∅} ↔ ∃𝑓 𝑓:𝐴–1-1-onto→{∅}))
53, 4syl 18 . . . . 5 (𝐴 ≈ {∅} → (𝐴 ≈ {∅} ↔ ∃𝑓 𝑓:𝐴–1-1-onto→{∅}))
65ibi 270 . . . 4 (𝐴 ≈ {∅} → ∃𝑓 𝑓:𝐴–1-1-onto→{∅})
72, 6sylbi 220 . . 3 (𝐴 ≈ 1o → ∃𝑓 𝑓:𝐴–1-1-onto→{∅})
8 f1ocnv 6838 . . . . 5 (𝑓:𝐴–1-1-onto→{∅} → ◡𝑓:{∅}–1-1-onto→𝐴)
9 f1ofo 6833 . . . . . . 7 (◡𝑓:{∅}–1-1-onto→𝐴 → ◡𝑓:{∅}–onto→𝐴)
10 forn 6800 . . . . . . 7 (◡𝑓:{∅}–onto→𝐴 → ran ◡𝑓 = 𝐴)
119, 10syl 18 . . . . . 6 (◡𝑓:{∅}–1-1-onto→𝐴 → ran ◡𝑓 = 𝐴)
12 f1of 6825 . . . . . . . . 9 (◡𝑓:{∅}–1-1-onto→𝐴 → ◡𝑓:{∅}⟶𝐴)
13 0ex 5260 . . . . . . . . . . 11 ∅ ∈ V
1413fsn2 7138 . . . . . . . . . 10 (◡𝑓:{∅}⟶𝐴 ↔ ((◡𝑓‘∅) ∈ 𝐴 ∧ ◡𝑓 = {⟨∅, (◡𝑓‘∅)⟩}))
1514simprbi 503 . . . . . . . . 9 (◡𝑓:{∅}⟶𝐴 → ◡𝑓 = {⟨∅, (◡𝑓‘∅)⟩})
1612, 15syl 18 . . . . . . . 8 (◡𝑓:{∅}–1-1-onto→𝐴 → ◡𝑓 = {⟨∅, (◡𝑓‘∅)⟩})
1716rneqd 5919 . . . . . . 7 (◡𝑓:{∅}–1-1-onto→𝐴 → ran ◡𝑓 = ran {⟨∅, (◡𝑓‘∅)⟩})
1813rnsnop 6225 . . . . . . 7 ran {⟨∅, (◡𝑓‘∅)⟩} = {(◡𝑓‘∅)}
1917, 18eqtrdi 2811 . . . . . 6 (◡𝑓:{∅}–1-1-onto→𝐴 → ran ◡𝑓 = {(◡𝑓‘∅)})
2011, 19eqtr3d 2797 . . . . 5 (◡𝑓:{∅}–1-1-onto→𝐴 → 𝐴 = {(◡𝑓‘∅)})
21 fvex 6899 . . . . . 6 (◡𝑓‘∅) ∈ V
22 sneq 4590 . . . . . . 7 (𝑥 = (◡𝑓‘∅) → {𝑥} = {(◡𝑓‘∅)})
2322eqeq2d 2771 . . . . . 6 (𝑥 = (◡𝑓‘∅) → (𝐴 = {𝑥} ↔ 𝐴 = {(◡𝑓‘∅)}))
2421, 23spcev 3560 . . . . 5 (𝐴 = {(◡𝑓‘∅)} → ∃𝑥 𝐴 = {𝑥})
258, 20, 243syl 19 . . . 4 (𝑓:𝐴–1-1-onto→{∅} → ∃𝑥 𝐴 = {𝑥})
2625exlimiv 1962 . . 3 (∃𝑓 𝑓:𝐴–1-1-onto→{∅} → ∃𝑥 𝐴 = {𝑥})
277, 26syl 18 . 2 (𝐴 ≈ 1o → ∃𝑥 𝐴 = {𝑥})
28 vex 3454 . . . . 5 𝑥 ∈ V
2928ensn1 9052 . . . 4 {𝑥} ≈ 1o
30 breq1 5105 . . . 4 (𝐴 = {𝑥} → (𝐴 ≈ 1o ↔ {𝑥} ≈ 1o))
3129, 30mpbiri 261 . . 3 (𝐴 = {𝑥} → 𝐴 ≈ 1o)
3231exlimiv 1962 . 2 (∃𝑥 𝐴 = {𝑥} → 𝐴 ≈ 1o)
3327, 32impbii 212 1 (𝐴 ≈ 1o ↔ ∃𝑥 𝐴 = {𝑥})
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   ↔ wb 209   ∧ wa 401   = wceq 1569  ∃wex 1811   ∈ wcel 2144  Vcvv 3450  ∅c0 4278  {csn 4584  ⟨cop 4834   class class class wbr 5102  ◡ccnv 5649  ran crn 5651  ⟶wf 6535  –onto→wfo 6537  –1-1-onto→wf1o 6538  ‘cfv 6539  1oc1o 8473   ≈ cen 8974
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pr 5390
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-ss 3896  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-br 5103  df-opab 5167  df-id 5545  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-suc 6368  df-iota 6494  df-fun 6541  df-fn 6542  df-f 6543  df-f1 6544  df-fo 6545  df-f1o 6546  df-fv 6547  df-1o 8480  df-en 8978
This theorem is used by:  en1b  9056  reuen1  9057  funen1cnv  9060  en1eqsn  9270  en2  9275  card1  10053  pm54.43  10086  hash1elsn  14519  hash1snb  14568  ufildom1  24251  lfuhgr3  29734  unidifsnel  33179  unidifsnne  33180  dflring3  34076  snen1g  44619  istermc3  50705
  Copyright terms: Public domain W3C validator