birthdaylem3 - Metamath Proof Explorer

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

Theorem birthdaylem3 25531

Description: For general 𝑁 and 𝐾, upper-bound the fraction of injective functions from 1...𝐾 to 1...𝑁. (Contributed by Mario Carneiro, 17-Apr-2015.)

**Hypotheses**
Ref	Expression
birthday.s	⊢ 𝑆 = {𝑓 ∣ 𝑓:(1...𝐾)⟶(1...𝑁)}
birthday.t	⊢ 𝑇 = {𝑓 ∣ 𝑓:(1...𝐾)–1-1→(1...𝑁)}

**Assertion**
Ref	Expression
birthdaylem3	⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ((♯‘𝑇) / (♯‘𝑆)) ≤ (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁)))

Distinct variable groups: 𝑓,𝐾 𝑓,𝑁 Allowed substitution hints: 𝑆(𝑓) 𝑇(𝑓)

Proof of Theorem birthdaylem3 Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		birthday.t	. . . . . . . 8 ⊢ 𝑇 = {𝑓 ∣ 𝑓:(1...𝐾)–1-1→(1...𝑁)}
2		abn0 4336	. . . . . . . . . . . 12 ⊢ ({𝑓 ∣ 𝑓:(1...𝐾)–1-1→(1...𝑁)} ≠ ∅ ↔ ∃𝑓 𝑓:(1...𝐾)–1-1→(1...𝑁))
3		ovex 7189	. . . . . . . . . . . . 13 ⊢ (1...𝑁) ∈ V
4	3	brdom 8521	. . . . . . . . . . . 12 ⊢ ((1...𝐾) ≼ (1...𝑁) ↔ ∃𝑓 𝑓:(1...𝐾)–1-1→(1...𝑁))
5	2, 4	bitr4i 280	. . . . . . . . . . 11 ⊢ ({𝑓 ∣ 𝑓:(1...𝐾)–1-1→(1...𝑁)} ≠ ∅ ↔ (1...𝐾) ≼ (1...𝑁))
6		hashfz1 13707	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ ℕ₀ → (♯‘(1...𝐾)) = 𝐾)
7		nnnn0 11905	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℕ₀)
8		hashfz1 13707	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℕ₀ → (♯‘(1...𝑁)) = 𝑁)
9	7, 8	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → (♯‘(1...𝑁)) = 𝑁)
10	6, 9	breqan12d 5082	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ((♯‘(1...𝐾)) ≤ (♯‘(1...𝑁)) ↔ 𝐾 ≤ 𝑁))
11		fzfid 13342	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → (1...𝐾) ∈ Fin)
12		fzfid 13342	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → (1...𝑁) ∈ Fin)
13		hashdom 13741	. . . . . . . . . . . . 13 ⊢ (((1...𝐾) ∈ Fin ∧ (1...𝑁) ∈ Fin) → ((♯‘(1...𝐾)) ≤ (♯‘(1...𝑁)) ↔ (1...𝐾) ≼ (1...𝑁)))
14	11, 12, 13	syl2anc 586	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ((♯‘(1...𝐾)) ≤ (♯‘(1...𝑁)) ↔ (1...𝐾) ≼ (1...𝑁)))
15		nn0re 11907	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ ℕ₀ → 𝐾 ∈ ℝ)
16		nnre 11645	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℝ)
17		lenlt 10719	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (𝐾 ≤ 𝑁 ↔ ¬ 𝑁 < 𝐾))
18	15, 16, 17	syl2an 597	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → (𝐾 ≤ 𝑁 ↔ ¬ 𝑁 < 𝐾))
19	10, 14, 18	3bitr3d 311	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ((1...𝐾) ≼ (1...𝑁) ↔ ¬ 𝑁 < 𝐾))
20	5, 19	syl5bb 285	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ({𝑓 ∣ 𝑓:(1...𝐾)–1-1→(1...𝑁)} ≠ ∅ ↔ ¬ 𝑁 < 𝐾))
21	20	necon4abid 3056	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ({𝑓 ∣ 𝑓:(1...𝐾)–1-1→(1...𝑁)} = ∅ ↔ 𝑁 < 𝐾))
22	21	biimpar 480	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → {𝑓 ∣ 𝑓:(1...𝐾)–1-1→(1...𝑁)} = ∅)
23	1, 22	syl5eq 2868	. . . . . . 7 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → 𝑇 = ∅)
24	23	fveq2d 6674	. . . . . 6 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → (♯‘𝑇) = (♯‘∅))
25		hash0 13729	. . . . . 6 ⊢ (♯‘∅) = 0
26	24, 25	syl6eq 2872	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → (♯‘𝑇) = 0)
27	26	oveq1d 7171	. . . 4 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → ((♯‘𝑇) / (♯‘𝑆)) = (0 / (♯‘𝑆)))
28		birthday.s	. . . . . . . . . 10 ⊢ 𝑆 = {𝑓 ∣ 𝑓:(1...𝐾)⟶(1...𝑁)}
29	28, 1	birthdaylem1 25529	. . . . . . . . 9 ⊢ (𝑇 ⊆ 𝑆 ∧ 𝑆 ∈ Fin ∧ (𝑁 ∈ ℕ → 𝑆 ≠ ∅))
30	29	simp3i 1137	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝑆 ≠ ∅)
31	30	ad2antlr 725	. . . . . . 7 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → 𝑆 ≠ ∅)
32	29	simp2i 1136	. . . . . . . 8 ⊢ 𝑆 ∈ Fin
33		hashnncl 13728	. . . . . . . 8 ⊢ (𝑆 ∈ Fin → ((♯‘𝑆) ∈ ℕ ↔ 𝑆 ≠ ∅))
34	32, 33	ax-mp 5	. . . . . . 7 ⊢ ((♯‘𝑆) ∈ ℕ ↔ 𝑆 ≠ ∅)
35	31, 34	sylibr 236	. . . . . 6 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → (♯‘𝑆) ∈ ℕ)
36	35	nncnd 11654	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → (♯‘𝑆) ∈ ℂ)
37	35	nnne0d 11688	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → (♯‘𝑆) ≠ 0)
38	36, 37	div0d 11415	. . . 4 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → (0 / (♯‘𝑆)) = 0)
39	27, 38	eqtrd 2856	. . 3 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → ((♯‘𝑇) / (♯‘𝑆)) = 0)
40	15	adantr 483	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → 𝐾 ∈ ℝ)
41	40	resqcld 13612	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → (𝐾↑2) ∈ ℝ)
42	41, 40	resubcld 11068	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ((𝐾↑2) − 𝐾) ∈ ℝ)
43	42	rehalfcld 11885	. . . . . . . 8 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → (((𝐾↑2) − 𝐾) / 2) ∈ ℝ)
44		nndivre 11679	. . . . . . . 8 ⊢ (((((𝐾↑2) − 𝐾) / 2) ∈ ℝ ∧ 𝑁 ∈ ℕ) → ((((𝐾↑2) − 𝐾) / 2) / 𝑁) ∈ ℝ)
45	43, 44	sylancom 590	. . . . . . 7 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ((((𝐾↑2) − 𝐾) / 2) / 𝑁) ∈ ℝ)
46	45	renegcld 11067	. . . . . 6 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → -((((𝐾↑2) − 𝐾) / 2) / 𝑁) ∈ ℝ)
47	46	adantr 483	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → -((((𝐾↑2) − 𝐾) / 2) / 𝑁) ∈ ℝ)
48	47	rpefcld 15458	. . . 4 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁)) ∈ ℝ⁺)
49	48	rpge0d 12436	. . 3 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → 0 ≤ (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁)))
50	39, 49	eqbrtrd 5088	. 2 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝑁 < 𝐾) → ((♯‘𝑇) / (♯‘𝑆)) ≤ (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁)))
51		simplr 767	. . . 4 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝑁 ∈ ℕ)
52		simpr 487	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝐾 ≤ 𝑁)
53		simpll 765	. . . . . . 7 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝐾 ∈ ℕ₀)
54		nn0uz 12281	. . . . . . 7 ⊢ ℕ₀ = (ℤ_≥‘0)
55	53, 54	eleqtrdi 2923	. . . . . 6 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝐾 ∈ (ℤ_≥‘0))
56		nnz 12005	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
57	56	ad2antlr 725	. . . . . 6 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝑁 ∈ ℤ)
58		elfz5 12901	. . . . . 6 ⊢ ((𝐾 ∈ (ℤ_≥‘0) ∧ 𝑁 ∈ ℤ) → (𝐾 ∈ (0...𝑁) ↔ 𝐾 ≤ 𝑁))
59	55, 57, 58	syl2anc 586	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (𝐾 ∈ (0...𝑁) ↔ 𝐾 ≤ 𝑁))
60	52, 59	mpbird 259	. . . 4 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝐾 ∈ (0...𝑁))
61	28, 1	birthdaylem2 25530	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (0...𝑁)) → ((♯‘𝑇) / (♯‘𝑆)) = (exp‘Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁)))))
62	51, 60, 61	syl2anc 586	. . 3 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → ((♯‘𝑇) / (♯‘𝑆)) = (exp‘Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁)))))
63		fzfid 13342	. . . . . 6 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (0...(𝐾 − 1)) ∈ Fin)
64		elfznn0 13001	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ (0...(𝐾 − 1)) → 𝑘 ∈ ℕ₀)
65	64	adantl 484	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑘 ∈ ℕ₀)
66	65	nn0red 11957	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑘 ∈ ℝ)
67	53	nn0red 11957	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝐾 ∈ ℝ)
68		peano2rem 10953	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ ℝ → (𝐾 − 1) ∈ ℝ)
69	67, 68	syl 17	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (𝐾 − 1) ∈ ℝ)
70	69	adantr 483	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (𝐾 − 1) ∈ ℝ)
71	51	adantr 483	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑁 ∈ ℕ)
72	71	nnred 11653	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑁 ∈ ℝ)
73		elfzle2 12912	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ (0...(𝐾 − 1)) → 𝑘 ≤ (𝐾 − 1))
74	73	adantl 484	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑘 ≤ (𝐾 − 1))
75	51	nnred 11653	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝑁 ∈ ℝ)
76	67	ltm1d 11572	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (𝐾 − 1) < 𝐾)
77	69, 67, 75, 76, 52	ltletrd 10800	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (𝐾 − 1) < 𝑁)
78	77	adantr 483	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (𝐾 − 1) < 𝑁)
79	66, 70, 72, 74, 78	lelttrd 10798	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑘 < 𝑁)
80	71	nncnd 11654	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑁 ∈ ℂ)
81	80	mulid1d 10658	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (𝑁 · 1) = 𝑁)
82	79, 81	breqtrrd 5094	. . . . . . . . 9 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑘 < (𝑁 · 1))
83		1red 10642	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 1 ∈ ℝ)
84	71	nngt0d 11687	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 0 < 𝑁)
85		ltdivmul 11515	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℝ ∧ 1 ∈ ℝ ∧ (𝑁 ∈ ℝ ∧ 0 < 𝑁)) → ((𝑘 / 𝑁) < 1 ↔ 𝑘 < (𝑁 · 1)))
86	66, 83, 72, 84, 85	syl112anc 1370	. . . . . . . . 9 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → ((𝑘 / 𝑁) < 1 ↔ 𝑘 < (𝑁 · 1)))
87	82, 86	mpbird 259	. . . . . . . 8 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (𝑘 / 𝑁) < 1)
88	66, 71	nndivred 11692	. . . . . . . . 9 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (𝑘 / 𝑁) ∈ ℝ)
89		1re 10641	. . . . . . . . 9 ⊢ 1 ∈ ℝ
90		difrp 12428	. . . . . . . . 9 ⊢ (((𝑘 / 𝑁) ∈ ℝ ∧ 1 ∈ ℝ) → ((𝑘 / 𝑁) < 1 ↔ (1 − (𝑘 / 𝑁)) ∈ ℝ⁺))
91	88, 89, 90	sylancl 588	. . . . . . . 8 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → ((𝑘 / 𝑁) < 1 ↔ (1 − (𝑘 / 𝑁)) ∈ ℝ⁺))
92	87, 91	mpbid 234	. . . . . . 7 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (1 − (𝑘 / 𝑁)) ∈ ℝ⁺)
93	92	relogcld 25206	. . . . . 6 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (log‘(1 − (𝑘 / 𝑁))) ∈ ℝ)
94	88	renegcld 11067	. . . . . 6 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → -(𝑘 / 𝑁) ∈ ℝ)
95		elfzle1 12911	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ (0...(𝐾 − 1)) → 0 ≤ 𝑘)
96	95	adantl 484	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 0 ≤ 𝑘)
97		divge0 11509	. . . . . . . . . . 11 ⊢ (((𝑘 ∈ ℝ ∧ 0 ≤ 𝑘) ∧ (𝑁 ∈ ℝ ∧ 0 < 𝑁)) → 0 ≤ (𝑘 / 𝑁))
98	66, 96, 72, 84, 97	syl22anc 836	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 0 ≤ (𝑘 / 𝑁))
99	88, 98, 87	eflegeo 15474	. . . . . . . . 9 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (exp‘(𝑘 / 𝑁)) ≤ (1 / (1 − (𝑘 / 𝑁))))
100	88	reefcld 15441	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (exp‘(𝑘 / 𝑁)) ∈ ℝ)
101		efgt0 15456	. . . . . . . . . . 11 ⊢ ((𝑘 / 𝑁) ∈ ℝ → 0 < (exp‘(𝑘 / 𝑁)))
102	88, 101	syl 17	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 0 < (exp‘(𝑘 / 𝑁)))
103	92	rpregt0d 12438	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → ((1 − (𝑘 / 𝑁)) ∈ ℝ ∧ 0 < (1 − (𝑘 / 𝑁))))
104		lerec2 11528	. . . . . . . . . 10 ⊢ ((((exp‘(𝑘 / 𝑁)) ∈ ℝ ∧ 0 < (exp‘(𝑘 / 𝑁))) ∧ ((1 − (𝑘 / 𝑁)) ∈ ℝ ∧ 0 < (1 − (𝑘 / 𝑁)))) → ((exp‘(𝑘 / 𝑁)) ≤ (1 / (1 − (𝑘 / 𝑁))) ↔ (1 − (𝑘 / 𝑁)) ≤ (1 / (exp‘(𝑘 / 𝑁)))))
105	100, 102, 103, 104	syl21anc 835	. . . . . . . . 9 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → ((exp‘(𝑘 / 𝑁)) ≤ (1 / (1 − (𝑘 / 𝑁))) ↔ (1 − (𝑘 / 𝑁)) ≤ (1 / (exp‘(𝑘 / 𝑁)))))
106	99, 105	mpbid 234	. . . . . . . 8 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (1 − (𝑘 / 𝑁)) ≤ (1 / (exp‘(𝑘 / 𝑁))))
107	92	reeflogd 25207	. . . . . . . 8 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (exp‘(log‘(1 − (𝑘 / 𝑁)))) = (1 − (𝑘 / 𝑁)))
108	88	recnd 10669	. . . . . . . . 9 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (𝑘 / 𝑁) ∈ ℂ)
109		efneg 15451	. . . . . . . . 9 ⊢ ((𝑘 / 𝑁) ∈ ℂ → (exp‘-(𝑘 / 𝑁)) = (1 / (exp‘(𝑘 / 𝑁))))
110	108, 109	syl 17	. . . . . . . 8 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (exp‘-(𝑘 / 𝑁)) = (1 / (exp‘(𝑘 / 𝑁))))
111	106, 107, 110	3brtr4d 5098	. . . . . . 7 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (exp‘(log‘(1 − (𝑘 / 𝑁)))) ≤ (exp‘-(𝑘 / 𝑁)))
112		efle 15471	. . . . . . . 8 ⊢ (((log‘(1 − (𝑘 / 𝑁))) ∈ ℝ ∧ -(𝑘 / 𝑁) ∈ ℝ) → ((log‘(1 − (𝑘 / 𝑁))) ≤ -(𝑘 / 𝑁) ↔ (exp‘(log‘(1 − (𝑘 / 𝑁)))) ≤ (exp‘-(𝑘 / 𝑁))))
113	93, 94, 112	syl2anc 586	. . . . . . 7 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → ((log‘(1 − (𝑘 / 𝑁))) ≤ -(𝑘 / 𝑁) ↔ (exp‘(log‘(1 − (𝑘 / 𝑁)))) ≤ (exp‘-(𝑘 / 𝑁))))
114	111, 113	mpbird 259	. . . . . 6 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → (log‘(1 − (𝑘 / 𝑁))) ≤ -(𝑘 / 𝑁))
115	63, 93, 94, 114	fsumle 15154	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁))) ≤ Σ𝑘 ∈ (0...(𝐾 − 1))-(𝑘 / 𝑁))
116	63, 108	fsumneg 15142	. . . . . 6 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → Σ𝑘 ∈ (0...(𝐾 − 1))-(𝑘 / 𝑁) = -Σ𝑘 ∈ (0...(𝐾 − 1))(𝑘 / 𝑁))
117	51	nncnd 11654	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝑁 ∈ ℂ)
118	66	recnd 10669	. . . . . . . . 9 ⊢ ((((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) ∧ 𝑘 ∈ (0...(𝐾 − 1))) → 𝑘 ∈ ℂ)
119		nnne0 11672	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ≠ 0)
120	119	ad2antlr 725	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → 𝑁 ≠ 0)
121	63, 117, 118, 120	fsumdivc 15141	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (Σ𝑘 ∈ (0...(𝐾 − 1))𝑘 / 𝑁) = Σ𝑘 ∈ (0...(𝐾 − 1))(𝑘 / 𝑁))
122		arisum2 15216	. . . . . . . . . 10 ⊢ (𝐾 ∈ ℕ₀ → Σ𝑘 ∈ (0...(𝐾 − 1))𝑘 = (((𝐾↑2) − 𝐾) / 2))
123	53, 122	syl 17	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → Σ𝑘 ∈ (0...(𝐾 − 1))𝑘 = (((𝐾↑2) − 𝐾) / 2))
124	123	oveq1d 7171	. . . . . . . 8 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (Σ𝑘 ∈ (0...(𝐾 − 1))𝑘 / 𝑁) = ((((𝐾↑2) − 𝐾) / 2) / 𝑁))
125	121, 124	eqtr3d 2858	. . . . . . 7 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → Σ𝑘 ∈ (0...(𝐾 − 1))(𝑘 / 𝑁) = ((((𝐾↑2) − 𝐾) / 2) / 𝑁))
126	125	negeqd 10880	. . . . . 6 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → -Σ𝑘 ∈ (0...(𝐾 − 1))(𝑘 / 𝑁) = -((((𝐾↑2) − 𝐾) / 2) / 𝑁))
127	116, 126	eqtrd 2856	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → Σ𝑘 ∈ (0...(𝐾 − 1))-(𝑘 / 𝑁) = -((((𝐾↑2) − 𝐾) / 2) / 𝑁))
128	115, 127	breqtrd 5092	. . . 4 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁))) ≤ -((((𝐾↑2) − 𝐾) / 2) / 𝑁))
129	63, 93	fsumrecl 15091	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁))) ∈ ℝ)
130	46	adantr 483	. . . . 5 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → -((((𝐾↑2) − 𝐾) / 2) / 𝑁) ∈ ℝ)
131		efle 15471	. . . . 5 ⊢ ((Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁))) ∈ ℝ ∧ -((((𝐾↑2) − 𝐾) / 2) / 𝑁) ∈ ℝ) → (Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁))) ≤ -((((𝐾↑2) − 𝐾) / 2) / 𝑁) ↔ (exp‘Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁)))) ≤ (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁))))
132	129, 130, 131	syl2anc 586	. . . 4 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁))) ≤ -((((𝐾↑2) − 𝐾) / 2) / 𝑁) ↔ (exp‘Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁)))) ≤ (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁))))
133	128, 132	mpbid 234	. . 3 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → (exp‘Σ𝑘 ∈ (0...(𝐾 − 1))(log‘(1 − (𝑘 / 𝑁)))) ≤ (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁)))
134	62, 133	eqbrtrd 5088	. 2 ⊢ (((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) ∧ 𝐾 ≤ 𝑁) → ((♯‘𝑇) / (♯‘𝑆)) ≤ (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁)))
135	16	adantl 484	. 2 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → 𝑁 ∈ ℝ)
136	50, 134, 135, 40	ltlecasei 10748	1 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑁 ∈ ℕ) → ((♯‘𝑇) / (♯‘𝑆)) ≤ (exp‘-((((𝐾↑2) − 𝐾) / 2) / 𝑁)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 208 ∧ wa 398 = wceq 1537 ∃wex 1780 ∈ wcel 2114 {cab 2799 ≠ wne 3016 ⊆ wss 3936 ∅c0 4291 class class class wbr 5066 ⟶wf 6351 –1-1→wf1 6352 ‘cfv 6355 (class class class)co 7156 ≼ cdom 8507 Fincfn 8509 ℂcc 10535 ℝcr 10536 0cc0 10537 1c1 10538 · cmul 10542 < clt 10675 ≤ cle 10676 − cmin 10870 -cneg 10871 / cdiv 11297 ℕcn 11638 2c2 11693 ℕ₀cn0 11898 ℤcz 11982 ℤ_≥cuz 12244 ℝ⁺crp 12390 ...cfz 12893 ↑cexp 13430 ♯chash 13691 Σcsu 15042 expce 15415 logclog 25138

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 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2793 ax-rep 5190 ax-sep 5203 ax-nul 5210 ax-pow 5266 ax-pr 5330 ax-un 7461 ax-inf2 9104 ax-cnex 10593 ax-resscn 10594 ax-1cn 10595 ax-icn 10596 ax-addcl 10597 ax-addrcl 10598 ax-mulcl 10599 ax-mulrcl 10600 ax-mulcom 10601 ax-addass 10602 ax-mulass 10603 ax-distr 10604 ax-i2m1 10605 ax-1ne0 10606 ax-1rid 10607 ax-rnegex 10608 ax-rrecex 10609 ax-cnre 10610 ax-pre-lttri 10611 ax-pre-lttrn 10612 ax-pre-ltadd 10613 ax-pre-mulgt0 10614 ax-pre-sup 10615 ax-addf 10616 ax-mulf 10617

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-fal 1550 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-nel 3124 df-ral 3143 df-rex 3144 df-reu 3145 df-rmo 3146 df-rab 3147 df-v 3496 df-sbc 3773 df-csb 3884 df-dif 3939 df-un 3941 df-in 3943 df-ss 3952 df-pss 3954 df-nul 4292 df-if 4468 df-pw 4541 df-sn 4568 df-pr 4570 df-tp 4572 df-op 4574 df-uni 4839 df-int 4877 df-iun 4921 df-iin 4922 df-br 5067 df-opab 5129 df-mpt 5147 df-tr 5173 df-id 5460 df-eprel 5465 df-po 5474 df-so 5475 df-fr 5514 df-se 5515 df-we 5516 df-xp 5561 df-rel 5562 df-cnv 5563 df-co 5564 df-dm 5565 df-rn 5566 df-res 5567 df-ima 5568 df-pred 6148 df-ord 6194 df-on 6195 df-lim 6196 df-suc 6197 df-iota 6314 df-fun 6357 df-fn 6358 df-f 6359 df-f1 6360 df-fo 6361 df-f1o 6362 df-fv 6363 df-isom 6364 df-riota 7114 df-ov 7159 df-oprab 7160 df-mpo 7161 df-of 7409 df-om 7581 df-1st 7689 df-2nd 7690 df-supp 7831 df-wrecs 7947 df-recs 8008 df-rdg 8046 df-1o 8102 df-2o 8103 df-oadd 8106 df-er 8289 df-map 8408 df-pm 8409 df-ixp 8462 df-en 8510 df-dom 8511 df-sdom 8512 df-fin 8513 df-fsupp 8834 df-fi 8875 df-sup 8906 df-inf 8907 df-oi 8974 df-dju 9330 df-card 9368 df-pnf 10677 df-mnf 10678 df-xr 10679 df-ltxr 10680 df-le 10681 df-sub 10872 df-neg 10873 df-div 11298 df-nn 11639 df-2 11701 df-3 11702 df-4 11703 df-5 11704 df-6 11705 df-7 11706 df-8 11707 df-9 11708 df-n0 11899 df-xnn0 11969 df-z 11983 df-dec 12100 df-uz 12245 df-q 12350 df-rp 12391 df-xneg 12508 df-xadd 12509 df-xmul 12510 df-ioo 12743 df-ioc 12744 df-ico 12745 df-icc 12746 df-fz 12894 df-fzo 13035 df-fl 13163 df-mod 13239 df-seq 13371 df-exp 13431 df-fac 13635 df-bc 13664 df-hash 13692 df-shft 14426 df-cj 14458 df-re 14459 df-im 14460 df-sqrt 14594 df-abs 14595 df-limsup 14828 df-clim 14845 df-rlim 14846 df-sum 15043 df-ef 15421 df-sin 15423 df-cos 15424 df-pi 15426 df-struct 16485 df-ndx 16486 df-slot 16487 df-base 16489 df-sets 16490 df-ress 16491 df-plusg 16578 df-mulr 16579 df-starv 16580 df-sca 16581 df-vsca 16582 df-ip 16583 df-tset 16584 df-ple 16585 df-ds 16587 df-unif 16588 df-hom 16589 df-cco 16590 df-rest 16696 df-topn 16697 df-0g 16715 df-gsum 16716 df-topgen 16717 df-pt 16718 df-prds 16721 df-xrs 16775 df-qtop 16780 df-imas 16781 df-xps 16783 df-mre 16857 df-mrc 16858 df-acs 16860 df-mgm 17852 df-sgrp 17901 df-mnd 17912 df-submnd 17957 df-mulg 18225 df-cntz 18447 df-cmn 18908 df-psmet 20537 df-xmet 20538 df-met 20539 df-bl 20540 df-mopn 20541 df-fbas 20542 df-fg 20543 df-cnfld 20546 df-top 21502 df-topon 21519 df-topsp 21541 df-bases 21554 df-cld 21627 df-ntr 21628 df-cls 21629 df-nei 21706 df-lp 21744 df-perf 21745 df-cn 21835 df-cnp 21836 df-haus 21923 df-tx 22170 df-hmeo 22363 df-fil 22454 df-fm 22546 df-flim 22547 df-flf 22548 df-xms 22930 df-ms 22931 df-tms 22932 df-cncf 23486 df-limc 24464 df-dv 24465 df-log 25140

This theorem is referenced by: birthday 25532

W3C validator