aaliou3lem7 - Metamath Proof Explorer

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

Theorem aaliou3lem7 24503

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

**Hypotheses**
Ref	Expression
aaliou3lem.c	⊢ 𝐹 = (𝑎 ∈ ℕ ↦ (2↑-(!‘𝑎)))
aaliou3lem.d	⊢ 𝐿 = Σ𝑏 ∈ ℕ (𝐹‘𝑏)
aaliou3lem.e	⊢ 𝐻 = (𝑐 ∈ ℕ ↦ Σ𝑏 ∈ (1...𝑐)(𝐹‘𝑏))

**Assertion**
Ref	Expression
aaliou3lem7	⊢ (𝐴 ∈ ℕ → ((𝐻‘𝐴) ≠ 𝐿 ∧ (abs‘(𝐿 − (𝐻‘𝐴))) ≤ (2 · (2↑-(!‘(𝐴 + 1))))))

Distinct variable groups: 𝑎,𝑏,𝑐 𝐹,𝑏,𝑐 𝐿,𝑐 𝐴,𝑎,𝑏,𝑐 Allowed substitution hints: 𝐹(𝑎) 𝐻(𝑎,𝑏,𝑐) 𝐿(𝑎,𝑏)

**Proof of Theorem aaliou3lem7**
Step	Hyp	Ref	Expression
1		peano2nn 11364	. . 3 ⊢ (𝐴 ∈ ℕ → (𝐴 + 1) ∈ ℕ)
2		eqid 2825	. . . 4 ⊢ (𝑐 ∈ (ℤ_≥‘(𝐴 + 1)) ↦ ((2↑-(!‘(𝐴 + 1))) · ((1 / 2)↑(𝑐 − (𝐴 + 1))))) = (𝑐 ∈ (ℤ_≥‘(𝐴 + 1)) ↦ ((2↑-(!‘(𝐴 + 1))) · ((1 / 2)↑(𝑐 − (𝐴 + 1)))))
3		aaliou3lem.c	. . . 4 ⊢ 𝐹 = (𝑎 ∈ ℕ ↦ (2↑-(!‘𝑎)))
4	2, 3	aaliou3lem3 24498	. . 3 ⊢ ((𝐴 + 1) ∈ ℕ → (seq(𝐴 + 1)( + , 𝐹) ∈ dom ⇝ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ≤ (2 · (2↑-(!‘(𝐴 + 1))))))
5		3simpc 1188	. . 3 ⊢ ((seq(𝐴 + 1)( + , 𝐹) ∈ dom ⇝ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ≤ (2 · (2↑-(!‘(𝐴 + 1))))) → (Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ≤ (2 · (2↑-(!‘(𝐴 + 1))))))
6	1, 4, 5	3syl 18	. 2 ⊢ (𝐴 ∈ ℕ → (Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ≤ (2 · (2↑-(!‘(𝐴 + 1))))))
7		nncn 11359	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℕ → 𝐴 ∈ ℂ)
8		ax-1cn 10310	. . . . . . . . . . . 12 ⊢ 1 ∈ ℂ
9		pncan 10607	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝐴 + 1) − 1) = 𝐴)
10	7, 8, 9	sylancl 582	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℕ → ((𝐴 + 1) − 1) = 𝐴)
11	10	oveq2d 6921	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℕ → (1...((𝐴 + 1) − 1)) = (1...𝐴))
12	11	sumeq1d 14808	. . . . . . . . 9 ⊢ (𝐴 ∈ ℕ → Σ𝑏 ∈ (1...((𝐴 + 1) − 1))(𝐹‘𝑏) = Σ𝑏 ∈ (1...𝐴)(𝐹‘𝑏))
13	12	oveq1d 6920	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → (Σ𝑏 ∈ (1...((𝐴 + 1) − 1))(𝐹‘𝑏) + Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏)) = (Σ𝑏 ∈ (1...𝐴)(𝐹‘𝑏) + Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏)))
14		nnuz 12005	. . . . . . . . 9 ⊢ ℕ = (ℤ_≥‘1)
15		eqid 2825	. . . . . . . . 9 ⊢ (ℤ_≥‘(𝐴 + 1)) = (ℤ_≥‘(𝐴 + 1))
16		eqidd 2826	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈ ℕ) → (𝐹‘𝑏) = (𝐹‘𝑏))
17		fveq2 6433	. . . . . . . . . . . . . 14 ⊢ (𝑎 = 𝑏 → (!‘𝑎) = (!‘𝑏))
18	17	negeqd 10595	. . . . . . . . . . . . 13 ⊢ (𝑎 = 𝑏 → -(!‘𝑎) = -(!‘𝑏))
19	18	oveq2d 6921	. . . . . . . . . . . 12 ⊢ (𝑎 = 𝑏 → (2↑-(!‘𝑎)) = (2↑-(!‘𝑏)))
20		ovex 6937	. . . . . . . . . . . 12 ⊢ (2↑-(!‘𝑏)) ∈ V
21	19, 3, 20	fvmpt 6529	. . . . . . . . . . 11 ⊢ (𝑏 ∈ ℕ → (𝐹‘𝑏) = (2↑-(!‘𝑏)))
22		2rp 12117	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℝ⁺
23		nnnn0 11626	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 ∈ ℕ → 𝑏 ∈ ℕ₀)
24		faccl 13363	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 ∈ ℕ₀ → (!‘𝑏) ∈ ℕ)
25	23, 24	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑏 ∈ ℕ → (!‘𝑏) ∈ ℕ)
26	25	nnzd 11809	. . . . . . . . . . . . . 14 ⊢ (𝑏 ∈ ℕ → (!‘𝑏) ∈ ℤ)
27	26	znegcld 11812	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ ℕ → -(!‘𝑏) ∈ ℤ)
28		rpexpcl 13173	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℝ⁺ ∧ -(!‘𝑏) ∈ ℤ) → (2↑-(!‘𝑏)) ∈ ℝ⁺)
29	22, 27, 28	sylancr 583	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ ℕ → (2↑-(!‘𝑏)) ∈ ℝ⁺)
30	29	rpcnd 12158	. . . . . . . . . . 11 ⊢ (𝑏 ∈ ℕ → (2↑-(!‘𝑏)) ∈ ℂ)
31	21, 30	eqeltrd 2906	. . . . . . . . . 10 ⊢ (𝑏 ∈ ℕ → (𝐹‘𝑏) ∈ ℂ)
32	31	adantl 475	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈ ℕ) → (𝐹‘𝑏) ∈ ℂ)
33		1nn 11363	. . . . . . . . . 10 ⊢ 1 ∈ ℕ
34		eqid 2825	. . . . . . . . . . . 12 ⊢ (𝑐 ∈ (ℤ_≥‘1) ↦ ((2↑-(!‘1)) · ((1 / 2)↑(𝑐 − 1)))) = (𝑐 ∈ (ℤ_≥‘1) ↦ ((2↑-(!‘1)) · ((1 / 2)↑(𝑐 − 1))))
35	34, 3	aaliou3lem3 24498	. . . . . . . . . . 11 ⊢ (1 ∈ ℕ → (seq1( + , 𝐹) ∈ dom ⇝ ∧ Σ𝑏 ∈ (ℤ_≥‘1)(𝐹‘𝑏) ∈ ℝ⁺ ∧ Σ𝑏 ∈ (ℤ_≥‘1)(𝐹‘𝑏) ≤ (2 · (2↑-(!‘1)))))
36	35	simp1d 1178	. . . . . . . . . 10 ⊢ (1 ∈ ℕ → seq1( + , 𝐹) ∈ dom ⇝ )
37	33, 36	mp1i 13	. . . . . . . . 9 ⊢ (𝐴 ∈ ℕ → seq1( + , 𝐹) ∈ dom ⇝ )
38	14, 15, 1, 16, 32, 37	isumsplit 14946	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → Σ𝑏 ∈ ℕ (𝐹‘𝑏) = (Σ𝑏 ∈ (1...((𝐴 + 1) − 1))(𝐹‘𝑏) + Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏)))
39		oveq2 6913	. . . . . . . . . . 11 ⊢ (𝑐 = 𝐴 → (1...𝑐) = (1...𝐴))
40	39	sumeq1d 14808	. . . . . . . . . 10 ⊢ (𝑐 = 𝐴 → Σ𝑏 ∈ (1...𝑐)(𝐹‘𝑏) = Σ𝑏 ∈ (1...𝐴)(𝐹‘𝑏))
41		aaliou3lem.e	. . . . . . . . . 10 ⊢ 𝐻 = (𝑐 ∈ ℕ ↦ Σ𝑏 ∈ (1...𝑐)(𝐹‘𝑏))
42		sumex 14795	. . . . . . . . . 10 ⊢ Σ𝑏 ∈ (1...𝐴)(𝐹‘𝑏) ∈ V
43	40, 41, 42	fvmpt 6529	. . . . . . . . 9 ⊢ (𝐴 ∈ ℕ → (𝐻‘𝐴) = Σ𝑏 ∈ (1...𝐴)(𝐹‘𝑏))
44	43	oveq1d 6920	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → ((𝐻‘𝐴) + Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏)) = (Σ𝑏 ∈ (1...𝐴)(𝐹‘𝑏) + Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏)))
45	13, 38, 44	3eqtr4rd 2872	. . . . . . 7 ⊢ (𝐴 ∈ ℕ → ((𝐻‘𝐴) + Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏)) = Σ𝑏 ∈ ℕ (𝐹‘𝑏))
46		aaliou3lem.d	. . . . . . 7 ⊢ 𝐿 = Σ𝑏 ∈ ℕ (𝐹‘𝑏)
47	45, 46	syl6eqr 2879	. . . . . 6 ⊢ (𝐴 ∈ ℕ → ((𝐻‘𝐴) + Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏)) = 𝐿)
48	3, 46, 41	aaliou3lem4 24500	. . . . . . . . 9 ⊢ 𝐿 ∈ ℝ
49	48	recni 10371	. . . . . . . 8 ⊢ 𝐿 ∈ ℂ
50	49	a1i 11	. . . . . . 7 ⊢ (𝐴 ∈ ℕ → 𝐿 ∈ ℂ)
51	3, 46, 41	aaliou3lem5 24501	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → (𝐻‘𝐴) ∈ ℝ)
52	51	recnd 10385	. . . . . . 7 ⊢ (𝐴 ∈ ℕ → (𝐻‘𝐴) ∈ ℂ)
53	4	simp2d 1179	. . . . . . . . 9 ⊢ ((𝐴 + 1) ∈ ℕ → Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺)
54	1, 53	syl 17	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺)
55	54	rpcnd 12158	. . . . . . 7 ⊢ (𝐴 ∈ ℕ → Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℂ)
56	50, 52, 55	subaddd 10731	. . . . . 6 ⊢ (𝐴 ∈ ℕ → ((𝐿 − (𝐻‘𝐴)) = Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ↔ ((𝐻‘𝐴) + Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏)) = 𝐿))
57	47, 56	mpbird 249	. . . . 5 ⊢ (𝐴 ∈ ℕ → (𝐿 − (𝐻‘𝐴)) = Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏))
58	57	eqcomd 2831	. . . 4 ⊢ (𝐴 ∈ ℕ → Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) = (𝐿 − (𝐻‘𝐴)))
59		eleq1 2894	. . . . 5 ⊢ (Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) = (𝐿 − (𝐻‘𝐴)) → (Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺ ↔ (𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺))
60		breq1 4876	. . . . 5 ⊢ (Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) = (𝐿 − (𝐻‘𝐴)) → (Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ≤ (2 · (2↑-(!‘(𝐴 + 1)))) ↔ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1))))))
61	59, 60	anbi12d 626	. . . 4 ⊢ (Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) = (𝐿 − (𝐻‘𝐴)) → ((Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ≤ (2 · (2↑-(!‘(𝐴 + 1))))) ↔ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))))
62	58, 61	syl 17	. . 3 ⊢ (𝐴 ∈ ℕ → ((Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ≤ (2 · (2↑-(!‘(𝐴 + 1))))) ↔ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))))
63	51	adantr 474	. . . . . 6 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → (𝐻‘𝐴) ∈ ℝ)
64		simprl 789	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → (𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺)
65		difrp 12152	. . . . . . . 8 ⊢ (((𝐻‘𝐴) ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((𝐻‘𝐴) < 𝐿 ↔ (𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺))
66	63, 48, 65	sylancl 582	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → ((𝐻‘𝐴) < 𝐿 ↔ (𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺))
67	64, 66	mpbird 249	. . . . . 6 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → (𝐻‘𝐴) < 𝐿)
68	63, 67	ltned 10492	. . . . 5 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → (𝐻‘𝐴) ≠ 𝐿)
69		nnnn0 11626	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 + 1) ∈ ℕ → (𝐴 + 1) ∈ ℕ₀)
70		faccl 13363	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 + 1) ∈ ℕ₀ → (!‘(𝐴 + 1)) ∈ ℕ)
71	1, 69, 70	3syl 18	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℕ → (!‘(𝐴 + 1)) ∈ ℕ)
72	71	nnzd 11809	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℕ → (!‘(𝐴 + 1)) ∈ ℤ)
73	72	znegcld 11812	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℕ → -(!‘(𝐴 + 1)) ∈ ℤ)
74		rpexpcl 13173	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℝ⁺ ∧ -(!‘(𝐴 + 1)) ∈ ℤ) → (2↑-(!‘(𝐴 + 1))) ∈ ℝ⁺)
75	22, 73, 74	sylancr 583	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℕ → (2↑-(!‘(𝐴 + 1))) ∈ ℝ⁺)
76		rpmulcl 12137	. . . . . . . . . . 11 ⊢ ((2 ∈ ℝ⁺ ∧ (2↑-(!‘(𝐴 + 1))) ∈ ℝ⁺) → (2 · (2↑-(!‘(𝐴 + 1)))) ∈ ℝ⁺)
77	22, 75, 76	sylancr 583	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℕ → (2 · (2↑-(!‘(𝐴 + 1)))) ∈ ℝ⁺)
78	77	adantr 474	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → (2 · (2↑-(!‘(𝐴 + 1)))) ∈ ℝ⁺)
79	78	rpred 12156	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → (2 · (2↑-(!‘(𝐴 + 1)))) ∈ ℝ)
80	63, 79	resubcld 10782	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → ((𝐻‘𝐴) − (2 · (2↑-(!‘(𝐴 + 1))))) ∈ ℝ)
81	48	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → 𝐿 ∈ ℝ)
82	63, 78	ltsubrpd 12188	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → ((𝐻‘𝐴) − (2 · (2↑-(!‘(𝐴 + 1))))) < (𝐻‘𝐴))
83	80, 63, 81, 82, 67	lttrd 10517	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → ((𝐻‘𝐴) − (2 · (2↑-(!‘(𝐴 + 1))))) < 𝐿)
84	80, 81, 83	ltled 10504	. . . . . 6 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → ((𝐻‘𝐴) − (2 · (2↑-(!‘(𝐴 + 1))))) ≤ 𝐿)
85		simprr 791	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))
86	81, 63, 79	lesubadd2d 10951	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → ((𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))) ↔ 𝐿 ≤ ((𝐻‘𝐴) + (2 · (2↑-(!‘(𝐴 + 1)))))))
87	85, 86	mpbid 224	. . . . . 6 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → 𝐿 ≤ ((𝐻‘𝐴) + (2 · (2↑-(!‘(𝐴 + 1))))))
88	81, 63, 79	absdifled 14550	. . . . . 6 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → ((abs‘(𝐿 − (𝐻‘𝐴))) ≤ (2 · (2↑-(!‘(𝐴 + 1)))) ↔ (((𝐻‘𝐴) − (2 · (2↑-(!‘(𝐴 + 1))))) ≤ 𝐿 ∧ 𝐿 ≤ ((𝐻‘𝐴) + (2 · (2↑-(!‘(𝐴 + 1))))))))
89	84, 87, 88	mpbir2and 706	. . . . 5 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → (abs‘(𝐿 − (𝐻‘𝐴))) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))
90	68, 89	jca 509	. . . 4 ⊢ ((𝐴 ∈ ℕ ∧ ((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))) → ((𝐻‘𝐴) ≠ 𝐿 ∧ (abs‘(𝐿 − (𝐻‘𝐴))) ≤ (2 · (2↑-(!‘(𝐴 + 1))))))
91	90	ex 403	. . 3 ⊢ (𝐴 ∈ ℕ → (((𝐿 − (𝐻‘𝐴)) ∈ ℝ⁺ ∧ (𝐿 − (𝐻‘𝐴)) ≤ (2 · (2↑-(!‘(𝐴 + 1))))) → ((𝐻‘𝐴) ≠ 𝐿 ∧ (abs‘(𝐿 − (𝐻‘𝐴))) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))))
92	62, 91	sylbid 232	. 2 ⊢ (𝐴 ∈ ℕ → ((Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ∈ ℝ⁺ ∧ Σ𝑏 ∈ (ℤ_≥‘(𝐴 + 1))(𝐹‘𝑏) ≤ (2 · (2↑-(!‘(𝐴 + 1))))) → ((𝐻‘𝐴) ≠ 𝐿 ∧ (abs‘(𝐿 − (𝐻‘𝐴))) ≤ (2 · (2↑-(!‘(𝐴 + 1)))))))
93	6, 92	mpd 15	1 ⊢ (𝐴 ∈ ℕ → ((𝐻‘𝐴) ≠ 𝐿 ∧ (abs‘(𝐿 − (𝐻‘𝐴))) ≤ (2 · (2↑-(!‘(𝐴 + 1))))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 198 ∧ wa 386 ∧ w3a 1113 = wceq 1658 ∈ wcel 2166 ≠ wne 2999 class class class wbr 4873 ↦ cmpt 4952 dom cdm 5342 ‘cfv 6123 (class class class)co 6905 ℂcc 10250 ℝcr 10251 1c1 10253 + caddc 10255 · cmul 10257 < clt 10391 ≤ cle 10392 − cmin 10585 -cneg 10586 / cdiv 11009 ℕcn 11350 2c2 11406 ℕ₀cn0 11618 ℤcz 11704 ℤ_≥cuz 11968 ℝ⁺crp 12112 ...cfz 12619 seqcseq 13095 ↑cexp 13154 !cfa 13353 abscabs 14351 ⇝ cli 14592 Σcsu 14793

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1896 ax-4 1910 ax-5 2011 ax-6 2077 ax-7 2114 ax-8 2168 ax-9 2175 ax-10 2194 ax-11 2209 ax-12 2222 ax-13 2391 ax-ext 2803 ax-rep 4994 ax-sep 5005 ax-nul 5013 ax-pow 5065 ax-pr 5127 ax-un 7209 ax-inf2 8815 ax-cnex 10308 ax-resscn 10309 ax-1cn 10310 ax-icn 10311 ax-addcl 10312 ax-addrcl 10313 ax-mulcl 10314 ax-mulrcl 10315 ax-mulcom 10316 ax-addass 10317 ax-mulass 10318 ax-distr 10319 ax-i2m1 10320 ax-1ne0 10321 ax-1rid 10322 ax-rnegex 10323 ax-rrecex 10324 ax-cnre 10325 ax-pre-lttri 10326 ax-pre-lttrn 10327 ax-pre-ltadd 10328 ax-pre-mulgt0 10329 ax-pre-sup 10330

This theorem depends on definitions: df-bi 199 df-an 387 df-or 881 df-3or 1114 df-3an 1115 df-tru 1662 df-fal 1672 df-ex 1881 df-nf 1885 df-sb 2070 df-mo 2605 df-eu 2640 df-clab 2812 df-cleq 2818 df-clel 2821 df-nfc 2958 df-ne 3000 df-nel 3103 df-ral 3122 df-rex 3123 df-reu 3124 df-rmo 3125 df-rab 3126 df-v 3416 df-sbc 3663 df-csb 3758 df-dif 3801 df-un 3803 df-in 3805 df-ss 3812 df-pss 3814 df-nul 4145 df-if 4307 df-pw 4380 df-sn 4398 df-pr 4400 df-tp 4402 df-op 4404 df-uni 4659 df-int 4698 df-iun 4742 df-br 4874 df-opab 4936 df-mpt 4953 df-tr 4976 df-id 5250 df-eprel 5255 df-po 5263 df-so 5264 df-fr 5301 df-se 5302 df-we 5303 df-xp 5348 df-rel 5349 df-cnv 5350 df-co 5351 df-dm 5352 df-rn 5353 df-res 5354 df-ima 5355 df-pred 5920 df-ord 5966 df-on 5967 df-lim 5968 df-suc 5969 df-iota 6086 df-fun 6125 df-fn 6126 df-f 6127 df-f1 6128 df-fo 6129 df-f1o 6130 df-fv 6131 df-isom 6132 df-riota 6866 df-ov 6908 df-oprab 6909 df-mpt2 6910 df-om 7327 df-1st 7428 df-2nd 7429 df-wrecs 7672 df-recs 7734 df-rdg 7772 df-1o 7826 df-oadd 7830 df-er 8009 df-pm 8125 df-en 8223 df-dom 8224 df-sdom 8225 df-fin 8226 df-sup 8617 df-inf 8618 df-oi 8684 df-card 9078 df-pnf 10393 df-mnf 10394 df-xr 10395 df-ltxr 10396 df-le 10397 df-sub 10587 df-neg 10588 df-div 11010 df-nn 11351 df-2 11414 df-3 11415 df-n0 11619 df-z 11705 df-uz 11969 df-rp 12113 df-ioc 12468 df-ico 12469 df-fz 12620 df-fzo 12761 df-fl 12888 df-seq 13096 df-exp 13155 df-fac 13354 df-hash 13411 df-shft 14184 df-cj 14216 df-re 14217 df-im 14218 df-sqrt 14352 df-abs 14353 df-limsup 14579 df-clim 14596 df-rlim 14597 df-sum 14794

This theorem is referenced by: aaliou3lem9 24504

W3C validator