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 25705

Description: Lemma for aaliou3 25711. (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 12920	. . . . . 6 ⊢ 2 ∈ ℝ⁺
2		rpdivcl 12940	. . . . . 6 ⊢ ((2 ∈ ℝ⁺ ∧ 𝐵 ∈ ℝ⁺) → (2 / 𝐵) ∈ ℝ⁺)
3	1, 2	mpan 688	. . . . 5 ⊢ (𝐵 ∈ ℝ⁺ → (2 / 𝐵) ∈ ℝ⁺)
4	3	rpred 12957	. . . 4 ⊢ (𝐵 ∈ ℝ⁺ → (2 / 𝐵) ∈ ℝ)
5		2re 12227	. . . . 5 ⊢ 2 ∈ ℝ
6		1lt2 12324	. . . . 5 ⊢ 1 < 2
7		expnbnd 14135	. . . . 5 ⊢ (((2 / 𝐵) ∈ ℝ ∧ 2 ∈ ℝ ∧ 1 < 2) → ∃𝑎 ∈ ℕ (2 / 𝐵) < (2↑𝑎))
8	5, 6, 7	mp3an23 1453	. . . 4 ⊢ ((2 / 𝐵) ∈ ℝ → ∃𝑎 ∈ ℕ (2 / 𝐵) < (2↑𝑎))
9	4, 8	syl 17	. . 3 ⊢ (𝐵 ∈ ℝ⁺ → ∃𝑎 ∈ ℕ (2 / 𝐵) < (2↑𝑎))
10	9	adantl 482	. 2 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) → ∃𝑎 ∈ ℕ (2 / 𝐵) < (2↑𝑎))
11		simprl 769	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℕ)
12		simpll 765	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐴 ∈ ℕ)
13		nnaddm1cl 12560	. . . 4 ⊢ ((𝑎 ∈ ℕ ∧ 𝐴 ∈ ℕ) → ((𝑎 + 𝐴) − 1) ∈ ℕ)
14	11, 12, 13	syl2anc 584	. . 3 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((𝑎 + 𝐴) − 1) ∈ ℕ)
15		simplr 767	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐵 ∈ ℝ⁺)
16		rerpdivcl 12945	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ 𝐵 ∈ ℝ⁺) → (2 / 𝐵) ∈ ℝ)
17	5, 15, 16	sylancr 587	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) ∈ ℝ)
18	11	nnnn0d 12473	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℕ₀)
19		reexpcl 13984	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ 𝑎 ∈ ℕ₀) → (2↑𝑎) ∈ ℝ)
20	5, 18, 19	sylancr 587	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑𝑎) ∈ ℝ)
21	11, 12	nnaddcld 12205	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝑎 + 𝐴) ∈ ℕ)
22		nnm1nn0 12454	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 + 𝐴) ∈ ℕ → ((𝑎 + 𝐴) − 1) ∈ ℕ₀)
23	21, 22	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((𝑎 + 𝐴) − 1) ∈ ℕ₀)
24		peano2nn0 12453	. . . . . . . . . . . . . . 15 ⊢ (((𝑎 + 𝐴) − 1) ∈ ℕ₀ → (((𝑎 + 𝐴) − 1) + 1) ∈ ℕ₀)
25	23, 24	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (((𝑎 + 𝐴) − 1) + 1) ∈ ℕ₀)
26	25	faccld 14184	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℕ)
27	26	nnzd 12526	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℤ)
28	23	faccld 14184	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℕ)
29	28	nnzd 12526	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℤ)
30	12	nnzd 12526	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐴 ∈ ℤ)
31	29, 30	zmulcld 12613	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘((𝑎 + 𝐴) − 1)) · 𝐴) ∈ ℤ)
32	27, 31	zsubcld 12612	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ ℤ)
33		rpexpcl 13986	. . . . . . . . . . 11 ⊢ ((2 ∈ ℝ⁺ ∧ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ ℤ) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) ∈ ℝ⁺)
34	1, 32, 33	sylancr 587	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) ∈ ℝ⁺)
35	34	rpred 12957	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) ∈ ℝ)
36		simprr 771	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) < (2↑𝑎))
37	17, 20, 36	ltled 11303	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) ≤ (2↑𝑎))
38	5	a1i 11	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 2 ∈ ℝ)
39		1le2 12362	. . . . . . . . . . 11 ⊢ 1 ≤ 2
40	39	a1i 11	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 1 ≤ 2)
41	11	nnred 12168	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℝ)
42	28	nnred 12168	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℝ)
43	18	nn0ge0d 12476	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 0 ≤ 𝑎)
44	28	nnge1d 12201	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 1 ≤ (!‘((𝑎 + 𝐴) − 1)))
45	41, 42, 43, 44	lemulge12d 12093	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ≤ ((!‘((𝑎 + 𝐴) − 1)) · 𝑎))
46		facp1 14178	. . . . . . . . . . . . . . 15 ⊢ (((𝑎 + 𝐴) − 1) ∈ ℕ₀ → (!‘(((𝑎 + 𝐴) − 1) + 1)) = ((!‘((𝑎 + 𝐴) − 1)) · (((𝑎 + 𝐴) − 1) + 1)))
47	23, 46	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘(((𝑎 + 𝐴) − 1) + 1)) = ((!‘((𝑎 + 𝐴) − 1)) · (((𝑎 + 𝐴) − 1) + 1)))
48	47	oveq1d 7372	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) = (((!‘((𝑎 + 𝐴) − 1)) · (((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)))
49	28	nncnd 12169	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℂ)
50	25	nn0cnd 12475	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (((𝑎 + 𝐴) − 1) + 1) ∈ ℂ)
51	12	nncnd 12169	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐴 ∈ ℂ)
52	49, 50, 51	subdid 11611	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘((𝑎 + 𝐴) − 1)) · ((((𝑎 + 𝐴) − 1) + 1) − 𝐴)) = (((!‘((𝑎 + 𝐴) − 1)) · (((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)))
53	11	nncnd 12169	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℂ)
54	21	nncnd 12169	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝑎 + 𝐴) ∈ ℂ)
55		1cnd 11150	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 1 ∈ ℂ)
56	54, 55	npcand 11516	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (((𝑎 + 𝐴) − 1) + 1) = (𝑎 + 𝐴))
57	53, 51, 56	mvrraddd 11567	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((((𝑎 + 𝐴) − 1) + 1) − 𝐴) = 𝑎)
58	57	oveq2d 7373	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘((𝑎 + 𝐴) − 1)) · ((((𝑎 + 𝐴) − 1) + 1) − 𝐴)) = ((!‘((𝑎 + 𝐴) − 1)) · 𝑎))
59	48, 52, 58	3eqtr2d 2782	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) = ((!‘((𝑎 + 𝐴) − 1)) · 𝑎))
60	45, 59	breqtrrd 5133	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ≤ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)))
61	11	nnzd 12526	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝑎 ∈ ℤ)
62		eluz 12777	. . . . . . . . . . . 12 ⊢ ((𝑎 ∈ ℤ ∧ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ ℤ) → (((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ (ℤ_≥‘𝑎) ↔ 𝑎 ≤ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
63	61, 32, 62	syl2anc 584	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ (ℤ_≥‘𝑎) ↔ 𝑎 ≤ ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
64	60, 63	mpbird 256	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) ∈ (ℤ_≥‘𝑎))
65	38, 40, 64	leexp2ad 14157	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑𝑎) ≤ (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
66	17, 20, 35, 37, 65	letrd 11312	. . . . . . . 8 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) ≤ (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
67		rpcnne0 12933	. . . . . . . . . . 11 ⊢ (2 ∈ ℝ⁺ → (2 ∈ ℂ ∧ 2 ≠ 0))
68	1, 67	mp1i 13	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 ∈ ℂ ∧ 2 ≠ 0))
69		expsub 14016	. . . . . . . . . 10 ⊢ (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ ((!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℤ ∧ ((!‘((𝑎 + 𝐴) − 1)) · 𝐴) ∈ ℤ)) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / (2↑((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
70	68, 27, 31, 69	syl12anc 835	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / (2↑((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
71		2cn 12228	. . . . . . . . . . . 12 ⊢ 2 ∈ ℂ
72	71	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 2 ∈ ℂ)
73	12	nnnn0d 12473	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐴 ∈ ℕ₀)
74	28	nnnn0d 12473	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘((𝑎 + 𝐴) − 1)) ∈ ℕ₀)
75	72, 73, 74	expmuld 14054	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑((!‘((𝑎 + 𝐴) − 1)) · 𝐴)) = ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))
76	75	oveq2d 7373	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / (2↑((!‘((𝑎 + 𝐴) − 1)) · 𝐴))) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))
77		rpexpcl 13986	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℝ⁺ ∧ (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℤ) → (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) ∈ ℝ⁺)
78	1, 27, 77	sylancr 587	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) ∈ ℝ⁺)
79	78	rpcnd 12959	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) ∈ ℂ)
80		rpexpcl 13986	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℝ⁺ ∧ (!‘((𝑎 + 𝐴) − 1)) ∈ ℤ) → (2↑(!‘((𝑎 + 𝐴) − 1))) ∈ ℝ⁺)
81	1, 29, 80	sylancr 587	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑(!‘((𝑎 + 𝐴) − 1))) ∈ ℝ⁺)
82	81, 30	rpexpcld 14150	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴) ∈ ℝ⁺)
83	82	rpcnd 12959	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴) ∈ ℂ)
84	82	rpne0d 12962	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴) ≠ 0)
85	79, 83, 84	divrecd 11934	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
86	70, 76, 85	3eqtrrd 2781	. . . . . . . 8 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) = (2↑((!‘(((𝑎 + 𝐴) − 1) + 1)) − ((!‘((𝑎 + 𝐴) − 1)) · 𝐴))))
87	66, 86	breqtrrd 5133	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / 𝐵) ≤ ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
88	82	rpreccld 12967	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)) ∈ ℝ⁺)
89	78, 88	rpmulcld 12973	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ∈ ℝ⁺)
90	89	rpred 12957	. . . . . . . 8 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ∈ ℝ)
91	38, 90, 15	ledivmuld 13010	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2 / 𝐵) ≤ ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ↔ 2 ≤ (𝐵 · ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))))
92	87, 91	mpbid 231	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 2 ≤ (𝐵 · ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))))
93	15	rpcnd 12959	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 𝐵 ∈ ℂ)
94	88	rpcnd 12959	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)) ∈ ℂ)
95	93, 79, 94	mul12d 11364	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝐵 · ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))) = ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))))
96	92, 95	breqtrd 5131	. . . . 5 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → 2 ≤ ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))))
97	15, 88	rpmulcld 12973	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ∈ ℝ⁺)
98	97	rpred 12957	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ∈ ℝ)
99	38, 98, 78	ledivmuld 13010	. . . . 5 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ((2 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) ↔ 2 ≤ ((2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) · (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))))
100	96, 99	mpbird 256	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
101	26	nnnn0d 12473	. . . . . . 7 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℕ₀)
102		expneg 13975	. . . . . . 7 ⊢ ((2 ∈ ℂ ∧ (!‘(((𝑎 + 𝐴) − 1) + 1)) ∈ ℕ₀) → (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1))) = (1 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))))
103	71, 101, 102	sylancr 587	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1))) = (1 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))))
104	103	oveq2d 7373	. . . . 5 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) = (2 · (1 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))))))
105	78	rpne0d 12962	. . . . . 6 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))) ≠ 0)
106	72, 79, 105	divrecd 11934	. . . . 5 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))) = (2 · (1 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1))))))
107	104, 106	eqtr4d 2779	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) = (2 / (2↑(!‘(((𝑎 + 𝐴) − 1) + 1)))))
108	93, 83, 84	divrecd 11934	. . . 4 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)) = (𝐵 · (1 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
109	100, 107, 108	3brtr4d 5137	. . 3 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))
110		fvoveq1 7380	. . . . . . . 8 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (!‘(𝑥 + 1)) = (!‘(((𝑎 + 𝐴) − 1) + 1)))
111	110	negeqd 11395	. . . . . . 7 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → -(!‘(𝑥 + 1)) = -(!‘(((𝑎 + 𝐴) − 1) + 1)))
112	111	oveq2d 7373	. . . . . 6 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (2↑-(!‘(𝑥 + 1))) = (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1))))
113	112	oveq2d 7373	. . . . 5 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (2 · (2↑-(!‘(𝑥 + 1)))) = (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))))
114		fveq2 6842	. . . . . . . 8 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (!‘𝑥) = (!‘((𝑎 + 𝐴) − 1)))
115	114	oveq2d 7373	. . . . . . 7 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (2↑(!‘𝑥)) = (2↑(!‘((𝑎 + 𝐴) − 1))))
116	115	oveq1d 7372	. . . . . 6 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → ((2↑(!‘𝑥))↑𝐴) = ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))
117	116	oveq2d 7373	. . . . 5 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → (𝐵 / ((2↑(!‘𝑥))↑𝐴)) = (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴)))
118	113, 117	breq12d 5118	. . . 4 ⊢ (𝑥 = ((𝑎 + 𝐴) − 1) → ((2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)) ↔ (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))))
119	118	rspcev 3581	. . 3 ⊢ ((((𝑎 + 𝐴) − 1) ∈ ℕ ∧ (2 · (2↑-(!‘(((𝑎 + 𝐴) − 1) + 1)))) ≤ (𝐵 / ((2↑(!‘((𝑎 + 𝐴) − 1)))↑𝐴))) → ∃𝑥 ∈ ℕ (2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)))
120	14, 109, 119	syl2anc 584	. 2 ⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) ∧ (𝑎 ∈ ℕ ∧ (2 / 𝐵) < (2↑𝑎))) → ∃𝑥 ∈ ℕ (2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)))
121	10, 120	rexlimddv 3158	1 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℝ⁺) → ∃𝑥 ∈ ℕ (2 · (2↑-(!‘(𝑥 + 1)))) ≤ (𝐵 / ((2↑(!‘𝑥))↑𝐴)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 396 = wceq 1541 ∈ wcel 2106 ≠ wne 2943 ∃wrex 3073 class class class wbr 5105 ‘cfv 6496 (class class class)co 7357 ℂcc 11049 ℝcr 11050 0cc0 11051 1c1 11052 + caddc 11054 · cmul 11056 < clt 11189 ≤ cle 11190 − cmin 11385 -cneg 11386 / cdiv 11812 ℕcn 12153 2c2 12208 ℕ₀cn0 12413 ℤcz 12499 ℤ_≥cuz 12763 ℝ⁺crp 12915 ↑cexp 13967 !cfa 14173

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 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2707 ax-sep 5256 ax-nul 5263 ax-pow 5320 ax-pr 5384 ax-un 7672 ax-cnex 11107 ax-resscn 11108 ax-1cn 11109 ax-icn 11110 ax-addcl 11111 ax-addrcl 11112 ax-mulcl 11113 ax-mulrcl 11114 ax-mulcom 11115 ax-addass 11116 ax-mulass 11117 ax-distr 11118 ax-i2m1 11119 ax-1ne0 11120 ax-1rid 11121 ax-rnegex 11122 ax-rrecex 11123 ax-cnre 11124 ax-pre-lttri 11125 ax-pre-lttrn 11126 ax-pre-ltadd 11127 ax-pre-mulgt0 11128 ax-pre-sup 11129

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2538 df-eu 2567 df-clab 2714 df-cleq 2728 df-clel 2814 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3065 df-rex 3074 df-rmo 3353 df-reu 3354 df-rab 3408 df-v 3447 df-sbc 3740 df-csb 3856 df-dif 3913 df-un 3915 df-in 3917 df-ss 3927 df-pss 3929 df-nul 4283 df-if 4487 df-pw 4562 df-sn 4587 df-pr 4589 df-op 4593 df-uni 4866 df-iun 4956 df-br 5106 df-opab 5168 df-mpt 5189 df-tr 5223 df-id 5531 df-eprel 5537 df-po 5545 df-so 5546 df-fr 5588 df-we 5590 df-xp 5639 df-rel 5640 df-cnv 5641 df-co 5642 df-dm 5643 df-rn 5644 df-res 5645 df-ima 5646 df-pred 6253 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6498 df-fn 6499 df-f 6500 df-f1 6501 df-fo 6502 df-f1o 6503 df-fv 6504 df-riota 7313 df-ov 7360 df-oprab 7361 df-mpo 7362 df-om 7803 df-2nd 7922 df-frecs 8212 df-wrecs 8243 df-recs 8317 df-rdg 8356 df-er 8648 df-en 8884 df-dom 8885 df-sdom 8886 df-sup 9378 df-inf 9379 df-pnf 11191 df-mnf 11192 df-xr 11193 df-ltxr 11194 df-le 11195 df-sub 11387 df-neg 11388 df-div 11813 df-nn 12154 df-2 12216 df-n0 12414 df-z 12500 df-uz 12764 df-rp 12916 df-fl 13697 df-seq 13907 df-exp 13968 df-fac 14174

This theorem is referenced by: aaliou3lem9 25710

W3C validator