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

Theorem en1 9044
Description: A set is equinumerous to ordinal one iff it is a singleton. (Contributed by NM, 25-Jul-2004.) Avoid ax-un 7749. (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 8476 . . . . 5 1o = {∅}
21breq2i 5111 . . . 4 (𝐴 ≈ 1o ↔ 𝐴 ≈ {∅})
3 encv 8974 . . . . . 6 (𝐴 ≈ {∅} → (𝐴 ∈ V ∧ {∅} ∈ V))
4 breng 8975 . . . . . 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 6835 . . . . 5 (𝑓:𝐴–1-1-onto→{∅} → ◡𝑓:{∅}–1-1-onto→𝐴)
9 f1ofo 6830 . . . . . . 7 (◡𝑓:{∅}–1-1-onto→𝐴 → ◡𝑓:{∅}–onto→𝐴)
10 forn 6797 . . . . . . 7 (◡𝑓:{∅}–onto→𝐴 → ran ◡𝑓 = 𝐴)
119, 10syl 18 . . . . . 6 (◡𝑓:{∅}–1-1-onto→𝐴 → ran ◡𝑓 = 𝐴)
12 f1of 6822 . . . . . . . . 9 (◡𝑓:{∅}–1-1-onto→𝐴 → ◡𝑓:{∅}⟶𝐴)
13 0ex 5261 . . . . . . . . . . 11 ∅ ∈ V
1413fsn2 7135 . . . . . . . . . 10 (◡𝑓:{∅}⟶𝐴 ↔ ((◡𝑓‘∅) ∈ 𝐴 ∧ ◡𝑓 = {⟨∅, (◡𝑓‘∅)⟩}))
1514simprbi 503 . . . . . . . . 9 (◡𝑓:{∅}⟶𝐴 → ◡𝑓 = {⟨∅, (◡𝑓‘∅)⟩})
1612, 15syl 18 . . . . . . . 8 (◡𝑓:{∅}–1-1-onto→𝐴 → ◡𝑓 = {⟨∅, (◡𝑓‘∅)⟩})
1716rneqd 5920 . . . . . . 7 (◡𝑓:{∅}–1-1-onto→𝐴 → ran ◡𝑓 = ran {⟨∅, (◡𝑓‘∅)⟩})
1813rnsnop 6224 . . . . . . 7 ran {⟨∅, (◡𝑓‘∅)⟩} = {(◡𝑓‘∅)}
1917, 18eqtrdi 2812 . . . . . 6 (◡𝑓:{∅}–1-1-onto→𝐴 → ran ◡𝑓 = {(◡𝑓‘∅)})
2011, 19eqtr3d 2798 . . . . 5 (◡𝑓:{∅}–1-1-onto→𝐴 → 𝐴 = {(◡𝑓‘∅)})
21 fvex 6896 . . . . . 6 (◡𝑓‘∅) ∈ V
22 sneq 4594 . . . . . . 7 (𝑥 = (◡𝑓‘∅) → {𝑥} = {(◡𝑓‘∅)})
2322eqeq2d 2772 . . . . . 6 (𝑥 = (◡𝑓‘∅) → (𝐴 = {𝑥} ↔ 𝐴 = {(◡𝑓‘∅)}))
2421, 23spcev 3561 . . . . 5 (𝐴 = {(◡𝑓‘∅)} → ∃𝑥 𝐴 = {𝑥})
258, 20, 243syl 19 . . . 4 (𝑓:𝐴–1-1-onto→{∅} → ∃𝑥 𝐴 = {𝑥})
2625exlimiv 1963 . . 3 (∃𝑓 𝑓:𝐴–1-1-onto→{∅} → ∃𝑥 𝐴 = {𝑥})
277, 26syl 18 . 2 (𝐴 ≈ 1o → ∃𝑥 𝐴 = {𝑥})
28 vex 3455 . . . . 5 𝑥 ∈ V
2928ensn1 9041 . . . 4 {𝑥} ≈ 1o
30 breq1 5106 . . . 4 (𝐴 = {𝑥} → (𝐴 ≈ 1o ↔ {𝑥} ≈ 1o))
3129, 30mpbiri 261 . . 3 (𝐴 = {𝑥} → 𝐴 ≈ 1o)
3231exlimiv 1963 . 2 (∃𝑥 𝐴 = {𝑥} → 𝐴 ≈ 1o)
3327, 32impbii 212 1 (𝐴 ≈ 1o ↔ ∃𝑥 𝐴 = {𝑥})
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   ↔ wb 209   ∧ wa 401   = wceq 1570  ∃wex 1812   ∈ wcel 2145  Vcvv 3451  ∅c0 4279  {csn 4584  ⟨cop 4590   class class class wbr 5103  ◡ccnv 5650  ran crn 5652  ⟶wf 6533  –onto→wfo 6535  –1-1-onto→wf1o 6536  ‘cfv 6537  1oc1o 8462   ≈ cen 8963
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-12 2213  ax-ext 2733  ax-sep 5249  ax-nul 5260  ax-pr 5391
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-ne 2957  df-ral 3078  df-rex 3088  df-reu 3367  df-rab 3414  df-v 3453  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4280  df-if 4483  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-br 5104  df-opab 5168  df-id 5546  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-1o 8469  df-en 8967
This theorem is used by:  en1b  9045  reuen1  9046  funen1cnv  9049  en1eqsn  9259  en2  9264  card1  10042  pm54.43  10075  hash1elsn  14508  hash1snb  14557  ufildom1  24238  lfuhgr3  29721  unidifsnel  33124  unidifsnne  33125  dflring3  34022  snen1g  44509  istermc3  50553
  Copyright terms: Public domain W3C validator