Theorem hashen 14363

Description: Two finite sets have the same number of elements iff they are equinumerous. (Contributed by Paul Chapman, 22-Jun-2011.) (Revised by Mario Carneiro, 15-Sep-2013.)

Assertion

Ref	Expression
hashen	⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((♯‘𝐴) = (♯‘𝐵) ↔ 𝐴 ≈ 𝐵))

Proof of Theorem hashen

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		fveq2 6875	. . . 4 ⊢ ((♯‘𝐴) = (♯‘𝐵) → (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐴)) = (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐵)))
2		eqid 2735	. . . . . 6 ⊢ (rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω) = (rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)
3	2	hashginv 14350	. . . . 5 ⊢ (𝐴 ∈ Fin → (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐴)) = (card‘𝐴))
4	2	hashginv 14350	. . . . 5 ⊢ (𝐵 ∈ Fin → (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐵)) = (card‘𝐵))
5	3, 4	eqeqan12d 2749	. . . 4 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐴)) = (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐵)) ↔ (card‘𝐴) = (card‘𝐵)))
6	1, 5	imbitrid 244	. . 3 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((♯‘𝐴) = (♯‘𝐵) → (card‘𝐴) = (card‘𝐵)))
7		fveq2 6875	. . . 4 ⊢ ((card‘𝐴) = (card‘𝐵) → ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐴)) = ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐵)))
8	2	hashgval 14349	. . . . 5 ⊢ (𝐴 ∈ Fin → ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐴)) = (♯‘𝐴))
9	2	hashgval 14349	. . . . 5 ⊢ (𝐵 ∈ Fin → ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐵)) = (♯‘𝐵))
10	8, 9	eqeqan12d 2749	. . . 4 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → (((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐴)) = ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐵)) ↔ (♯‘𝐴) = (♯‘𝐵)))
11	7, 10	imbitrid 244	. . 3 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((card‘𝐴) = (card‘𝐵) → (♯‘𝐴) = (♯‘𝐵)))
12	6, 11	impbid 212	. 2 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((♯‘𝐴) = (♯‘𝐵) ↔ (card‘𝐴) = (card‘𝐵)))
13		finnum 9960	. . 3 ⊢ (𝐴 ∈ Fin → 𝐴 ∈ dom card)
14		finnum 9960	. . 3 ⊢ (𝐵 ∈ Fin → 𝐵 ∈ dom card)
15		carden2 9999	. . 3 ⊢ ((𝐴 ∈ dom card ∧ 𝐵 ∈ dom card) → ((card‘𝐴) = (card‘𝐵) ↔ 𝐴 ≈ 𝐵))
16	13, 14, 15	syl2an 596	. 2 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((card‘𝐴) = (card‘𝐵) ↔ 𝐴 ≈ 𝐵))
17	12, 16	bitrd 279	1 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((♯‘𝐴) = (♯‘𝐵) ↔ 𝐴 ≈ 𝐵))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540   ∈ wcel 2108  Vcvv 3459   class class class wbr 5119   ↦ cmpt 5201  ^◡ccnv 5653  dom cdm 5654   ↾ cres 5656  ‘cfv 6530  (class class class)co 7403  ωcom 7859  reccrdg 8421   ≈ cen 8954  Fincfn 8957  cardccrd 9947  0cc0 11127  1c1 11128   + caddc 11130  ♯chash 14346

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7727  ax-cnex 11183  ax-resscn 11184  ax-1cn 11185  ax-icn 11186  ax-addcl 11187  ax-addrcl 11188  ax-mulcl 11189  ax-mulrcl 11190  ax-mulcom 11191  ax-addass 11192  ax-mulass 11193  ax-distr 11194  ax-i2m1 11195  ax-1ne0 11196  ax-1rid 11197  ax-rnegex 11198  ax-rrecex 11199  ax-cnre 11200  ax-pre-lttri 11201  ax-pre-lttrn 11202  ax-pre-ltadd 11203  ax-pre-mulgt0 11204

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6483  df-fun 6532  df-fn 6533  df-f 6534  df-f1 6535  df-fo 6536  df-f1o 6537  df-fv 6538  df-riota 7360  df-ov 7406  df-oprab 7407  df-mpo 7408  df-om 7860  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8383  df-rdg 8422  df-1o 8478  df-er 8717  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-card 9951  df-pnf 11269  df-mnf 11270  df-xr 11271  df-ltxr 11272  df-le 11273  df-sub 11466  df-neg 11467  df-nn 12239  df-n0 12500  df-z 12587  df-uz 12851  df-hash 14347

This theorem is referenced by:  hasheni  14364  hasheqf1o  14365  isfinite4  14378  hasheq0  14379  hashsng  14385  hashen1  14386  hashsdom  14397  hash1snb  14435  hashxplem  14449  hashmap  14451  hashpw  14452  hashbclem  14468  phphashd  14482  hash2pr  14485  pr2pwpr  14495  hash3tr  14507  tpf1o  14517  s7f1o  14983  isercolllem2  15680  isercoll  15682  summolem3  15728  mertenslem1  15898  prodmolem3  15947  bpolylem  16062  hashdvds  16792  crth  16795  phimullem  16796  eulerth  16800  4sqlem11  16973  lagsubg2  19175  dfod2  19543  sylow1lem2  19578  sylow2alem2  19597  slwhash  19603  sylow2  19605  sylow3lem1  19606  cyggenod  19863  lt6abl  19874  ablfac1c  20052  ablfac1eu  20054  ablfaclem3  20068  fta1blem  26126  vieta1  26270  isppw  27074  clwlknon2num  30295  numclwlk1lem2  30297  hashpss  32734  fisshasheq  35083  derangen2  35142  erdsze2lem1  35171  erdsze2lem2  35172  poimirlem9  37599  poimirlem25  37615  poimirlem26  37616  poimirlem27  37617  poimirlem28  37618  eldioph2lem1  42730  frlmpwfi  43069  isnumbasgrplem3  43076  idomsubgmo  43164  gpg5grlic  48041