aaliou3lem8 - Metamath Proof Explorer

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

Theorem aaliou3lem8 26325

Description: Lemma for aaliou3 26331. (Contributed by Stefan O'Rear, 20-Nov-2014.)

**Assertion**
Ref	Expression
aaliou3lem8	⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) → ∃𝑥 ∈ ℕ (2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)))

Distinct variable groups: 𝑥,𝐴 𝑥,𝐵

Proof of Theorem aaliou3lem8 Dummy variable 𝑎 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		2rp 12941	. . . . . 6 ⊢ 2 ∈ ℝ⁺
2		rpdivcl 12963	. . . . . 6 ⊢ ((2 ∈ ℝ⁺ ∧ 𝐵 ∈ ℝ⁺) → (2 / 𝐵) ∈ ℝ⁺)
3	1, 2	mpan 691	. . . . 5 ⊢ (𝐵 ∈ ℝ⁺ → (2 / 𝐵) ∈ ℝ⁺)
4	3	rpred 12980	. . . 4 ⊢ (𝐵 ∈ ℝ⁺ → (2 / 𝐵) ∈ ℝ)
5		2re 12249	. . . . 5 ⊢ 2 ∈ ℝ
6		1lt2 12341	. . . . 5 ⊢ 1 < 2
7		expnbnd 14188	. . . . 5 ⊢ (((2 / 𝐵) ∈ ℝ ∧ 2 ∈ ℝ ∧ 1 < 2) → ∃𝑎 ∈ ℕ (2 / 𝐵) < (2↑𝑎))
8	5, 6, 7	mp3an23 1456	. . . 4 ⊢ ((2 / 𝐵) ∈ ℝ → ∃𝑎 ∈ ℕ (2 / 𝐵) < (2↑𝑎))
9	4, 8	syl 17	. . 3 ⊢ (𝐵 ∈ ℝ⁺ → ∃𝑎 ∈ ℕ (2 / 𝐵) < (2↑𝑎))
10	9	adantl 481	. 2 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) → ∃𝑎 ∈ ℕ (2 / 𝐵) < (2↑𝑎))
11		simprl 771	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℕ)
12		simpll 767	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐴 ∈ ℕ)
13		nnaddm1cl 12580	. . . 4 ⊢ ((𝑎 ∈ ℕ ∧ 𝐴 ∈ ℕ) → ((𝑎 + 𝐴) − 1) ∈ ℕ)
14	11, 12, 13	syl2anc 585	. . 3 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((𝑎 + 𝐴) − 1) ∈ ℕ)
15		simplr 769	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐵 ∈ ℝ⁺)
16		rerpdivcl 12968	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ 𝐵 ∈ ℝ⁺) → (2 / 𝐵) ∈ ℝ)
17	5, 15, 16	sylancr 588	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) ∈ ℝ)
18	11	nnnn0d 12492	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℕ₀)
19		reexpcl 14034	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ 𝑎 ∈ ℕ₀) → (2↑𝑎) ∈ ℝ)
20	5, 18, 19	sylancr 588	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑𝑎) ∈ ℝ)
21	11, 12	nnaddcld 12223	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝑎 + 𝐴) ∈ ℕ)
22		nnm1nn0 12472	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 + 𝐴) ∈ ℕ → ((𝑎 + 𝐴) − 1) ∈ ℕ₀)
23	21, 22	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((𝑎 + 𝐴) − 1) ∈ ℕ₀)
24		peano2nn0 12471	. . . . . . . . . . . . . . 15 ⊢ (((𝑎 + 𝐴) − 1) ∈ ℕ₀ → (((𝑎 + 𝐴) − 1) + 1) ∈ ℕ₀)
25	23, 24	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (((𝑎 + 𝐴) − 1) + 1) ∈ ℕ₀)
26	25	faccld 14240	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℕ)
27	26	nnzd 12544	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℤ)
28	23	faccld 14240	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℕ)
29	28	nnzd 12544	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℤ)
30	12	nnzd 12544	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐴 ∈ ℤ)
31	29, 30	zmulcld 12633	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘((𝑎 + 𝐴) − 1)) · 𝐴) ∈ ℤ)
32	27, 31	zsubcld 12632	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ ℤ)
33		rpexpcl 14036	. . . . . . . . . . 11 ⊢ ((2 ∈ ℝ⁺ ∧ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ ℤ) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) ∈ ℝ⁺)
34	1, 32, 33	sylancr 588	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) ∈ ℝ⁺)
35	34	rpred 12980	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) ∈ ℝ)
36		simprr 773	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) < (2↑𝑎))
37	17, 20, 36	ltled 11288	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) ≤ (2↑𝑎))
38	5	a1i 11	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 2 ∈ ℝ)
39		1le2 12379	. . . . . . . . . . 11 ⊢ 1 ≤ 2
40	39	a1i 11	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 1 ≤ 2)
41	11	nnred 12183	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℝ)
42	28	nnred 12183	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℝ)
43	18	nn0ge0d 12495	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 0 ≤ 𝑎)
44	28	nnge1d 12219	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 1 ≤ (!‘((𝑎 + 𝐴) − 1)))
45	41, 42, 43, 44	lemulge12d 12088	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ≤ ((!‘((𝑎 + 𝐴) − 1)) · 𝑎))
46		facp1 14234	. . . . . . . . . . . . . . 15 ⊢ (((𝑎 + 𝐴) − 1) ∈ ℕ₀ → (!‘(((𝑎 + 𝐴) − 1) + 1)) = ((!‘((𝑎 + 𝐴) − 1)) · (((𝑎 + 𝐴) − 1) + 1)))
47	23, 46	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘(((𝑎 + 𝐴) − 1) + 1)) = ((!‘((𝑎 + 𝐴) − 1)) · (((𝑎 + 𝐴) − 1) + 1)))
48	47	oveq1d 7376	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) = (((!‘((𝑎 + 𝐴) − 1)) · (((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)))
49	28	nncnd 12184	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℂ)
50	25	nn0cnd 12494	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (((𝑎 + 𝐴) − 1) + 1) ∈ ℂ)
51	12	nncnd 12184	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐴 ∈ ℂ)
52	49, 50, 51	subdid 11600	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘((𝑎 + 𝐴) − 1)) · ((((𝑎 + 𝐴) − 1) + 1) − 𝐴)) = (((!‘((𝑎 + 𝐴) − 1)) · (((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)))
53	11	nncnd 12184	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℂ)
54	21	nncnd 12184	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝑎 + 𝐴) ∈ ℂ)
55		1cnd 11133	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 1 ∈ ℂ)
56	54, 55	npcand 11503	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (((𝑎 + 𝐴) − 1) + 1) = (𝑎 + 𝐴))
57	53, 51, 56	mvrraddd 11556	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((((𝑎 + 𝐴) − 1) + 1) − 𝐴) = 𝑎)
58	57	oveq2d 7377	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘((𝑎 + 𝐴) − 1)) · ((((𝑎 + 𝐴) − 1) + 1) − 𝐴)) = ((!‘((𝑎 + 𝐴) − 1)) · 𝑎))
59	48, 52, 58	3eqtr2d 2778	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) = ((!‘((𝑎 + 𝐴) − 1)) · 𝑎))
60	45, 59	breqtrrd 5114	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ≤ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)))
61	11	nnzd 12544	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℤ)
62		eluz 12796	. . . . . . . . . . . 12 ⊢ ((𝑎 ∈ ℤ ∧ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ ℤ) → (((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ (ℤ_≥‘𝑎) ↔ 𝑎 ≤ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
63	61, 32, 62	syl2anc 585	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ (ℤ_≥‘𝑎) ↔ 𝑎 ≤ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
64	60, 63	mpbird 257	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ (ℤ_≥‘𝑎))
65	38, 40, 64	leexp2ad 14210	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑𝑎) ≤ (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
66	17, 20, 35, 37, 65	letrd 11297	. . . . . . . 8 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) ≤ (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
67		rpcnne0 12955	. . . . . . . . . . 11 ⊢ (2 ∈ ℝ⁺ → (2 ∈ ℂ ∧ 2 ≠ 0))
68	1, 67	mp1i 13	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 ∈ ℂ ∧ 2 ≠ 0))
69		expsub 14066	. . . . . . . . . 10 ⊢ (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ ((!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℤ ∧ ((!‘((𝑎 + 𝐴) − 1)) · 𝐴) ∈ ℤ)) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / (2↑((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
70	68, 27, 31, 69	syl12anc 837	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / (2↑((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
71		2cn 12250	. . . . . . . . . . . 12 ⊢ 2 ∈ ℂ
72	71	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 2 ∈ ℂ)
73	12	nnnn0d 12492	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐴 ∈ ℕ₀)
74	28	nnnn0d 12492	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℕ₀)
75	72, 73, 74	expmuld 14105	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) = ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))
76	75	oveq2d 7377	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / (2↑((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))
77		rpexpcl 14036	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℝ⁺ ∧ (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℤ) → (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) ∈ ℝ⁺)
78	1, 27, 77	sylancr 588	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) ∈ ℝ⁺)
79	78	rpcnd 12982	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) ∈ ℂ)
80		rpexpcl 14036	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℝ⁺ ∧ (!‘((𝑎 + 𝐴) − 1)) ∈ ℤ) → (2↑(!‘((𝑎 + 𝐴) − 1))) ∈ ℝ⁺)
81	1, 29, 80	sylancr 588	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑(!‘((𝑎 + 𝐴) − 1))) ∈ ℝ⁺)
82	81, 30	rpexpcld 14203	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴) ∈ ℝ⁺)
83	82	rpcnd 12982	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴) ∈ ℂ)
84	82	rpne0d 12985	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴) ≠ 0)
85	79, 83, 84	divrecd 11928	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
86	70, 76, 85	3eqtrrd 2777	. . . . . . . 8 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) = (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
87	66, 86	breqtrrd 5114	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) ≤ ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
88	82	rpreccld 12990	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)) ∈ ℝ⁺)
89	78, 88	rpmulcld 12996	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ∈ ℝ⁺)
90	89	rpred 12980	. . . . . . . 8 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ∈ ℝ)
91	38, 90, 15	ledivmuld 13033	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2 / 𝐵) ≤ ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ↔ 2 ≤ (𝐵 · ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))))
92	87, 91	mpbid 232	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 2 ≤ (𝐵 · ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))))
93	15	rpcnd 12982	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐵 ∈ ℂ)
94	88	rpcnd 12982	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)) ∈ ℂ)
95	93, 79, 94	mul12d 11349	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝐵 · ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))))
96	92, 95	breqtrd 5112	. . . . 5 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 2 ≤ ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))))
97	15, 88	rpmulcld 12996	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ∈ ℝ⁺)
98	97	rpred 12980	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ∈ ℝ)
99	38, 98, 78	ledivmuld 13033	. . . . 5 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ↔ 2 ≤ ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))))
100	96, 99	mpbird 257	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
101	26	nnnn0d 12492	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℕ₀)
102		expneg 14025	. . . . . . 7 ⊢ ((2 ∈ ℂ ∧ (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℕ₀) → (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1))) = (1 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))))
103	71, 101, 102	sylancr 588	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1))) = (1 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))))
104	103	oveq2d 7377	. . . . 5 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) = (2 · (1 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))))))
105	78	rpne0d 12985	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) ≠ 0)
106	72, 79, 105	divrecd 11928	. . . . 5 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))) = (2 · (1 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))))))
107	104, 106	eqtr4d 2775	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) = (2 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))))
108	93, 83, 84	divrecd 11928	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)) = (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
109	100, 107, 108	3brtr4d 5118	. . 3 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))
110		fvoveq1 7384	. . . . . . . 8 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (!‘(𝑥 + 1)) = (!‘(((𝑎 + 𝐴) − 1) + 1)))
111	110	negeqd 11381	. . . . . . 7 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → -(!‘(𝑥 + 1)) = -(!‘(((𝑎 + 𝐴) − 1) + 1)))
112	111	oveq2d 7377	. . . . . 6 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (2↑-(!‘(𝑥 + 1))) = (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1))))
113	112	oveq2d 7377	. . . . 5 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (2 · (2↑-(!‘(𝑥 + 1)))) = (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))))
114		fveq2 6835	. . . . . . . 8 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (!‘𝑥) = (!‘((𝑎 + 𝐴) − 1)))
115	114	oveq2d 7377	. . . . . . 7 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (2↑(!‘𝑥)) = (2↑(!‘((𝑎 + 𝐴) − 1))))
116	115	oveq1d 7376	. . . . . 6 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → ((2↑(!‘𝑥))↑𝐴) = ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))
117	116	oveq2d 7377	. . . . 5 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (𝐵 / ((2↑(!‘𝑥))↑𝐴)) = (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))
118	113, 117	breq12d 5099	. . . 4 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → ((2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)) ↔ (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
119	118	rspcev 3565	. . 3 ⊢ ((((𝑎 + 𝐴) − 1) ∈ ℕ ∧ (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) → ∃𝑥 ∈ ℕ (2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)))
120	14, 109, 119	syl2anc 585	. 2 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ∃𝑥 ∈ ℕ (2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)))
121	10, 120	rexlimddv 3145	1 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) → ∃𝑥 ∈ ℕ (2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 ∃wrex 3062 class class class wbr 5086 ‘cfv 6493 (class class class)co 7361 ℂcc 11030 ℝcr 11031 0cc0 11032 1c1 11033 + caddc 11035 · cmul 11037 < clt 11173 ≤ cle 11174 − cmin 11371 -cneg 11372 / cdiv 11801 ℕcn 12168 2c2 12230 ℕ₀cn0 12431 ℤcz 12518 ℤ_≥cuz 12782 ℝ⁺crp 12936 ↑cexp 14017 !cfa 14229

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-sep 5232 ax-nul 5242 ax-pow 5303 ax-pr 5371 ax-un 7683 ax-cnex 11088 ax-resscn 11089 ax-1cn 11090 ax-icn 11091 ax-addcl 11092 ax-addrcl 11093 ax-mulcl 11094 ax-mulrcl 11095 ax-mulcom 11096 ax-addass 11097 ax-mulass 11098 ax-distr 11099 ax-i2m1 11100 ax-1ne0 11101 ax-1rid 11102 ax-rnegex 11103 ax-rrecex 11104 ax-cnre 11105 ax-pre-lttri 11106 ax-pre-lttrn 11107 ax-pre-ltadd 11108 ax-pre-mulgt0 11109 ax-pre-sup 11110

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3343 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-op 4575 df-uni 4852 df-iun 4936 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 df-id 5520 df-eprel 5525 df-po 5533 df-so 5534 df-fr 5578 df-we 5580 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-pred 6260 df-ord 6321 df-on 6322 df-lim 6323 df-suc 6324 df-iota 6449 df-fun 6495 df-fn 6496 df-f 6497 df-f1 6498 df-fo 6499 df-f1o 6500 df-fv 6501 df-riota 7318 df-ov 7364 df-oprab 7365 df-mpo 7366 df-om 7812 df-2nd 7937 df-frecs 8225 df-wrecs 8256 df-recs 8305 df-rdg 8343 df-er 8637 df-en 8888 df-dom 8889 df-sdom 8890 df-sup 9349 df-inf 9350 df-pnf 11175 df-mnf 11176 df-xr 11177 df-ltxr 11178 df-le 11179 df-sub 11373 df-neg 11374 df-div 11802 df-nn 12169 df-2 12238 df-n0 12432 df-z 12519 df-uz 12783 df-rp 12937 df-fl 13745 df-seq 13958 df-exp 14018 df-fac 14230

This theorem is referenced by: aaliou3lem9 26330

W3C validator