etransclem47 - Mathbox for Glauco Siliprandi

	Mathbox for Glauco Siliprandi		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > etransclem47		Structured version Visualization version GIF version

Theorem etransclem47 44997

Description: e is transcendental. Section *5 of [Juillerat] p. 11 can be used as a reference for this proof. (Contributed by Glauco Siliprandi, 5-Apr-2020.)

**Hypotheses**
Ref	Expression
etransclem47.q	⊢ (𝜑 → 𝑄 ∈ ((Poly‘ℤ) ∖ {0_𝑝}))
etransclem47.qe0	⊢ (𝜑 → (𝑄‘e) = 0)
etransclem47.a	⊢ 𝐴 = (coeff‘𝑄)
etransclem47.a0	⊢ (𝜑 → (𝐴‘0) ≠ 0)
etransclem47.m	⊢ 𝑀 = (deg‘𝑄)
etransclem47.p	⊢ (𝜑 → 𝑃 ∈ ℙ)
etransclem47.ap	⊢ (𝜑 → (abs‘(𝐴‘0)) < 𝑃)
etransclem47.mp	⊢ (𝜑 → (!‘𝑀) < 𝑃)
etransclem47.9	⊢ (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴‘𝑗) · (e↑_𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) < 1)
etransclem47.f	⊢ 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥 − 𝑗)↑𝑃)))
etransclem47.l	⊢ 𝐿 = Σ𝑗 ∈ (0...𝑀)(((𝐴‘𝑗) · (e↑_𝑐𝑗)) · ∫(0(,)𝑗)((e↑_𝑐-𝑥) · (𝐹‘𝑥)) d𝑥)
etransclem47.k	⊢ 𝐾 = (𝐿 / (!‘(𝑃 − 1)))

**Assertion**
Ref	Expression
etransclem47	⊢ (𝜑 → ∃𝑘 ∈ ℤ (𝑘 ≠ 0 ∧ (abs‘𝑘) < 1))

Distinct variable groups: 𝐴,𝑗,𝑘 𝑗,𝐹,𝑘,𝑥 𝑘,𝐾 𝑗,𝑀,𝑘,𝑥 𝑃,𝑗,𝑘,𝑥 𝑄,𝑗 𝜑,𝑗,𝑘,𝑥 Allowed substitution hints: 𝐴(𝑥) 𝑄(𝑥,𝑘) 𝐾(𝑥,𝑗) 𝐿(𝑥,𝑗,𝑘)

Proof of Theorem etransclem47 Dummy variables 𝑖 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		etransclem47.k	. . . . 5 ⊢ 𝐾 = (𝐿 / (!‘(𝑃 − 1)))
2	1	a1i 11	. . . 4 ⊢ (𝜑 → 𝐾 = (𝐿 / (!‘(𝑃 − 1))))
3		etransclem47.q	. . . . 5 ⊢ (𝜑 → 𝑄 ∈ ((Poly‘ℤ) ∖ {0_𝑝}))
4		etransclem47.qe0	. . . . 5 ⊢ (𝜑 → (𝑄‘e) = 0)
5		etransclem47.a	. . . . 5 ⊢ 𝐴 = (coeff‘𝑄)
6		etransclem47.m	. . . . 5 ⊢ 𝑀 = (deg‘𝑄)
7		ssid 4005	. . . . . 6 ⊢ ℝ ⊆ ℝ
8	7	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ⊆ ℝ)
9		reelprrecn 11202	. . . . . 6 ⊢ ℝ ∈ {ℝ, ℂ}
10	9	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
11		reopn 43999	. . . . . . 7 ⊢ ℝ ∈ (topGen‘ran (,))
12		eqid 2733	. . . . . . . 8 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
13	12	tgioo2 24319	. . . . . . 7 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
14	11, 13	eleqtri 2832	. . . . . 6 ⊢ ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ)
15	14	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ))
16		etransclem47.p	. . . . . 6 ⊢ (𝜑 → 𝑃 ∈ ℙ)
17		prmnn 16611	. . . . . 6 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
18	16, 17	syl 17	. . . . 5 ⊢ (𝜑 → 𝑃 ∈ ℕ)
19		etransclem47.f	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥 − 𝑗)↑𝑃)))
20		etransclem47.l	. . . . 5 ⊢ 𝐿 = Σ𝑗 ∈ (0...𝑀)(((𝐴‘𝑗) · (e↑_𝑐𝑗)) · ∫(0(,)𝑗)((e↑_𝑐-𝑥) · (𝐹‘𝑥)) d𝑥)
21		eqid 2733	. . . . 5 ⊢ ((𝑀 · 𝑃) + (𝑃 − 1)) = ((𝑀 · 𝑃) + (𝑃 − 1))
22		fveq2 6892	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦) = (((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
23	22	sumeq2sdv 15650	. . . . . 6 ⊢ (𝑦 = 𝑥 → Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦) = Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
24	23	cbvmptv 5262	. . . . 5 ⊢ (𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦)) = (𝑥 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
25		negeq 11452	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → -𝑧 = -𝑥)
26	25	oveq2d 7425	. . . . . . . 8 ⊢ (𝑧 = 𝑥 → (e↑_𝑐-𝑧) = (e↑_𝑐-𝑥))
27		fveq2 6892	. . . . . . . 8 ⊢ (𝑧 = 𝑥 → ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧) = ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥))
28	26, 27	oveq12d 7427	. . . . . . 7 ⊢ (𝑧 = 𝑥 → ((e↑_𝑐-𝑧) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧)) = ((e↑_𝑐-𝑥) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥)))
29	28	negeqd 11454	. . . . . 6 ⊢ (𝑧 = 𝑥 → -((e↑_𝑐-𝑧) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧)) = -((e↑_𝑐-𝑥) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥)))
30	29	cbvmptv 5262	. . . . 5 ⊢ (𝑧 ∈ (0[,]𝑗) ↦ -((e↑_𝑐-𝑧) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧))) = (𝑥 ∈ (0[,]𝑗) ↦ -((e↑_𝑐-𝑥) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥)))
31	3, 4, 5, 6, 8, 10, 15, 18, 19, 20, 21, 24, 30	etransclem46 44996	. . . 4 ⊢ (𝜑 → (𝐿 / (!‘(𝑃 − 1))) = (-Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
32		fzfid 13938	. . . . . . . 8 ⊢ (𝜑 → (0...𝑀) ∈ Fin)
33		fzfid 13938	. . . . . . . 8 ⊢ (𝜑 → (0...((𝑀 · 𝑃) + (𝑃 − 1))) ∈ Fin)
34		xpfi 9317	. . . . . . . 8 ⊢ (((0...𝑀) ∈ Fin ∧ (0...((𝑀 · 𝑃) + (𝑃 − 1))) ∈ Fin) → ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) ∈ Fin)
35	32, 33, 34	syl2anc 585	. . . . . . 7 ⊢ (𝜑 → ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) ∈ Fin)
36	3	eldifad 3961	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑄 ∈ (Poly‘ℤ))
37		0zd 12570	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ∈ ℤ)
38	5	coef2 25745	. . . . . . . . . . . 12 ⊢ ((𝑄 ∈ (Poly‘ℤ) ∧ 0 ∈ ℤ) → 𝐴:ℕ₀⟶ℤ)
39	36, 37, 38	syl2anc 585	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴:ℕ₀⟶ℤ)
40	39	adantr 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝐴:ℕ₀⟶ℤ)
41		xp1st 8007	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (1^st ‘𝑘) ∈ (0...𝑀))
42		elfznn0 13594	. . . . . . . . . . . 12 ⊢ ((1^st ‘𝑘) ∈ (0...𝑀) → (1^st ‘𝑘) ∈ ℕ₀)
43	41, 42	syl 17	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (1^st ‘𝑘) ∈ ℕ₀)
44	43	adantl 483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (1^st ‘𝑘) ∈ ℕ₀)
45	40, 44	ffvelcdmd 7088	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (𝐴‘(1^st ‘𝑘)) ∈ ℤ)
46	45	zcnd 12667	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (𝐴‘(1^st ‘𝑘)) ∈ ℂ)
47	9	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ℝ ∈ {ℝ, ℂ})
48	14	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ))
49	18	adantr 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝑃 ∈ ℕ)
50		dgrcl 25747	. . . . . . . . . . . . 13 ⊢ (𝑄 ∈ (Poly‘ℤ) → (deg‘𝑄) ∈ ℕ₀)
51	36, 50	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (deg‘𝑄) ∈ ℕ₀)
52	6, 51	eqeltrid 2838	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℕ₀)
53	52	adantr 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝑀 ∈ ℕ₀)
54		xp2nd 8008	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (2^nd ‘𝑘) ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1))))
55		elfznn0 13594	. . . . . . . . . . . 12 ⊢ ((2^nd ‘𝑘) ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1))) → (2^nd ‘𝑘) ∈ ℕ₀)
56	54, 55	syl 17	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (2^nd ‘𝑘) ∈ ℕ₀)
57	56	adantl 483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (2^nd ‘𝑘) ∈ ℕ₀)
58	47, 48, 49, 53, 19, 57	etransclem33 44983	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘)):ℝ⟶ℂ)
59	44	nn0red 12533	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (1^st ‘𝑘) ∈ ℝ)
60	58, 59	ffvelcdmd 7088	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘)) ∈ ℂ)
61	46, 60	mulcld 11234	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) ∈ ℂ)
62	35, 61	fsumcl 15679	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) ∈ ℂ)
63		nnm1nn0 12513	. . . . . . . . 9 ⊢ (𝑃 ∈ ℕ → (𝑃 − 1) ∈ ℕ₀)
64	18, 63	syl 17	. . . . . . . 8 ⊢ (𝜑 → (𝑃 − 1) ∈ ℕ₀)
65	64	faccld 14244	. . . . . . 7 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ)
66	65	nncnd 12228	. . . . . 6 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℂ)
67	65	nnne0d 12262	. . . . . 6 ⊢ (𝜑 → (!‘(𝑃 − 1)) ≠ 0)
68	62, 66, 67	divnegd 12003	. . . . 5 ⊢ (𝜑 → -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) = (-Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
69	68	eqcomd 2739	. . . 4 ⊢ (𝜑 → (-Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) = -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
70	2, 31, 69	3eqtrd 2777	. . 3 ⊢ (𝜑 → 𝐾 = -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
71		eqid 2733	. . . . 5 ⊢ (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) = (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1)))
72	18, 52, 19, 39, 71	etransclem45 44995	. . . 4 ⊢ (𝜑 → (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ∈ ℤ)
73	72	znegcld 12668	. . 3 ⊢ (𝜑 → -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ∈ ℤ)
74	70, 73	eqeltrd 2834	. 2 ⊢ (𝜑 → 𝐾 ∈ ℤ)
75	1, 31	eqtrid 2785	. . 3 ⊢ (𝜑 → 𝐾 = (-Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
76	62, 66, 67	divcld 11990	. . . . 5 ⊢ (𝜑 → (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ∈ ℂ)
77		etransclem47.a0	. . . . . 6 ⊢ (𝜑 → (𝐴‘0) ≠ 0)
78		etransclem47.ap	. . . . . 6 ⊢ (𝜑 → (abs‘(𝐴‘0)) < 𝑃)
79		etransclem47.mp	. . . . . 6 ⊢ (𝜑 → (!‘𝑀) < 𝑃)
80	39, 77, 52, 16, 78, 79, 19, 71	etransclem44 44994	. . . . 5 ⊢ (𝜑 → (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
81	76, 80	negne0d 11569	. . . 4 ⊢ (𝜑 → -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
82	69, 81	eqnetrd 3009	. . 3 ⊢ (𝜑 → (-Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
83	75, 82	eqnetrd 3009	. 2 ⊢ (𝜑 → 𝐾 ≠ 0)
84		eldifsni 4794	. . . . . 6 ⊢ (𝑄 ∈ ((Poly‘ℤ) ∖ {0_𝑝}) → 𝑄 ≠ 0_𝑝)
85	3, 84	syl 17	. . . . 5 ⊢ (𝜑 → 𝑄 ≠ 0_𝑝)
86		ere 16032	. . . . . . 7 ⊢ e ∈ ℝ
87	86	recni 11228	. . . . . 6 ⊢ e ∈ ℂ
88	87	a1i 11	. . . . 5 ⊢ (𝜑 → e ∈ ℂ)
89		dgrnznn 25761	. . . . 5 ⊢ (((𝑄 ∈ (Poly‘ℤ) ∧ 𝑄 ≠ 0_𝑝) ∧ (e ∈ ℂ ∧ (𝑄‘e) = 0)) → (deg‘𝑄) ∈ ℕ)
90	36, 85, 88, 4, 89	syl22anc 838	. . . 4 ⊢ (𝜑 → (deg‘𝑄) ∈ ℕ)
91	6, 90	eqeltrid 2838	. . 3 ⊢ (𝜑 → 𝑀 ∈ ℕ)
92		etransclem47.9	. . 3 ⊢ (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴‘𝑗) · (e↑_𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) < 1)
93	39, 20, 1, 18, 91, 19, 92	etransclem23 44973	. 2 ⊢ (𝜑 → (abs‘𝐾) < 1)
94		neeq1 3004	. . . 4 ⊢ (𝑘 = 𝐾 → (𝑘 ≠ 0 ↔ 𝐾 ≠ 0))
95		fveq2 6892	. . . . 5 ⊢ (𝑘 = 𝐾 → (abs‘𝑘) = (abs‘𝐾))
96	95	breq1d 5159	. . . 4 ⊢ (𝑘 = 𝐾 → ((abs‘𝑘) < 1 ↔ (abs‘𝐾) < 1))
97	94, 96	anbi12d 632	. . 3 ⊢ (𝑘 = 𝐾 → ((𝑘 ≠ 0 ∧ (abs‘𝑘) < 1) ↔ (𝐾 ≠ 0 ∧ (abs‘𝐾) < 1)))
98	97	rspcev 3613	. 2 ⊢ ((𝐾 ∈ ℤ ∧ (𝐾 ≠ 0 ∧ (abs‘𝐾) < 1)) → ∃𝑘 ∈ ℤ (𝑘 ≠ 0 ∧ (abs‘𝑘) < 1))
99	74, 83, 93, 98	syl12anc 836	1 ⊢ (𝜑 → ∃𝑘 ∈ ℤ (𝑘 ≠ 0 ∧ (abs‘𝑘) < 1))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 397 = wceq 1542 ∈ wcel 2107 ≠ wne 2941 ∃wrex 3071 ∖ cdif 3946 ⊆ wss 3949 {csn 4629 {cpr 4631 class class class wbr 5149 ↦ cmpt 5232 × cxp 5675 ran crn 5678 ⟶wf 6540 ‘cfv 6544 (class class class)co 7409 1^st c1st 7973 2^nd c2nd 7974 Fincfn 8939 ℂcc 11108 ℝcr 11109 0cc0 11110 1c1 11111 + caddc 11113 · cmul 11115 < clt 11248 − cmin 11444 -cneg 11445 / cdiv 11871 ℕcn 12212 ℕ₀cn0 12472 ℤcz 12558 (,)cioo 13324 [,]cicc 13327 ...cfz 13484 ↑cexp 14027 !cfa 14233 abscabs 15181 Σcsu 15632 ∏cprod 15849 eceu 16006 ℙcprime 16608 ↾_t crest 17366 TopOpenctopn 17367 topGenctg 17383 ℂ_fldccnfld 20944 ∫citg 25135 0_𝑝c0p 25186 D^𝑛 cdvn 25381 Polycply 25698 coeffccoe 25700 degcdgr 25701 ↑_𝑐ccxp 26064

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5286 ax-sep 5300 ax-nul 5307 ax-pow 5364 ax-pr 5428 ax-un 7725 ax-inf2 9636 ax-cc 10430 ax-cnex 11166 ax-resscn 11167 ax-1cn 11168 ax-icn 11169 ax-addcl 11170 ax-addrcl 11171 ax-mulcl 11172 ax-mulrcl 11173 ax-mulcom 11174 ax-addass 11175 ax-mulass 11176 ax-distr 11177 ax-i2m1 11178 ax-1ne0 11179 ax-1rid 11180 ax-rnegex 11181 ax-rrecex 11182 ax-cnre 11183 ax-pre-lttri 11184 ax-pre-lttrn 11185 ax-pre-ltadd 11186 ax-pre-mulgt0 11187 ax-pre-sup 11188 ax-addf 11189 ax-mulf 11190

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-symdif 4243 df-nul 4324 df-if 4530 df-pw 4605 df-sn 4630 df-pr 4632 df-tp 4634 df-op 4636 df-uni 4910 df-int 4952 df-iun 5000 df-iin 5001 df-disj 5115 df-br 5150 df-opab 5212 df-mpt 5233 df-tr 5267 df-id 5575 df-eprel 5581 df-po 5589 df-so 5590 df-fr 5632 df-se 5633 df-we 5634 df-xp 5683 df-rel 5684 df-cnv 5685 df-co 5686 df-dm 5687 df-rn 5688 df-res 5689 df-ima 5690 df-pred 6301 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6496 df-fun 6546 df-fn 6547 df-f 6548 df-f1 6549 df-fo 6550 df-f1o 6551 df-fv 6552 df-isom 6553 df-riota 7365 df-ov 7412 df-oprab 7413 df-mpo 7414 df-of 7670 df-ofr 7671 df-om 7856 df-1st 7975 df-2nd 7976 df-supp 8147 df-frecs 8266 df-wrecs 8297 df-recs 8371 df-rdg 8410 df-1o 8466 df-2o 8467 df-oadd 8470 df-omul 8471 df-er 8703 df-map 8822 df-pm 8823 df-ixp 8892 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-fsupp 9362 df-fi 9406 df-sup 9437 df-inf 9438 df-oi 9505 df-dju 9896 df-card 9934 df-acn 9937 df-pnf 11250 df-mnf 11251 df-xr 11252 df-ltxr 11253 df-le 11254 df-sub 11446 df-neg 11447 df-div 11872 df-nn 12213 df-2 12275 df-3 12276 df-4 12277 df-5 12278 df-6 12279 df-7 12280 df-8 12281 df-9 12282 df-n0 12473 df-z 12559 df-dec 12678 df-uz 12823 df-q 12933 df-rp 12975 df-xneg 13092 df-xadd 13093 df-xmul 13094 df-ioo 13328 df-ioc 13329 df-ico 13330 df-icc 13331 df-fz 13485 df-fzo 13628 df-fl 13757 df-mod 13835 df-seq 13967 df-exp 14028 df-fac 14234 df-bc 14263 df-hash 14291 df-shft 15014 df-cj 15046 df-re 15047 df-im 15048 df-sqrt 15182 df-abs 15183 df-limsup 15415 df-clim 15432 df-rlim 15433 df-sum 15633 df-prod 15850 df-ef 16011 df-e 16012 df-sin 16013 df-cos 16014 df-tan 16015 df-pi 16016 df-dvds 16198 df-gcd 16436 df-prm 16609 df-struct 17080 df-sets 17097 df-slot 17115 df-ndx 17127 df-base 17145 df-ress 17174 df-plusg 17210 df-mulr 17211 df-starv 17212 df-sca 17213 df-vsca 17214 df-ip 17215 df-tset 17216 df-ple 17217 df-ds 17219 df-unif 17220 df-hom 17221 df-cco 17222 df-rest 17368 df-topn 17369 df-0g 17387 df-gsum 17388 df-topgen 17389 df-pt 17390 df-prds 17393 df-xrs 17448 df-qtop 17453 df-imas 17454 df-xps 17456 df-mre 17530 df-mrc 17531 df-acs 17533 df-mgm 18561 df-sgrp 18610 df-mnd 18626 df-submnd 18672 df-mulg 18951 df-cntz 19181 df-cmn 19650 df-psmet 20936 df-xmet 20937 df-met 20938 df-bl 20939 df-mopn 20940 df-fbas 20941 df-fg 20942 df-cnfld 20945 df-top 22396 df-topon 22413 df-topsp 22435 df-bases 22449 df-cld 22523 df-ntr 22524 df-cls 22525 df-nei 22602 df-lp 22640 df-perf 22641 df-cn 22731 df-cnp 22732 df-haus 22819 df-cmp 22891 df-tx 23066 df-hmeo 23259 df-fil 23350 df-fm 23442 df-flim 23443 df-flf 23444 df-xms 23826 df-ms 23827 df-tms 23828 df-cncf 24394 df-ovol 24981 df-vol 24982 df-mbf 25136 df-itg1 25137 df-itg2 25138 df-ibl 25139 df-itg 25140 df-0p 25187 df-limc 25383 df-dv 25384 df-dvn 25385 df-ply 25702 df-coe 25704 df-dgr 25705 df-log 26065 df-cxp 26066

This theorem is referenced by: etransclem48 44998

W3C validator