Theorem hash1snb 14340

Description: The size of a set is 1 if and only if it is a singleton (containing a set). (Contributed by Alexander van der Vekens, 7-Dec-2017.)

Assertion

Ref	Expression
hash1snb	⊢ (𝑉 ∈ 𝑊 → ((♯‘𝑉) = 1 ↔ ∃𝑎 𝑉 = {𝑎}))

Distinct variable group:   𝑉,𝑎

Allowed substitution hint:   𝑊(𝑎)

Proof of Theorem hash1snb

Step	Hyp	Ref	Expression
1		id 22	. . . . . . . . 9 ⊢ ((♯‘𝑉) = 1 → (♯‘𝑉) = 1)
2		hash1 14325	. . . . . . . . 9 ⊢ (♯‘1o) = 1
3	1, 2	eqtr4di 2787	. . . . . . . 8 ⊢ ((♯‘𝑉) = 1 → (♯‘𝑉) = (♯‘1o))
4	3	adantl 481	. . . . . . 7 ⊢ ((𝑉 ∈ Fin ∧ (♯‘𝑉) = 1) → (♯‘𝑉) = (♯‘1o))
5		1onn 8566	. . . . . . . . 9 ⊢ 1o ∈ ω
6		nnfi 9090	. . . . . . . . 9 ⊢ (1o ∈ ω → 1o ∈ Fin)
7	5, 6	mp1i 13	. . . . . . . 8 ⊢ ((♯‘𝑉) = 1 → 1o ∈ Fin)
8		hashen 14268	. . . . . . . 8 ⊢ ((𝑉 ∈ Fin ∧ 1o ∈ Fin) → ((♯‘𝑉) = (♯‘1o) ↔ 𝑉 ≈ 1o))
9	7, 8	sylan2 593	. . . . . . 7 ⊢ ((𝑉 ∈ Fin ∧ (♯‘𝑉) = 1) → ((♯‘𝑉) = (♯‘1o) ↔ 𝑉 ≈ 1o))
10	4, 9	mpbid 232	. . . . . 6 ⊢ ((𝑉 ∈ Fin ∧ (♯‘𝑉) = 1) → 𝑉 ≈ 1o)
11		en1 8959	. . . . . 6 ⊢ (𝑉 ≈ 1o ↔ ∃𝑎 𝑉 = {𝑎})
12	10, 11	sylib 218	. . . . 5 ⊢ ((𝑉 ∈ Fin ∧ (♯‘𝑉) = 1) → ∃𝑎 𝑉 = {𝑎})
13	12	ex 412	. . . 4 ⊢ (𝑉 ∈ Fin → ((♯‘𝑉) = 1 → ∃𝑎 𝑉 = {𝑎}))
14	13	a1d 25	. . 3 ⊢ (𝑉 ∈ Fin → (𝑉 ∈ 𝑊 → ((♯‘𝑉) = 1 → ∃𝑎 𝑉 = {𝑎})))
15		hashinf 14256	. . . . 5 ⊢ ((𝑉 ∈ 𝑊 ∧ ¬ 𝑉 ∈ Fin) → (♯‘𝑉) = +∞)
16		eqeq1 2738	. . . . . 6 ⊢ ((♯‘𝑉) = +∞ → ((♯‘𝑉) = 1 ↔ +∞ = 1))
17		1re 11130	. . . . . . . 8 ⊢ 1 ∈ ℝ
18		renepnf 11178	. . . . . . . 8 ⊢ (1 ∈ ℝ → 1 ≠ +∞)
19		df-ne 2931	. . . . . . . . 9 ⊢ (1 ≠ +∞ ↔ ¬ 1 = +∞)
20		pm2.21 123	. . . . . . . . 9 ⊢ (¬ 1 = +∞ → (1 = +∞ → ∃𝑎 𝑉 = {𝑎}))
21	19, 20	sylbi 217	. . . . . . . 8 ⊢ (1 ≠ +∞ → (1 = +∞ → ∃𝑎 𝑉 = {𝑎}))
22	17, 18, 21	mp2b 10	. . . . . . 7 ⊢ (1 = +∞ → ∃𝑎 𝑉 = {𝑎})
23	22	eqcoms 2742	. . . . . 6 ⊢ (+∞ = 1 → ∃𝑎 𝑉 = {𝑎})
24	16, 23	biimtrdi 253	. . . . 5 ⊢ ((♯‘𝑉) = +∞ → ((♯‘𝑉) = 1 → ∃𝑎 𝑉 = {𝑎}))
25	15, 24	syl 17	. . . 4 ⊢ ((𝑉 ∈ 𝑊 ∧ ¬ 𝑉 ∈ Fin) → ((♯‘𝑉) = 1 → ∃𝑎 𝑉 = {𝑎}))
26	25	expcom 413	. . 3 ⊢ (¬ 𝑉 ∈ Fin → (𝑉 ∈ 𝑊 → ((♯‘𝑉) = 1 → ∃𝑎 𝑉 = {𝑎})))
27	14, 26	pm2.61i 182	. 2 ⊢ (𝑉 ∈ 𝑊 → ((♯‘𝑉) = 1 → ∃𝑎 𝑉 = {𝑎}))
28		fveq2 6832	. . . 4 ⊢ (𝑉 = {𝑎} → (♯‘𝑉) = (♯‘{𝑎}))
29		hashsng 14290	. . . . 5 ⊢ (𝑎 ∈ V → (♯‘{𝑎}) = 1)
30	29	elv 3443	. . . 4 ⊢ (♯‘{𝑎}) = 1
31	28, 30	eqtrdi 2785	. . 3 ⊢ (𝑉 = {𝑎} → (♯‘𝑉) = 1)
32	31	exlimiv 1931	. 2 ⊢ (∃𝑎 𝑉 = {𝑎} → (♯‘𝑉) = 1)
33	27, 32	impbid1 225	1 ⊢ (𝑉 ∈ 𝑊 → ((♯‘𝑉) = 1 ↔ ∃𝑎 𝑉 = {𝑎}))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1541  ∃wex 1780   ∈ wcel 2113   ≠ wne 2930  Vcvv 3438  {csn 4578   class class class wbr 5096  ‘cfv 6490  ωcom 7806  1_oc1o 8388   ≈ cen 8878  Fincfn 8881  ℝcr 11023  1c1 11025  +∞cpnf 11161  ♯chash 14251

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2706  ax-sep 5239  ax-nul 5249  ax-pow 5308  ax-pr 5375  ax-un 7678  ax-cnex 11080  ax-resscn 11081  ax-1cn 11082  ax-icn 11083  ax-addcl 11084  ax-addrcl 11085  ax-mulcl 11086  ax-mulrcl 11087  ax-mulcom 11088  ax-addass 11089  ax-mulass 11090  ax-distr 11091  ax-i2m1 11092  ax-1ne0 11093  ax-1rid 11094  ax-rnegex 11095  ax-rrecex 11096  ax-cnre 11097  ax-pre-lttri 11098  ax-pre-lttrn 11099  ax-pre-ltadd 11100  ax-pre-mulgt0 11101

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2809  df-nfc 2883  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3059  df-reu 3349  df-rab 3398  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4579  df-pr 4581  df-op 4585  df-uni 4862  df-int 4901  df-iun 4946  df-br 5097  df-opab 5159  df-mpt 5178  df-tr 5204  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-1st 7931  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-oadd 8399  df-er 8633  df-en 8882  df-dom 8883  df-sdom 8884  df-fin 8885  df-dju 9811  df-card 9849  df-pnf 11166  df-mnf 11167  df-xr 11168  df-ltxr 11169  df-le 11170  df-sub 11364  df-neg 11365  df-nn 12144  df-n0 12400  df-z 12487  df-uz 12750  df-fz 13422  df-hash 14252

This theorem is referenced by:  hash1n0  14342  hashle2pr  14398  hashge2el2difr  14402  hash1to3  14413  cshwrepswhash1  17028  symgvalstruct  19324  c0snmgmhm  20396  mat1scmat  22481  tgldim0eq  28524  lfuhgr1v0e  29276  usgr1v0e  29348  nbgr1vtx  29380  uvtx01vtx  29419  cplgr1vlem  29451  cplgr1v  29452  1loopgrvd2  29526  vdgn1frgrv2  30320  frgrwopreg1  30342  frgrwopreg2  30343  extdg1id  33772