Theorem hashen 14350

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 6856	. . . 4 ⊢ ((♯‘𝐴) = (♯‘𝐵) → (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐴)) = (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐵)))
2		eqid 2756	. . . . . 6 ⊢ (rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω) = (rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)
3	2	hashginv 14337	. . . . 5 ⊢ (𝐴 ∈ Fin → (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐴)) = (card‘𝐴))
4	2	hashginv 14337	. . . . 5 ⊢ (𝐵 ∈ Fin → (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐵)) = (card‘𝐵))
5	3, 4	eqeqan12d 2770	. . . 4 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐴)) = (◡(rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(♯‘𝐵)) ↔ (card‘𝐴) = (card‘𝐵)))
6	1, 5	imbitrid 246	. . 3 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((♯‘𝐴) = (♯‘𝐵) → (card‘𝐴) = (card‘𝐵)))
7		fveq2 6856	. . . 4 ⊢ ((card‘𝐴) = (card‘𝐵) → ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐴)) = ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐵)))
8	2	hashgval 14336	. . . . 5 ⊢ (𝐴 ∈ Fin → ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐴)) = (♯‘𝐴))
9	2	hashgval 14336	. . . . 5 ⊢ (𝐵 ∈ Fin → ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐵)) = (♯‘𝐵))
10	8, 9	eqeqan12d 2770	. . . 4 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → (((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐴)) = ((rec((𝑥 ∈ V ↦ (𝑥 + 1)), 0) ↾ ω)‘(card‘𝐵)) ↔ (♯‘𝐴) = (♯‘𝐵)))
11	7, 10	imbitrid 246	. . 3 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((card‘𝐴) = (card‘𝐵) → (♯‘𝐴) = (♯‘𝐵)))
12	6, 11	impbid 214	. 2 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((♯‘𝐴) = (♯‘𝐵) ↔ (card‘𝐴) = (card‘𝐵)))
13		finnum 9896	. . 3 ⊢ (𝐴 ∈ Fin → 𝐴 ∈ dom card)
14		finnum 9896	. . 3 ⊢ (𝐵 ∈ Fin → 𝐵 ∈ dom card)
15		carden2 9935	. . 3 ⊢ ((𝐴 ∈ dom card ∧ 𝐵 ∈ dom card) → ((card‘𝐴) = (card‘𝐵) ↔ 𝐴 ≈ 𝐵))
16	13, 14, 15	syl2an 604	. 2 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((card‘𝐴) = (card‘𝐵) ↔ 𝐴 ≈ 𝐵))
17	12, 16	bitrd 281	1 ⊢ ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → ((♯‘𝐴) = (♯‘𝐵) ↔ 𝐴 ≈ 𝐵))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1554   ∈ wcel 2136  Vcvv 3448   class class class wbr 5094   ↦ cmpt 5175  ^◡ccnv 5639  dom cdm 5640   ↾ cres 5642  ‘cfv 6510  (class class class)co 7385  ωcom 7835  reccrdg 8368   ≈ cen 8913  Fincfn 8916  cardccrd 9883  0cc0 11063  1c1 11064   + caddc 11066  ♯chash 14333

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1809  ax-4 1823  ax-5 1924  ax-6 1981  ax-7 2022  ax-8 2138  ax-9 2146  ax-10 2169  ax-11 2185  ax-12 2206  ax-ext 2728  ax-sep 5240  ax-nul 5250  ax-pow 5316  ax-pr 5384  ax-un 7707  ax-cnex 11119  ax-resscn 11120  ax-1cn 11121  ax-icn 11122  ax-addcl 11123  ax-addrcl 11124  ax-mulcl 11125  ax-mulrcl 11126  ax-mulcom 11127  ax-addass 11128  ax-mulass 11129  ax-distr 11130  ax-i2m1 11131  ax-1ne0 11132  ax-1rid 11133  ax-rnegex 11134  ax-rrecex 11135  ax-cnre 11136  ax-pre-lttri 11137  ax-pre-lttrn 11138  ax-pre-ltadd 11139  ax-pre-mulgt0 11140

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3or 1096  df-3an 1097  df-tru 1557  df-fal 1567  df-ex 1794  df-nf 1798  df-sb 2085  df-mo 2560  df-eu 2590  df-clab 2735  df-cleq 2748  df-clel 2831  df-nfc 2905  df-ne 2952  df-nel 3056  df-ral 3071  df-rex 3081  df-reu 3362  df-rab 3409  df-v 3450  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4281  df-if 4475  df-pw 4551  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-int 4900  df-iun 4945  df-br 5095  df-opab 5157  df-mpt 5176  df-tr 5202  df-id 5535  df-eprel 5540  df-po 5548  df-so 5549  df-fr 5593  df-we 5595  df-xp 5646  df-rel 5647  df-cnv 5648  df-co 5649  df-dm 5650  df-rn 5651  df-res 5652  df-ima 5653  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6466  df-fun 6512  df-fn 6513  df-f 6514  df-f1 6515  df-fo 6516  df-f1o 6517  df-fv 6518  df-riota 7342  df-ov 7388  df-oprab 7389  df-mpo 7390  df-om 7836  df-2nd 7960  df-frecs 8250  df-wrecs 8281  df-recs 8330  df-rdg 8369  df-1o 8425  df-er 8666  df-en 8917  df-dom 8918  df-sdom 8919  df-fin 8920  df-card 9887  df-pnf 11208  df-mnf 11209  df-xr 11210  df-ltxr 11211  df-le 11212  df-sub 11406  df-neg 11407  df-nn 12201  df-n0 12472  df-z 12559  df-uz 12830  df-hash 14334

This theorem is referenced by:  hasheni  14351  hasheqf1o  14352  isfinite4  14365  hasheq0  14366  hashsng  14372  hashen1  14373  hashsdom  14384  hash1snb  14422  hashxplem  14436  hashmap  14438  hashpw  14439  hashbclem  14455  phphashd  14469  hash2pr  14472  pr2pwpr  14482  hash3tr  14494  tpf1o  14504  s7f1o  14969  isercolllem2  15669  isercoll  15671  summolem3  15717  mertenslem1  15890  prodmolem3  15939  bpolylem  16054  hashdvds  16786  crth  16789  phimullem  16790  eulerth  16794  4sqlem11  16967  lagsubg2  19211  dfod2  19580  sylow1lem2  19615  sylow2alem2  19634  slwhash  19640  sylow2  19642  sylow3lem1  19643  cyggenod  19900  lt6abl  19911  ablfac1c  20089  ablfac1eu  20091  ablfaclem3  20105  fta1blem  26204  vieta1  26346  isppw  27148  clwlknon2num  30509  numclwlk1lem2  30511  hashpss  32954  fisshasheq  35413  derangen2  35472  erdsze2lem1  35501  erdsze2lem2  35502  poimirlem9  38076  poimirlem25  38092  poimirlem26  38093  poimirlem27  38094  poimirlem28  38095  eldioph2lem1  43289  frlmpwfi  43623  isnumbasgrplem3  43630  idomsubgmo  43718  gpg5grlic  48664