aaliou3lem2 - Metamath Proof Explorer

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

Theorem aaliou3lem2 25408

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

**Hypotheses**
Ref	Expression
aaliou3lem.a	⊢ 𝐺 = (𝑐 ∈ (ℤ_≥‘𝐴) ↦ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑐 − 𝐴))))
aaliou3lem.b	⊢ 𝐹 = (𝑎 ∈ ℕ ↦ (2↑-(!‘𝑎)))

**Assertion**
Ref	Expression
aaliou3lem2	⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (𝐹‘𝐵) ∈ (0(,](𝐺‘𝐵)))

Distinct variable groups: 𝐹,𝑐 𝐴,𝑎,𝑐 𝐵,𝑎,𝑐 𝐺,𝑎 Allowed substitution hints: 𝐹(𝑎) 𝐺(𝑐)

Proof of Theorem aaliou3lem2 Dummy variables 𝑏 𝑑 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eluznn 12587	. . . . 5 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → 𝐵 ∈ ℕ)
2		fveq2 6756	. . . . . . . 8 ⊢ (𝑎 = 𝐵 → (!‘𝑎) = (!‘𝐵))
3	2	negeqd 11145	. . . . . . 7 ⊢ (𝑎 = 𝐵 → -(!‘𝑎) = -(!‘𝐵))
4	3	oveq2d 7271	. . . . . 6 ⊢ (𝑎 = 𝐵 → (2↑-(!‘𝑎)) = (2↑-(!‘𝐵)))
5		aaliou3lem.b	. . . . . 6 ⊢ 𝐹 = (𝑎 ∈ ℕ ↦ (2↑-(!‘𝑎)))
6		ovex 7288	. . . . . 6 ⊢ (2↑-(!‘𝐵)) ∈ V
7	4, 5, 6	fvmpt 6857	. . . . 5 ⊢ (𝐵 ∈ ℕ → (𝐹‘𝐵) = (2↑-(!‘𝐵)))
8	1, 7	syl 17	. . . 4 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (𝐹‘𝐵) = (2↑-(!‘𝐵)))
9		2rp 12664	. . . . 5 ⊢ 2 ∈ ℝ⁺
10	1	nnnn0d 12223	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → 𝐵 ∈ ℕ₀)
11	10	faccld 13926	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (!‘𝐵) ∈ ℕ)
12	11	nnzd 12354	. . . . . 6 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (!‘𝐵) ∈ ℤ)
13	12	znegcld 12357	. . . . 5 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → -(!‘𝐵) ∈ ℤ)
14		rpexpcl 13729	. . . . 5 ⊢ ((2 ∈ ℝ⁺ ∧ -(!‘𝐵) ∈ ℤ) → (2↑-(!‘𝐵)) ∈ ℝ⁺)
15	9, 13, 14	sylancr 586	. . . 4 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (2↑-(!‘𝐵)) ∈ ℝ⁺)
16	8, 15	eqeltrd 2839	. . 3 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (𝐹‘𝐵) ∈ ℝ⁺)
17	16	rpred 12701	. 2 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (𝐹‘𝐵) ∈ ℝ)
18	16	rpgt0d 12704	. 2 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → 0 < (𝐹‘𝐵))
19		fveq2 6756	. . . . . 6 ⊢ (𝑏 = 𝐴 → (𝐹‘𝑏) = (𝐹‘𝐴))
20		fveq2 6756	. . . . . 6 ⊢ (𝑏 = 𝐴 → (𝐺‘𝑏) = (𝐺‘𝐴))
21	19, 20	breq12d 5083	. . . . 5 ⊢ (𝑏 = 𝐴 → ((𝐹‘𝑏) ≤ (𝐺‘𝑏) ↔ (𝐹‘𝐴) ≤ (𝐺‘𝐴)))
22	21	imbi2d 340	. . . 4 ⊢ (𝑏 = 𝐴 → ((𝐴 ∈ ℕ → (𝐹‘𝑏) ≤ (𝐺‘𝑏)) ↔ (𝐴 ∈ ℕ → (𝐹‘𝐴) ≤ (𝐺‘𝐴))))
23		fveq2 6756	. . . . . 6 ⊢ (𝑏 = 𝑑 → (𝐹‘𝑏) = (𝐹‘𝑑))
24		fveq2 6756	. . . . . 6 ⊢ (𝑏 = 𝑑 → (𝐺‘𝑏) = (𝐺‘𝑑))
25	23, 24	breq12d 5083	. . . . 5 ⊢ (𝑏 = 𝑑 → ((𝐹‘𝑏) ≤ (𝐺‘𝑏) ↔ (𝐹‘𝑑) ≤ (𝐺‘𝑑)))
26	25	imbi2d 340	. . . 4 ⊢ (𝑏 = 𝑑 → ((𝐴 ∈ ℕ → (𝐹‘𝑏) ≤ (𝐺‘𝑏)) ↔ (𝐴 ∈ ℕ → (𝐹‘𝑑) ≤ (𝐺‘𝑑))))
27		fveq2 6756	. . . . . 6 ⊢ (𝑏 = (𝑑 + 1) → (𝐹‘𝑏) = (𝐹‘(𝑑 + 1)))
28		fveq2 6756	. . . . . 6 ⊢ (𝑏 = (𝑑 + 1) → (𝐺‘𝑏) = (𝐺‘(𝑑 + 1)))
29	27, 28	breq12d 5083	. . . . 5 ⊢ (𝑏 = (𝑑 + 1) → ((𝐹‘𝑏) ≤ (𝐺‘𝑏) ↔ (𝐹‘(𝑑 + 1)) ≤ (𝐺‘(𝑑 + 1))))
30	29	imbi2d 340	. . . 4 ⊢ (𝑏 = (𝑑 + 1) → ((𝐴 ∈ ℕ → (𝐹‘𝑏) ≤ (𝐺‘𝑏)) ↔ (𝐴 ∈ ℕ → (𝐹‘(𝑑 + 1)) ≤ (𝐺‘(𝑑 + 1)))))
31		fveq2 6756	. . . . . 6 ⊢ (𝑏 = 𝐵 → (𝐹‘𝑏) = (𝐹‘𝐵))
32		fveq2 6756	. . . . . 6 ⊢ (𝑏 = 𝐵 → (𝐺‘𝑏) = (𝐺‘𝐵))
33	31, 32	breq12d 5083	. . . . 5 ⊢ (𝑏 = 𝐵 → ((𝐹‘𝑏) ≤ (𝐺‘𝑏) ↔ (𝐹‘𝐵) ≤ (𝐺‘𝐵)))
34	33	imbi2d 340	. . . 4 ⊢ (𝑏 = 𝐵 → ((𝐴 ∈ ℕ → (𝐹‘𝑏) ≤ (𝐺‘𝑏)) ↔ (𝐴 ∈ ℕ → (𝐹‘𝐵) ≤ (𝐺‘𝐵))))
35		nnnn0 12170	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℕ → 𝐴 ∈ ℕ₀)
36	35	faccld 13926	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℕ → (!‘𝐴) ∈ ℕ)
37	36	nnzd 12354	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℕ → (!‘𝐴) ∈ ℤ)
38	37	znegcld 12357	. . . . . . . . 9 ⊢ (𝐴 ∈ ℕ → -(!‘𝐴) ∈ ℤ)
39		rpexpcl 13729	. . . . . . . . 9 ⊢ ((2 ∈ ℝ⁺ ∧ -(!‘𝐴) ∈ ℤ) → (2↑-(!‘𝐴)) ∈ ℝ⁺)
40	9, 38, 39	sylancr 586	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → (2↑-(!‘𝐴)) ∈ ℝ⁺)
41	40	rpred 12701	. . . . . . 7 ⊢ (𝐴 ∈ ℕ → (2↑-(!‘𝐴)) ∈ ℝ)
42	41	leidd 11471	. . . . . 6 ⊢ (𝐴 ∈ ℕ → (2↑-(!‘𝐴)) ≤ (2↑-(!‘𝐴)))
43		nncn 11911	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℕ → 𝐴 ∈ ℂ)
44	43	subidd 11250	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℕ → (𝐴 − 𝐴) = 0)
45	44	oveq2d 7271	. . . . . . . . 9 ⊢ (𝐴 ∈ ℕ → ((1 / 2)↑(𝐴 − 𝐴)) = ((1 / 2)↑0))
46		halfcn 12118	. . . . . . . . . 10 ⊢ (1 / 2) ∈ ℂ
47		exp0 13714	. . . . . . . . . 10 ⊢ ((1 / 2) ∈ ℂ → ((1 / 2)↑0) = 1)
48	46, 47	ax-mp 5	. . . . . . . . 9 ⊢ ((1 / 2)↑0) = 1
49	45, 48	eqtrdi 2795	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → ((1 / 2)↑(𝐴 − 𝐴)) = 1)
50	49	oveq2d 7271	. . . . . . 7 ⊢ (𝐴 ∈ ℕ → ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝐴 − 𝐴))) = ((2↑-(!‘𝐴)) · 1))
51	40	rpcnd 12703	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → (2↑-(!‘𝐴)) ∈ ℂ)
52	51	mulid1d 10923	. . . . . . 7 ⊢ (𝐴 ∈ ℕ → ((2↑-(!‘𝐴)) · 1) = (2↑-(!‘𝐴)))
53	50, 52	eqtrd 2778	. . . . . 6 ⊢ (𝐴 ∈ ℕ → ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝐴 − 𝐴))) = (2↑-(!‘𝐴)))
54	42, 53	breqtrrd 5098	. . . . 5 ⊢ (𝐴 ∈ ℕ → (2↑-(!‘𝐴)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝐴 − 𝐴))))
55		fveq2 6756	. . . . . . . 8 ⊢ (𝑎 = 𝐴 → (!‘𝑎) = (!‘𝐴))
56	55	negeqd 11145	. . . . . . 7 ⊢ (𝑎 = 𝐴 → -(!‘𝑎) = -(!‘𝐴))
57	56	oveq2d 7271	. . . . . 6 ⊢ (𝑎 = 𝐴 → (2↑-(!‘𝑎)) = (2↑-(!‘𝐴)))
58		ovex 7288	. . . . . 6 ⊢ (2↑-(!‘𝐴)) ∈ V
59	57, 5, 58	fvmpt 6857	. . . . 5 ⊢ (𝐴 ∈ ℕ → (𝐹‘𝐴) = (2↑-(!‘𝐴)))
60		nnz 12272	. . . . . 6 ⊢ (𝐴 ∈ ℕ → 𝐴 ∈ ℤ)
61		uzid 12526	. . . . . 6 ⊢ (𝐴 ∈ ℤ → 𝐴 ∈ (ℤ_≥‘𝐴))
62		oveq1 7262	. . . . . . . . 9 ⊢ (𝑐 = 𝐴 → (𝑐 − 𝐴) = (𝐴 − 𝐴))
63	62	oveq2d 7271	. . . . . . . 8 ⊢ (𝑐 = 𝐴 → ((1 / 2)↑(𝑐 − 𝐴)) = ((1 / 2)↑(𝐴 − 𝐴)))
64	63	oveq2d 7271	. . . . . . 7 ⊢ (𝑐 = 𝐴 → ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑐 − 𝐴))) = ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝐴 − 𝐴))))
65		aaliou3lem.a	. . . . . . 7 ⊢ 𝐺 = (𝑐 ∈ (ℤ_≥‘𝐴) ↦ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑐 − 𝐴))))
66		ovex 7288	. . . . . . 7 ⊢ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝐴 − 𝐴))) ∈ V
67	64, 65, 66	fvmpt 6857	. . . . . 6 ⊢ (𝐴 ∈ (ℤ_≥‘𝐴) → (𝐺‘𝐴) = ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝐴 − 𝐴))))
68	60, 61, 67	3syl 18	. . . . 5 ⊢ (𝐴 ∈ ℕ → (𝐺‘𝐴) = ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝐴 − 𝐴))))
69	54, 59, 68	3brtr4d 5102	. . . 4 ⊢ (𝐴 ∈ ℕ → (𝐹‘𝐴) ≤ (𝐺‘𝐴))
70		eluznn 12587	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 𝑑 ∈ ℕ)
71	70	nnnn0d 12223	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 𝑑 ∈ ℕ₀)
72	71	faccld 13926	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (!‘𝑑) ∈ ℕ)
73	72	nnzd 12354	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (!‘𝑑) ∈ ℤ)
74	73	znegcld 12357	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → -(!‘𝑑) ∈ ℤ)
75		rpexpcl 13729	. . . . . . . . . . . . . 14 ⊢ ((2 ∈ ℝ⁺ ∧ -(!‘𝑑) ∈ ℤ) → (2↑-(!‘𝑑)) ∈ ℝ⁺)
76	9, 74, 75	sylancr 586	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑-(!‘𝑑)) ∈ ℝ⁺)
77	76	rpred 12701	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑-(!‘𝑑)) ∈ ℝ)
78	76	rpge0d 12705	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 0 ≤ (2↑-(!‘𝑑)))
79		simpl 482	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 𝐴 ∈ ℕ)
80	79	nnnn0d 12223	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 𝐴 ∈ ℕ₀)
81	80	faccld 13926	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (!‘𝐴) ∈ ℕ)
82	81	nnzd 12354	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (!‘𝐴) ∈ ℤ)
83	82	znegcld 12357	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → -(!‘𝐴) ∈ ℤ)
84	9, 83, 39	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑-(!‘𝐴)) ∈ ℝ⁺)
85		halfre 12117	. . . . . . . . . . . . . . . 16 ⊢ (1 / 2) ∈ ℝ
86		halfgt0 12119	. . . . . . . . . . . . . . . 16 ⊢ 0 < (1 / 2)
87	85, 86	elrpii 12662	. . . . . . . . . . . . . . 15 ⊢ (1 / 2) ∈ ℝ⁺
88		eluzelz 12521	. . . . . . . . . . . . . . . 16 ⊢ (𝑑 ∈ (ℤ_≥‘𝐴) → 𝑑 ∈ ℤ)
89		zsubcl 12292	. . . . . . . . . . . . . . . 16 ⊢ ((𝑑 ∈ ℤ ∧ 𝐴 ∈ ℤ) → (𝑑 − 𝐴) ∈ ℤ)
90	88, 60, 89	syl2anr 596	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝑑 − 𝐴) ∈ ℤ)
91		rpexpcl 13729	. . . . . . . . . . . . . . 15 ⊢ (((1 / 2) ∈ ℝ⁺ ∧ (𝑑 − 𝐴) ∈ ℤ) → ((1 / 2)↑(𝑑 − 𝐴)) ∈ ℝ⁺)
92	87, 90, 91	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((1 / 2)↑(𝑑 − 𝐴)) ∈ ℝ⁺)
93	84, 92	rpmulcld 12717	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∈ ℝ⁺)
94	93	rpred 12701	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∈ ℝ)
95	77, 78, 94	jca31 514	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (((2↑-(!‘𝑑)) ∈ ℝ ∧ 0 ≤ (2↑-(!‘𝑑))) ∧ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∈ ℝ))
96	95	adantr 480	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) ∧ (2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴)))) → (((2↑-(!‘𝑑)) ∈ ℝ ∧ 0 ≤ (2↑-(!‘𝑑))) ∧ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∈ ℝ))
97	88	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 𝑑 ∈ ℤ)
98	74, 97	zmulcld 12361	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-(!‘𝑑) · 𝑑) ∈ ℤ)
99		rpexpcl 13729	. . . . . . . . . . . . . 14 ⊢ ((2 ∈ ℝ⁺ ∧ (-(!‘𝑑) · 𝑑) ∈ ℤ) → (2↑(-(!‘𝑑) · 𝑑)) ∈ ℝ⁺)
100	9, 98, 99	sylancr 586	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑(-(!‘𝑑) · 𝑑)) ∈ ℝ⁺)
101	100	rpred 12701	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑(-(!‘𝑑) · 𝑑)) ∈ ℝ)
102	100	rpge0d 12705	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 0 ≤ (2↑(-(!‘𝑑) · 𝑑)))
103	85	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (1 / 2) ∈ ℝ)
104	101, 102, 103	jca31 514	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (((2↑(-(!‘𝑑) · 𝑑)) ∈ ℝ ∧ 0 ≤ (2↑(-(!‘𝑑) · 𝑑))) ∧ (1 / 2) ∈ ℝ))
105	104	adantr 480	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) ∧ (2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴)))) → (((2↑(-(!‘𝑑) · 𝑑)) ∈ ℝ ∧ 0 ≤ (2↑(-(!‘𝑑) · 𝑑))) ∧ (1 / 2) ∈ ℝ))
106		simpr 484	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) ∧ (2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴)))) → (2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))))
107		2re 11977	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℝ
108		1le2 12112	. . . . . . . . . . . . 13 ⊢ 1 ≤ 2
109	72	nncnd 11919	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (!‘𝑑) ∈ ℂ)
110	97	zcnd 12356	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 𝑑 ∈ ℂ)
111	109, 110	mulneg1d 11358	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-(!‘𝑑) · 𝑑) = -((!‘𝑑) · 𝑑))
112	72, 70	nnmulcld 11956	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((!‘𝑑) · 𝑑) ∈ ℕ)
113	112	nnge1d 11951	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 1 ≤ ((!‘𝑑) · 𝑑))
114		1re 10906	. . . . . . . . . . . . . . . . 17 ⊢ 1 ∈ ℝ
115	112	nnred 11918	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((!‘𝑑) · 𝑑) ∈ ℝ)
116		leneg 11408	. . . . . . . . . . . . . . . . 17 ⊢ ((1 ∈ ℝ ∧ ((!‘𝑑) · 𝑑) ∈ ℝ) → (1 ≤ ((!‘𝑑) · 𝑑) ↔ -((!‘𝑑) · 𝑑) ≤ -1))
117	114, 115, 116	sylancr 586	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (1 ≤ ((!‘𝑑) · 𝑑) ↔ -((!‘𝑑) · 𝑑) ≤ -1))
118	113, 117	mpbid 231	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → -((!‘𝑑) · 𝑑) ≤ -1)
119	111, 118	eqbrtrd 5092	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-(!‘𝑑) · 𝑑) ≤ -1)
120		neg1z 12286	. . . . . . . . . . . . . . 15 ⊢ -1 ∈ ℤ
121		eluz 12525	. . . . . . . . . . . . . . 15 ⊢ (((-(!‘𝑑) · 𝑑) ∈ ℤ ∧ -1 ∈ ℤ) → (-1 ∈ (ℤ_≥‘(-(!‘𝑑) · 𝑑)) ↔ (-(!‘𝑑) · 𝑑) ≤ -1))
122	98, 120, 121	sylancl 585	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-1 ∈ (ℤ_≥‘(-(!‘𝑑) · 𝑑)) ↔ (-(!‘𝑑) · 𝑑) ≤ -1))
123	119, 122	mpbird 256	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → -1 ∈ (ℤ_≥‘(-(!‘𝑑) · 𝑑)))
124		leexp2a 13818	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℝ ∧ 1 ≤ 2 ∧ -1 ∈ (ℤ_≥‘(-(!‘𝑑) · 𝑑))) → (2↑(-(!‘𝑑) · 𝑑)) ≤ (2↑-1))
125	107, 108, 123, 124	mp3an12i 1463	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑(-(!‘𝑑) · 𝑑)) ≤ (2↑-1))
126		2cn 11978	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℂ
127		expn1 13720	. . . . . . . . . . . . 13 ⊢ (2 ∈ ℂ → (2↑-1) = (1 / 2))
128	126, 127	ax-mp 5	. . . . . . . . . . . 12 ⊢ (2↑-1) = (1 / 2)
129	125, 128	breqtrdi 5111	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑(-(!‘𝑑) · 𝑑)) ≤ (1 / 2))
130	129	adantr 480	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) ∧ (2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴)))) → (2↑(-(!‘𝑑) · 𝑑)) ≤ (1 / 2))
131		lemul12a 11763	. . . . . . . . . . 11 ⊢ (((((2↑-(!‘𝑑)) ∈ ℝ ∧ 0 ≤ (2↑-(!‘𝑑))) ∧ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∈ ℝ) ∧ (((2↑(-(!‘𝑑) · 𝑑)) ∈ ℝ ∧ 0 ≤ (2↑(-(!‘𝑑) · 𝑑))) ∧ (1 / 2) ∈ ℝ)) → (((2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∧ (2↑(-(!‘𝑑) · 𝑑)) ≤ (1 / 2)) → ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))) ≤ (((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) · (1 / 2))))
132	131	3impia 1115	. . . . . . . . . 10 ⊢ (((((2↑-(!‘𝑑)) ∈ ℝ ∧ 0 ≤ (2↑-(!‘𝑑))) ∧ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∈ ℝ) ∧ (((2↑(-(!‘𝑑) · 𝑑)) ∈ ℝ ∧ 0 ≤ (2↑(-(!‘𝑑) · 𝑑))) ∧ (1 / 2) ∈ ℝ) ∧ ((2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∧ (2↑(-(!‘𝑑) · 𝑑)) ≤ (1 / 2))) → ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))) ≤ (((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) · (1 / 2)))
133	96, 105, 106, 130, 132	syl112anc 1372	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) ∧ (2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴)))) → ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))) ≤ (((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) · (1 / 2)))
134	133	ex 412	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) → ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))) ≤ (((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) · (1 / 2))))
135		facp1 13920	. . . . . . . . . . . . . 14 ⊢ (𝑑 ∈ ℕ₀ → (!‘(𝑑 + 1)) = ((!‘𝑑) · (𝑑 + 1)))
136	71, 135	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (!‘(𝑑 + 1)) = ((!‘𝑑) · (𝑑 + 1)))
137	136	negeqd 11145	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → -(!‘(𝑑 + 1)) = -((!‘𝑑) · (𝑑 + 1)))
138		ax-1cn 10860	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℂ
139		addcom 11091	. . . . . . . . . . . . . . 15 ⊢ ((𝑑 ∈ ℂ ∧ 1 ∈ ℂ) → (𝑑 + 1) = (1 + 𝑑))
140	110, 138, 139	sylancl 585	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝑑 + 1) = (1 + 𝑑))
141	140	oveq2d 7271	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-(!‘𝑑) · (𝑑 + 1)) = (-(!‘𝑑) · (1 + 𝑑)))
142		peano2cn 11077	. . . . . . . . . . . . . . 15 ⊢ (𝑑 ∈ ℂ → (𝑑 + 1) ∈ ℂ)
143	110, 142	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝑑 + 1) ∈ ℂ)
144	109, 143	mulneg1d 11358	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-(!‘𝑑) · (𝑑 + 1)) = -((!‘𝑑) · (𝑑 + 1)))
145	74	zcnd 12356	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → -(!‘𝑑) ∈ ℂ)
146		1cnd 10901	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 1 ∈ ℂ)
147	145, 146, 110	adddid 10930	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-(!‘𝑑) · (1 + 𝑑)) = ((-(!‘𝑑) · 1) + (-(!‘𝑑) · 𝑑)))
148	145	mulid1d 10923	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-(!‘𝑑) · 1) = -(!‘𝑑))
149	148	oveq1d 7270	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((-(!‘𝑑) · 1) + (-(!‘𝑑) · 𝑑)) = (-(!‘𝑑) + (-(!‘𝑑) · 𝑑)))
150	147, 149	eqtrd 2778	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (-(!‘𝑑) · (1 + 𝑑)) = (-(!‘𝑑) + (-(!‘𝑑) · 𝑑)))
151	141, 144, 150	3eqtr3d 2786	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → -((!‘𝑑) · (𝑑 + 1)) = (-(!‘𝑑) + (-(!‘𝑑) · 𝑑)))
152	137, 151	eqtrd 2778	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → -(!‘(𝑑 + 1)) = (-(!‘𝑑) + (-(!‘𝑑) · 𝑑)))
153	152	oveq2d 7271	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑-(!‘(𝑑 + 1))) = (2↑(-(!‘𝑑) + (-(!‘𝑑) · 𝑑))))
154		2cnne0 12113	. . . . . . . . . . . 12 ⊢ (2 ∈ ℂ ∧ 2 ≠ 0)
155		expaddz 13755	. . . . . . . . . . . 12 ⊢ (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ (-(!‘𝑑) ∈ ℤ ∧ (-(!‘𝑑) · 𝑑) ∈ ℤ)) → (2↑(-(!‘𝑑) + (-(!‘𝑑) · 𝑑))) = ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))))
156	154, 155	mpan 686	. . . . . . . . . . 11 ⊢ ((-(!‘𝑑) ∈ ℤ ∧ (-(!‘𝑑) · 𝑑) ∈ ℤ) → (2↑(-(!‘𝑑) + (-(!‘𝑑) · 𝑑))) = ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))))
157	74, 98, 156	syl2anc 583	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑(-(!‘𝑑) + (-(!‘𝑑) · 𝑑))) = ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))))
158	153, 157	eqtrd 2778	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑-(!‘(𝑑 + 1))) = ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))))
159	43	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → 𝐴 ∈ ℂ)
160	110, 146, 159	addsubd 11283	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((𝑑 + 1) − 𝐴) = ((𝑑 − 𝐴) + 1))
161	160	oveq2d 7271	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((1 / 2)↑((𝑑 + 1) − 𝐴)) = ((1 / 2)↑((𝑑 − 𝐴) + 1)))
162		uznn0sub 12546	. . . . . . . . . . . . . 14 ⊢ (𝑑 ∈ (ℤ_≥‘𝐴) → (𝑑 − 𝐴) ∈ ℕ₀)
163	162	adantl 481	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝑑 − 𝐴) ∈ ℕ₀)
164		expp1 13717	. . . . . . . . . . . . 13 ⊢ (((1 / 2) ∈ ℂ ∧ (𝑑 − 𝐴) ∈ ℕ₀) → ((1 / 2)↑((𝑑 − 𝐴) + 1)) = (((1 / 2)↑(𝑑 − 𝐴)) · (1 / 2)))
165	46, 163, 164	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((1 / 2)↑((𝑑 − 𝐴) + 1)) = (((1 / 2)↑(𝑑 − 𝐴)) · (1 / 2)))
166	161, 165	eqtrd 2778	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((1 / 2)↑((𝑑 + 1) − 𝐴)) = (((1 / 2)↑(𝑑 − 𝐴)) · (1 / 2)))
167	166	oveq2d 7271	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴))) = ((2↑-(!‘𝐴)) · (((1 / 2)↑(𝑑 − 𝐴)) · (1 / 2))))
168	84	rpcnd 12703	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (2↑-(!‘𝐴)) ∈ ℂ)
169	92	rpcnd 12703	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((1 / 2)↑(𝑑 − 𝐴)) ∈ ℂ)
170	46	a1i 11	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (1 / 2) ∈ ℂ)
171	168, 169, 170	mulassd 10929	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) · (1 / 2)) = ((2↑-(!‘𝐴)) · (((1 / 2)↑(𝑑 − 𝐴)) · (1 / 2))))
172	167, 171	eqtr4d 2781	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴))) = (((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) · (1 / 2)))
173	158, 172	breq12d 5083	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((2↑-(!‘(𝑑 + 1))) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴))) ↔ ((2↑-(!‘𝑑)) · (2↑(-(!‘𝑑) · 𝑑))) ≤ (((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) · (1 / 2))))
174	134, 173	sylibrd 258	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) → (2↑-(!‘(𝑑 + 1))) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴)))))
175		fveq2 6756	. . . . . . . . . . . 12 ⊢ (𝑎 = 𝑑 → (!‘𝑎) = (!‘𝑑))
176	175	negeqd 11145	. . . . . . . . . . 11 ⊢ (𝑎 = 𝑑 → -(!‘𝑎) = -(!‘𝑑))
177	176	oveq2d 7271	. . . . . . . . . 10 ⊢ (𝑎 = 𝑑 → (2↑-(!‘𝑎)) = (2↑-(!‘𝑑)))
178		ovex 7288	. . . . . . . . . 10 ⊢ (2↑-(!‘𝑑)) ∈ V
179	177, 5, 178	fvmpt 6857	. . . . . . . . 9 ⊢ (𝑑 ∈ ℕ → (𝐹‘𝑑) = (2↑-(!‘𝑑)))
180	70, 179	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝐹‘𝑑) = (2↑-(!‘𝑑)))
181		oveq1 7262	. . . . . . . . . . . 12 ⊢ (𝑐 = 𝑑 → (𝑐 − 𝐴) = (𝑑 − 𝐴))
182	181	oveq2d 7271	. . . . . . . . . . 11 ⊢ (𝑐 = 𝑑 → ((1 / 2)↑(𝑐 − 𝐴)) = ((1 / 2)↑(𝑑 − 𝐴)))
183	182	oveq2d 7271	. . . . . . . . . 10 ⊢ (𝑐 = 𝑑 → ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑐 − 𝐴))) = ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))))
184		ovex 7288	. . . . . . . . . 10 ⊢ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))) ∈ V
185	183, 65, 184	fvmpt 6857	. . . . . . . . 9 ⊢ (𝑑 ∈ (ℤ_≥‘𝐴) → (𝐺‘𝑑) = ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))))
186	185	adantl 481	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝐺‘𝑑) = ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴))))
187	180, 186	breq12d 5083	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((𝐹‘𝑑) ≤ (𝐺‘𝑑) ↔ (2↑-(!‘𝑑)) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑑 − 𝐴)))))
188	70	peano2nnd 11920	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝑑 + 1) ∈ ℕ)
189		fveq2 6756	. . . . . . . . . . . 12 ⊢ (𝑎 = (𝑑 + 1) → (!‘𝑎) = (!‘(𝑑 + 1)))
190	189	negeqd 11145	. . . . . . . . . . 11 ⊢ (𝑎 = (𝑑 + 1) → -(!‘𝑎) = -(!‘(𝑑 + 1)))
191	190	oveq2d 7271	. . . . . . . . . 10 ⊢ (𝑎 = (𝑑 + 1) → (2↑-(!‘𝑎)) = (2↑-(!‘(𝑑 + 1))))
192		ovex 7288	. . . . . . . . . 10 ⊢ (2↑-(!‘(𝑑 + 1))) ∈ V
193	191, 5, 192	fvmpt 6857	. . . . . . . . 9 ⊢ ((𝑑 + 1) ∈ ℕ → (𝐹‘(𝑑 + 1)) = (2↑-(!‘(𝑑 + 1))))
194	188, 193	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝐹‘(𝑑 + 1)) = (2↑-(!‘(𝑑 + 1))))
195		peano2uz 12570	. . . . . . . . . 10 ⊢ (𝑑 ∈ (ℤ_≥‘𝐴) → (𝑑 + 1) ∈ (ℤ_≥‘𝐴))
196		oveq1 7262	. . . . . . . . . . . . 13 ⊢ (𝑐 = (𝑑 + 1) → (𝑐 − 𝐴) = ((𝑑 + 1) − 𝐴))
197	196	oveq2d 7271	. . . . . . . . . . . 12 ⊢ (𝑐 = (𝑑 + 1) → ((1 / 2)↑(𝑐 − 𝐴)) = ((1 / 2)↑((𝑑 + 1) − 𝐴)))
198	197	oveq2d 7271	. . . . . . . . . . 11 ⊢ (𝑐 = (𝑑 + 1) → ((2↑-(!‘𝐴)) · ((1 / 2)↑(𝑐 − 𝐴))) = ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴))))
199		ovex 7288	. . . . . . . . . . 11 ⊢ ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴))) ∈ V
200	198, 65, 199	fvmpt 6857	. . . . . . . . . 10 ⊢ ((𝑑 + 1) ∈ (ℤ_≥‘𝐴) → (𝐺‘(𝑑 + 1)) = ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴))))
201	195, 200	syl 17	. . . . . . . . 9 ⊢ (𝑑 ∈ (ℤ_≥‘𝐴) → (𝐺‘(𝑑 + 1)) = ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴))))
202	201	adantl 481	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → (𝐺‘(𝑑 + 1)) = ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴))))
203	194, 202	breq12d 5083	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((𝐹‘(𝑑 + 1)) ≤ (𝐺‘(𝑑 + 1)) ↔ (2↑-(!‘(𝑑 + 1))) ≤ ((2↑-(!‘𝐴)) · ((1 / 2)↑((𝑑 + 1) − 𝐴)))))
204	174, 187, 203	3imtr4d 293	. . . . . 6 ⊢ ((𝐴 ∈ ℕ ∧ 𝑑 ∈ (ℤ_≥‘𝐴)) → ((𝐹‘𝑑) ≤ (𝐺‘𝑑) → (𝐹‘(𝑑 + 1)) ≤ (𝐺‘(𝑑 + 1))))
205	204	expcom 413	. . . . 5 ⊢ (𝑑 ∈ (ℤ_≥‘𝐴) → (𝐴 ∈ ℕ → ((𝐹‘𝑑) ≤ (𝐺‘𝑑) → (𝐹‘(𝑑 + 1)) ≤ (𝐺‘(𝑑 + 1)))))
206	205	a2d 29	. . . 4 ⊢ (𝑑 ∈ (ℤ_≥‘𝐴) → ((𝐴 ∈ ℕ → (𝐹‘𝑑) ≤ (𝐺‘𝑑)) → (𝐴 ∈ ℕ → (𝐹‘(𝑑 + 1)) ≤ (𝐺‘(𝑑 + 1)))))
207	22, 26, 30, 34, 69, 206	uzind4i 12579	. . 3 ⊢ (𝐵 ∈ (ℤ_≥‘𝐴) → (𝐴 ∈ ℕ → (𝐹‘𝐵) ≤ (𝐺‘𝐵)))
208	207	impcom 407	. 2 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (𝐹‘𝐵) ≤ (𝐺‘𝐵))
209		0xr 10953	. . 3 ⊢ 0 ∈ ℝ^*
210	65	aaliou3lem1 25407	. . 3 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (𝐺‘𝐵) ∈ ℝ)
211		elioc2 13071	. . 3 ⊢ ((0 ∈ ℝ^* ∧ (𝐺‘𝐵) ∈ ℝ) → ((𝐹‘𝐵) ∈ (0(,](𝐺‘𝐵)) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 0 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ (𝐺‘𝐵))))
212	209, 210, 211	sylancr 586	. 2 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → ((𝐹‘𝐵) ∈ (0(,](𝐺‘𝐵)) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 0 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ (𝐺‘𝐵))))
213	17, 18, 208, 212	mpbir3and 1340	1 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (ℤ_≥‘𝐴)) → (𝐹‘𝐵) ∈ (0(,](𝐺‘𝐵)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 395 ∧ w3a 1085 = wceq 1539 ∈ wcel 2108 ≠ wne 2942 class class class wbr 5070 ↦ cmpt 5153 ‘cfv 6418 (class class class)co 7255 ℂcc 10800 ℝcr 10801 0cc0 10802 1c1 10803 + caddc 10805 · cmul 10807 ℝ^*cxr 10939 < clt 10940 ≤ cle 10941 − cmin 11135 -cneg 11136 / cdiv 11562 ℕcn 11903 2c2 11958 ℕ₀cn0 12163 ℤcz 12249 ℤ_≥cuz 12511 ℝ⁺crp 12659 (,]cioc 13009 ↑cexp 13710 !cfa 13915

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1799 ax-4 1813 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2156 ax-12 2173 ax-ext 2709 ax-sep 5218 ax-nul 5225 ax-pow 5283 ax-pr 5347 ax-un 7566 ax-cnex 10858 ax-resscn 10859 ax-1cn 10860 ax-icn 10861 ax-addcl 10862 ax-addrcl 10863 ax-mulcl 10864 ax-mulrcl 10865 ax-mulcom 10866 ax-addass 10867 ax-mulass 10868 ax-distr 10869 ax-i2m1 10870 ax-1ne0 10871 ax-1rid 10872 ax-rnegex 10873 ax-rrecex 10874 ax-cnre 10875 ax-pre-lttri 10876 ax-pre-lttrn 10877 ax-pre-ltadd 10878 ax-pre-mulgt0 10879

This theorem depends on definitions: df-bi 206 df-an 396 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1784 df-nf 1788 df-sb 2069 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2817 df-nfc 2888 df-ne 2943 df-nel 3049 df-ral 3068 df-rex 3069 df-reu 3070 df-rmo 3071 df-rab 3072 df-v 3424 df-sbc 3712 df-csb 3829 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3902 df-nul 4254 df-if 4457 df-pw 4532 df-sn 4559 df-pr 4561 df-tp 4563 df-op 4565 df-uni 4837 df-iun 4923 df-br 5071 df-opab 5133 df-mpt 5154 df-tr 5188 df-id 5480 df-eprel 5486 df-po 5494 df-so 5495 df-fr 5535 df-we 5537 df-xp 5586 df-rel 5587 df-cnv 5588 df-co 5589 df-dm 5590 df-rn 5591 df-res 5592 df-ima 5593 df-pred 6191 df-ord 6254 df-on 6255 df-lim 6256 df-suc 6257 df-iota 6376 df-fun 6420 df-fn 6421 df-f 6422 df-f1 6423 df-fo 6424 df-f1o 6425 df-fv 6426 df-riota 7212 df-ov 7258 df-oprab 7259 df-mpo 7260 df-om 7688 df-2nd 7805 df-frecs 8068 df-wrecs 8099 df-recs 8173 df-rdg 8212 df-er 8456 df-en 8692 df-dom 8693 df-sdom 8694 df-pnf 10942 df-mnf 10943 df-xr 10944 df-ltxr 10945 df-le 10946 df-sub 11137 df-neg 11138 df-div 11563 df-nn 11904 df-2 11966 df-n0 12164 df-z 12250 df-uz 12512 df-rp 12660 df-ioc 13013 df-seq 13650 df-exp 13711 df-fac 13916

This theorem is referenced by: aaliou3lem3 25409

W3C validator