Theorem hashbc 14478

Description: The binomial coefficient counts the number of subsets of a finite set of a given size. This is Metamath 100 proof #58 (formula for the number of combinations). (Contributed by Mario Carneiro, 13-Jul-2014.)

Assertion

Ref	Expression
hashbc	⊢ ((𝐴 ∈ Fin ∧ 𝐾 ∈ ℤ) → ((♯‘𝐴)C𝐾) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝐾}))

Distinct variable groups:   𝑥,𝐴   𝑥,𝐾

Proof of Theorem hashbc

Dummy variables 𝑗 𝑘 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fveq2 6871	. . . . . 6 ⊢ (𝑤 = ∅ → (♯‘𝑤) = (♯‘∅))
2	1	oveq1d 7415	. . . . 5 ⊢ (𝑤 = ∅ → ((♯‘𝑤)C𝑘) = ((♯‘∅)C𝑘))
3		pweq 4572	. . . . . . 7 ⊢ (𝑤 = ∅ → 𝒫 𝑤 = 𝒫 ∅)
4	3	rabeqdv 3432	. . . . . 6 ⊢ (𝑤 = ∅ → {𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘} = {𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘})
5	4	fveq2d 6875	. . . . 5 ⊢ (𝑤 = ∅ → (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}))
6	2, 5	eqeq12d 2781	. . . 4 ⊢ (𝑤 = ∅ → (((♯‘𝑤)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) ↔ ((♯‘∅)C𝑘) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘})))
7	6	ralbidv 3188	. . 3 ⊢ (𝑤 = ∅ → (∀𝑘 ∈ ℤ ((♯‘𝑤)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) ↔ ∀𝑘 ∈ ℤ ((♯‘∅)C𝑘) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘})))
8		fveq2 6871	. . . . . 6 ⊢ (𝑤 = 𝑦 → (♯‘𝑤) = (♯‘𝑦))
9	8	oveq1d 7415	. . . . 5 ⊢ (𝑤 = 𝑦 → ((♯‘𝑤)C𝑘) = ((♯‘𝑦)C𝑘))
10		pweq 4572	. . . . . . 7 ⊢ (𝑤 = 𝑦 → 𝒫 𝑤 = 𝒫 𝑦)
11	10	rabeqdv 3432	. . . . . 6 ⊢ (𝑤 = 𝑦 → {𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘} = {𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘})
12	11	fveq2d 6875	. . . . 5 ⊢ (𝑤 = 𝑦 → (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘}))
13	9, 12	eqeq12d 2781	. . . 4 ⊢ (𝑤 = 𝑦 → (((♯‘𝑤)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) ↔ ((♯‘𝑦)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘})))
14	13	ralbidv 3188	. . 3 ⊢ (𝑤 = 𝑦 → (∀𝑘 ∈ ℤ ((♯‘𝑤)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) ↔ ∀𝑘 ∈ ℤ ((♯‘𝑦)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘})))
15		fveq2 6871	. . . . . 6 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (♯‘𝑤) = (♯‘(𝑦 ∪ {𝑧})))
16	15	oveq1d 7415	. . . . 5 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → ((♯‘𝑤)C𝑘) = ((♯‘(𝑦 ∪ {𝑧}))C𝑘))
17		pweq 4572	. . . . . . 7 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → 𝒫 𝑤 = 𝒫 (𝑦 ∪ {𝑧}))
18	17	rabeqdv 3432	. . . . . 6 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → {𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘} = {𝑥 ∈ 𝒫 (𝑦 ∪ {𝑧}) ∣ (♯‘𝑥) = 𝑘})
19	18	fveq2d 6875	. . . . 5 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) = (♯‘{𝑥 ∈ 𝒫 (𝑦 ∪ {𝑧}) ∣ (♯‘𝑥) = 𝑘}))
20	16, 19	eqeq12d 2781	. . . 4 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (((♯‘𝑤)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) ↔ ((♯‘(𝑦 ∪ {𝑧}))C𝑘) = (♯‘{𝑥 ∈ 𝒫 (𝑦 ∪ {𝑧}) ∣ (♯‘𝑥) = 𝑘})))
21	20	ralbidv 3188	. . 3 ⊢ (𝑤 = (𝑦 ∪ {𝑧}) → (∀𝑘 ∈ ℤ ((♯‘𝑤)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) ↔ ∀𝑘 ∈ ℤ ((♯‘(𝑦 ∪ {𝑧}))C𝑘) = (♯‘{𝑥 ∈ 𝒫 (𝑦 ∪ {𝑧}) ∣ (♯‘𝑥) = 𝑘})))
22		fveq2 6871	. . . . . 6 ⊢ (𝑤 = 𝐴 → (♯‘𝑤) = (♯‘𝐴))
23	22	oveq1d 7415	. . . . 5 ⊢ (𝑤 = 𝐴 → ((♯‘𝑤)C𝑘) = ((♯‘𝐴)C𝑘))
24		pweq 4572	. . . . . . 7 ⊢ (𝑤 = 𝐴 → 𝒫 𝑤 = 𝒫 𝐴)
25	24	rabeqdv 3432	. . . . . 6 ⊢ (𝑤 = 𝐴 → {𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘} = {𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘})
26	25	fveq2d 6875	. . . . 5 ⊢ (𝑤 = 𝐴 → (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘}))
27	23, 26	eqeq12d 2781	. . . 4 ⊢ (𝑤 = 𝐴 → (((♯‘𝑤)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) ↔ ((♯‘𝐴)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘})))
28	27	ralbidv 3188	. . 3 ⊢ (𝑤 = 𝐴 → (∀𝑘 ∈ ℤ ((♯‘𝑤)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑤 ∣ (♯‘𝑥) = 𝑘}) ↔ ∀𝑘 ∈ ℤ ((♯‘𝐴)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘})))
29		hash0 14391	. . . . . . . . . 10 ⊢ (♯‘∅) = 0
30	29	a1i 11	. . . . . . . . 9 ⊢ (𝑘 ∈ (0...0) → (♯‘∅) = 0)
31		elfz1eq 13551	. . . . . . . . 9 ⊢ (𝑘 ∈ (0...0) → 𝑘 = 0)
32	30, 31	oveq12d 7418	. . . . . . . 8 ⊢ (𝑘 ∈ (0...0) → ((♯‘∅)C𝑘) = (0C0))
33		0nn0 12507	. . . . . . . . 9 ⊢ 0 ∈ ℕ0
34		bcn0 14334	. . . . . . . . 9 ⊢ (0 ∈ ℕ0 → (0C0) = 1)
35	33, 34	ax-mp 5	. . . . . . . 8 ⊢ (0C0) = 1
36	32, 35	eqtrdi 2816	. . . . . . 7 ⊢ (𝑘 ∈ (0...0) → ((♯‘∅)C𝑘) = 1)
37	31	eqcomd 2771	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ (0...0) → 0 = 𝑘)
38		pw0 4773	. . . . . . . . . . . . . 14 ⊢ 𝒫 ∅ = {∅}
39	38	raleqi 3321	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ 𝒫 ∅(♯‘𝑥) = 𝑘 ↔ ∀𝑥 ∈ {∅} (♯‘𝑥) = 𝑘)
40		0ex 5261	. . . . . . . . . . . . . 14 ⊢ ∅ ∈ V
41		fveq2 6871	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = ∅ → (♯‘𝑥) = (♯‘∅))
42	41, 29	eqtrdi 2816	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = ∅ → (♯‘𝑥) = 0)
43	42	eqeq1d 2767	. . . . . . . . . . . . . 14 ⊢ (𝑥 = ∅ → ((♯‘𝑥) = 𝑘 ↔ 0 = 𝑘))
44	40, 43	ralsn 4643	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ {∅} (♯‘𝑥) = 𝑘 ↔ 0 = 𝑘)
45	39, 44	bitri 278	. . . . . . . . . . . 12 ⊢ (∀𝑥 ∈ 𝒫 ∅(♯‘𝑥) = 𝑘 ↔ 0 = 𝑘)
46	37, 45	sylibr 237	. . . . . . . . . . 11 ⊢ (𝑘 ∈ (0...0) → ∀𝑥 ∈ 𝒫 ∅(♯‘𝑥) = 𝑘)
47		rabid2 3450	. . . . . . . . . . 11 ⊢ (𝒫 ∅ = {𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘} ↔ ∀𝑥 ∈ 𝒫 ∅(♯‘𝑥) = 𝑘)
48	46, 47	sylibr 237	. . . . . . . . . 10 ⊢ (𝑘 ∈ (0...0) → 𝒫 ∅ = {𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘})
49	48, 38	eqtr3di 2815	. . . . . . . . 9 ⊢ (𝑘 ∈ (0...0) → {𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘} = {∅})
50	49	fveq2d 6875	. . . . . . . 8 ⊢ (𝑘 ∈ (0...0) → (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}) = (♯‘{∅}))
51		hashsng 14393	. . . . . . . . 9 ⊢ (∅ ∈ V → (♯‘{∅}) = 1)
52	40, 51	ax-mp 5	. . . . . . . 8 ⊢ (♯‘{∅}) = 1
53	50, 52	eqtrdi 2816	. . . . . . 7 ⊢ (𝑘 ∈ (0...0) → (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}) = 1)
54	36, 53	eqtr4d 2803	. . . . . 6 ⊢ (𝑘 ∈ (0...0) → ((♯‘∅)C𝑘) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}))
55	54	adantl 486	. . . . 5 ⊢ ((𝑘 ∈ ℤ ∧ 𝑘 ∈ (0...0)) → ((♯‘∅)C𝑘) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}))
56	29	oveq1i 7410	. . . . . 6 ⊢ ((♯‘∅)C𝑘) = (0C𝑘)
57		bcval3 14330	. . . . . . . 8 ⊢ ((0 ∈ ℕ0 ∧ 𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → (0C𝑘) = 0)
58	33, 57	mp3an1 1472	. . . . . . 7 ⊢ ((𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → (0C𝑘) = 0)
59		id 23	. . . . . . . . . . . . . 14 ⊢ (0 = 𝑘 → 0 = 𝑘)
60		0z 12590	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℤ
61		elfz3 13550	. . . . . . . . . . . . . . 15 ⊢ (0 ∈ ℤ → 0 ∈ (0...0))
62	60, 61	ax-mp 5	. . . . . . . . . . . . . 14 ⊢ 0 ∈ (0...0)
63	59, 62	eqeltrrdi 2874	. . . . . . . . . . . . 13 ⊢ (0 = 𝑘 → 𝑘 ∈ (0...0))
64	63	con3i 155	. . . . . . . . . . . 12 ⊢ (¬ 𝑘 ∈ (0...0) → ¬ 0 = 𝑘)
65	64	adantl 486	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → ¬ 0 = 𝑘)
66	38	raleqi 3321	. . . . . . . . . . . 12 ⊢ (∀𝑥 ∈ 𝒫 ∅ ¬ (♯‘𝑥) = 𝑘 ↔ ∀𝑥 ∈ {∅} ¬ (♯‘𝑥) = 𝑘)
67	43	notbid 321	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → (¬ (♯‘𝑥) = 𝑘 ↔ ¬ 0 = 𝑘))
68	40, 67	ralsn 4643	. . . . . . . . . . . 12 ⊢ (∀𝑥 ∈ {∅} ¬ (♯‘𝑥) = 𝑘 ↔ ¬ 0 = 𝑘)
69	66, 68	bitri 278	. . . . . . . . . . 11 ⊢ (∀𝑥 ∈ 𝒫 ∅ ¬ (♯‘𝑥) = 𝑘 ↔ ¬ 0 = 𝑘)
70	65, 69	sylibr 237	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → ∀𝑥 ∈ 𝒫 ∅ ¬ (♯‘𝑥) = 𝑘)
71		rabeq0 4345	. . . . . . . . . 10 ⊢ ({𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘} = ∅ ↔ ∀𝑥 ∈ 𝒫 ∅ ¬ (♯‘𝑥) = 𝑘)
72	70, 71	sylibr 237	. . . . . . . . 9 ⊢ ((𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → {𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘} = ∅)
73	72	fveq2d 6875	. . . . . . . 8 ⊢ ((𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}) = (♯‘∅))
74	73, 29	eqtrdi 2816	. . . . . . 7 ⊢ ((𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}) = 0)
75	58, 74	eqtr4d 2803	. . . . . 6 ⊢ ((𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → (0C𝑘) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}))
76	56, 75	eqtrid 2812	. . . . 5 ⊢ ((𝑘 ∈ ℤ ∧ ¬ 𝑘 ∈ (0...0)) → ((♯‘∅)C𝑘) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}))
77	55, 76	pm2.61dan 824	. . . 4 ⊢ (𝑘 ∈ ℤ → ((♯‘∅)C𝑘) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘}))
78	77	rgen 3081	. . 3 ⊢ ∀𝑘 ∈ ℤ ((♯‘∅)C𝑘) = (♯‘{𝑥 ∈ 𝒫 ∅ ∣ (♯‘𝑥) = 𝑘})
79		oveq2 7408	. . . . . 6 ⊢ (𝑘 = 𝑗 → ((♯‘𝑦)C𝑘) = ((♯‘𝑦)C𝑗))
80		eqeq2 2777	. . . . . . . . 9 ⊢ (𝑘 = 𝑗 → ((♯‘𝑥) = 𝑘 ↔ (♯‘𝑥) = 𝑗))
81	80	rabbidv 3424	. . . . . . . 8 ⊢ (𝑘 = 𝑗 → {𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘} = {𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑗})
82		fveqeq2 6880	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → ((♯‘𝑥) = 𝑗 ↔ (♯‘𝑧) = 𝑗))
83	82	cbvrabv 3427	. . . . . . . 8 ⊢ {𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑗} = {𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}
84	81, 83	eqtrdi 2816	. . . . . . 7 ⊢ (𝑘 = 𝑗 → {𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘} = {𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗})
85	84	fveq2d 6875	. . . . . 6 ⊢ (𝑘 = 𝑗 → (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘}) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))
86	79, 85	eqeq12d 2781	. . . . 5 ⊢ (𝑘 = 𝑗 → (((♯‘𝑦)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘}) ↔ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗})))
87	86	cbvralvw 3243	. . . 4 ⊢ (∀𝑘 ∈ ℤ ((♯‘𝑦)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘}) ↔ ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))
88		simpll 778	. . . . . . 7 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑘 ∈ ℤ ∧ ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))) → 𝑦 ∈ Fin)
89		simplr 780	. . . . . . 7 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑘 ∈ ℤ ∧ ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))) → ¬ 𝑧 ∈ 𝑦)
90		simprr 784	. . . . . . . 8 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑘 ∈ ℤ ∧ ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))) → ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))
91	83	fveq2i 6874	. . . . . . . . . 10 ⊢ (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑗}) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗})
92	91	eqeq2i 2778	. . . . . . . . 9 ⊢ (((♯‘𝑦)C𝑗) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑗}) ↔ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))
93	92	ralbii 3111	. . . . . . . 8 ⊢ (∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑗}) ↔ ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))
94	90, 93	sylibr 237	. . . . . . 7 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑘 ∈ ℤ ∧ ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))) → ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑗}))
95		simprl 782	. . . . . . 7 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑘 ∈ ℤ ∧ ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))) → 𝑘 ∈ ℤ)
96	88, 89, 94, 95	hashbclem 14477	. . . . . 6 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (𝑘 ∈ ℤ ∧ ∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}))) → ((♯‘(𝑦 ∪ {𝑧}))C𝑘) = (♯‘{𝑥 ∈ 𝒫 (𝑦 ∪ {𝑧}) ∣ (♯‘𝑥) = 𝑘}))
97	96	expr 461	. . . . 5 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑘 ∈ ℤ) → (∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}) → ((♯‘(𝑦 ∪ {𝑧}))C𝑘) = (♯‘{𝑥 ∈ 𝒫 (𝑦 ∪ {𝑧}) ∣ (♯‘𝑥) = 𝑘})))
98	97	ralrimdva 3165	. . . 4 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑗 ∈ ℤ ((♯‘𝑦)C𝑗) = (♯‘{𝑧 ∈ 𝒫 𝑦 ∣ (♯‘𝑧) = 𝑗}) → ∀𝑘 ∈ ℤ ((♯‘(𝑦 ∪ {𝑧}))C𝑘) = (♯‘{𝑥 ∈ 𝒫 (𝑦 ∪ {𝑧}) ∣ (♯‘𝑥) = 𝑘})))
99	87, 98	biimtrid 245	. . 3 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑘 ∈ ℤ ((♯‘𝑦)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝑦 ∣ (♯‘𝑥) = 𝑘}) → ∀𝑘 ∈ ℤ ((♯‘(𝑦 ∪ {𝑧}))C𝑘) = (♯‘{𝑥 ∈ 𝒫 (𝑦 ∪ {𝑧}) ∣ (♯‘𝑥) = 𝑘})))
100	7, 14, 21, 28, 78, 99	findcard2s 9138	. 2 ⊢ (𝐴 ∈ Fin → ∀𝑘 ∈ ℤ ((♯‘𝐴)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘}))
101		oveq2 7408	. . . 4 ⊢ (𝑘 = 𝐾 → ((♯‘𝐴)C𝑘) = ((♯‘𝐴)C𝐾))
102		eqeq2 2777	. . . . . 6 ⊢ (𝑘 = 𝐾 → ((♯‘𝑥) = 𝑘 ↔ (♯‘𝑥) = 𝐾))
103	102	rabbidv 3424	. . . . 5 ⊢ (𝑘 = 𝐾 → {𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘} = {𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝐾})
104	103	fveq2d 6875	. . . 4 ⊢ (𝑘 = 𝐾 → (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘}) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝐾}))
105	101, 104	eqeq12d 2781	. . 3 ⊢ (𝑘 = 𝐾 → (((♯‘𝐴)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘}) ↔ ((♯‘𝐴)C𝐾) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝐾})))
106	105	rspccva 3583	. 2 ⊢ ((∀𝑘 ∈ ℤ ((♯‘𝐴)C𝑘) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝑘}) ∧ 𝐾 ∈ ℤ) → ((♯‘𝐴)C𝐾) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝐾}))
107	100, 106	sylan 591	1 ⊢ ((𝐴 ∈ Fin ∧ 𝐾 ∈ ℤ) → ((♯‘𝐴)C𝐾) = (♯‘{𝑥 ∈ 𝒫 𝐴 ∣ (♯‘𝑥) = 𝐾}))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 400   = wceq 1563   ∈ wcel 2145  ∀wral 3079  {crab 3417  Vcvv 3457   ∪ cun 3905  ∅c0 4288  𝒫 cpw 4558  {csn 4585  ‘cfv 6525  (class class class)co 7400  Fincfn 8931  0cc0 11088  1c1 11089  ℕ₀cn0 12492  ℤcz 12579  ...cfz 13523  Ccbc 14326  ♯chash 14354

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-sep 5250  ax-nul 5260  ax-pow 5326  ax-pr 5394  ax-un 7722  ax-cnex 11144  ax-resscn 11145  ax-1cn 11146  ax-icn 11147  ax-addcl 11148  ax-addrcl 11149  ax-mulcl 11150  ax-mulrcl 11151  ax-mulcom 11152  ax-addass 11153  ax-mulass 11154  ax-distr 11155  ax-i2m1 11156  ax-1ne0 11157  ax-1rid 11158  ax-rnegex 11159  ax-rrecex 11160  ax-cnre 11161  ax-pre-lttri 11162  ax-pre-lttrn 11163  ax-pre-ltadd 11164  ax-pre-mulgt0 11165

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3370  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4868  df-int 4908  df-iun 4953  df-br 5105  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  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-pred 6291  df-ord 6352  df-on 6353  df-lim 6354  df-suc 6355  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-riota 7357  df-ov 7403  df-oprab 7404  df-mpo 7405  df-om 7851  df-1st 7974  df-2nd 7975  df-frecs 8266  df-wrecs 8297  df-recs 8346  df-rdg 8385  df-1o 8441  df-oadd 8445  df-er 8682  df-en 8932  df-dom 8933  df-sdom 8934  df-fin 8935  df-dju 9875  df-card 9913  df-pnf 11233  df-mnf 11234  df-xr 11235  df-ltxr 11236  df-le 11237  df-sub 11431  df-neg 11432  df-div 11860  df-nn 12222  df-n0 12493  df-z 12580  df-uz 12851  df-rp 13005  df-fz 13524  df-seq 14026  df-fac 14298  df-bc 14327  df-hash 14355

This theorem is referenced by:  hashbc2  17054  sylow1lem1  19656  musum  27309  esplympl  33869  ballotlem1  34789  ballotlem2  34791  sticksstones5  42774