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 47427

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 3931	. . . . . 6 ⊢ ℝ ⊆ ℝ
8	7	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ⊆ ℝ)
9		reelprrecn 11299	. . . . . 6 ⊢ ℝ ∈ {ℝ, ℂ}
10	9	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
11		reopn 46441	. . . . . . 7 ⊢ ℝ ∈ (topGen‘ran (,))
12		tgioo4 25133	. . . . . . 7 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
13	11, 12	eleqtri 2858	. . . . . 6 ⊢ ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ)
14	13	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ))
15		etransclem47.p	. . . . . 6 ⊢ (𝜑 → 𝑃 ∈ ℙ)
16		prmnn 16858	. . . . . 6 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
17	15, 16	syl 18	. . . . 5 ⊢ (𝜑 → 𝑃 ∈ ℕ)
18		etransclem47.f	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥 − 𝑗)↑𝑃)))
19		etransclem47.l	. . . . 5 ⊢ 𝐿 = Σ𝑗 ∈ (0...𝑀)(((𝐴‘𝑗) · (e↑_𝑐𝑗)) · ∫(0(,)𝑗)((e↑_𝑐 -𝑥) · (𝐹‘𝑥)) d𝑥)
20		eqid 2760	. . . . 5 ⊢ ((𝑀 · 𝑃) + (𝑃 − 1)) = ((𝑀 · 𝑃) + (𝑃 − 1))
21		fveq2 6890	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦) = (((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
22	21	sumeq2sdv 15879	. . . . . 6 ⊢ (𝑦 = 𝑥 → Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦) = Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
23	22	cbvmptv 5208	. . . . 5 ⊢ (𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦)) = (𝑥 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
24		negeq 11556	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → -𝑧 = -𝑥)
25	24	oveq2d 7440	. . . . . . . 8 ⊢ (𝑧 = 𝑥 → (e↑_𝑐 -𝑧) = (e↑_𝑐 -𝑥))
26		fveq2 6890	. . . . . . . 8 ⊢ (𝑧 = 𝑥 → ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧) = ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥))
27	25, 26	oveq12d 7442	. . . . . . 7 ⊢ (𝑧 = 𝑥 → ((e↑_𝑐 -𝑧) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧)) = ((e↑_𝑐 -𝑥) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥)))
28	27	negeqd 11558	. . . . . 6 ⊢ (𝑧 = 𝑥 → -((e↑_𝑐 -𝑧) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧)) = -((e↑_𝑐 -𝑥) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥)))
29	28	cbvmptv 5208	. . . . 5 ⊢ (𝑧 ∈ (0[,]𝑗) ↦ -((e↑_𝑐 -𝑧) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧))) = (𝑥 ∈ (0[,]𝑗) ↦ -((e↑_𝑐 -𝑥) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥)))
30	3, 4, 5, 6, 8, 10, 14, 17, 18, 19, 20, 23, 29	etransclem46 47426	. . . 4 ⊢ (𝜑 → (𝐿 / (!‘(𝑃 − 1))) = ( -Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
31		fzfid 14123	. . . . . . . 8 ⊢ (𝜑 → (0...𝑀) ∈ Fin)
32		fzfid 14123	. . . . . . . 8 ⊢ (𝜑 → (0...((𝑀 · 𝑃) + (𝑃 − 1))) ∈ Fin)
33		xpfi 9319	. . . . . . . 8 ⊢ (((0...𝑀) ∈ Fin ∧ (0...((𝑀 · 𝑃) + (𝑃 − 1))) ∈ Fin) → ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) ∈ Fin)
34	31, 32, 33	syl2anc 596	. . . . . . 7 ⊢ (𝜑 → ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) ∈ Fin)
35	3	eldifad 4050	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑄 ∈ (Poly‘ℤ))
36		0zd 12712	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ∈ ℤ)
37	5	coef2 26559	. . . . . . . . . . . 12 ⊢ ((𝑄 ∈ (Poly‘ℤ) ∧ 0 ∈ ℤ) → 𝐴:ℕ₀⟶ℤ)
38	35, 36, 37	syl2anc 596	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴:ℕ₀⟶ℤ)
39	38	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝐴:ℕ₀⟶ℤ)
40		xp1st 8037	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (1^st ‘𝑘) ∈ (0...𝑀))
41		elfznn0 13761	. . . . . . . . . . . 12 ⊢ ((1^st ‘𝑘) ∈ (0...𝑀) → (1^st ‘𝑘) ∈ ℕ₀)
42	40, 41	syl 18	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (1^st ‘𝑘) ∈ ℕ₀)
43	42	adantl 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (1^st ‘𝑘) ∈ ℕ₀)
44	39, 43	ffvelcdmd 7090	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (𝐴‘(1^st ‘𝑘)) ∈ ℤ)
45	44	zcnd 12811	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (𝐴‘(1^st ‘𝑘)) ∈ ℂ)
46	9	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ℝ ∈ {ℝ, ℂ})
47	13	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ))
48	17	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝑃 ∈ ℕ)
49		dgrcl 26561	. . . . . . . . . . . . 13 ⊢ (𝑄 ∈ (Poly‘ℤ) → (deg‘𝑄) ∈ ℕ₀)
50	35, 49	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (deg‘𝑄) ∈ ℕ₀)
51	6, 50	eqeltrid 2864	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℕ₀)
52	51	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝑀 ∈ ℕ₀)
53		xp2nd 8038	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (2^nd ‘𝑘) ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1))))
54		elfznn0 13761	. . . . . . . . . . . 12 ⊢ ((2^nd ‘𝑘) ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1))) → (2^nd ‘𝑘) ∈ ℕ₀)
55	53, 54	syl 18	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (2^nd ‘𝑘) ∈ ℕ₀)
56	55	adantl 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (2^nd ‘𝑘) ∈ ℕ₀)
57	46, 47, 48, 52, 18, 56	etransclem33 47413	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘)):ℝ⟶ℂ)
58	43	nn0red 12675	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (1^st ‘𝑘) ∈ ℝ)
59	57, 58	ffvelcdmd 7090	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘)) ∈ ℂ)
60	45, 59	mulcld 11336	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) ∈ ℂ)
61	34, 60	fsumcl 15908	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) ∈ ℂ)
62		nnm1nn0 12654	. . . . . . . . 9 ⊢ (𝑃 ∈ ℕ → (𝑃 − 1) ∈ ℕ₀)
63	17, 62	syl 18	. . . . . . . 8 ⊢ (𝜑 → (𝑃 − 1) ∈ ℕ₀)
64	63	faccld 14435	. . . . . . 7 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ)
65	64	nncnd 12358	. . . . . 6 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℂ)
66	64	nnne0d 12395	. . . . . 6 ⊢ (𝜑 → (!‘(𝑃 − 1)) ≠ 0)
67	61, 65, 66	divnegd 12113	. . . . 5 ⊢ (𝜑 → -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) = ( -Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
68	67	eqcomd 2766	. . . 4 ⊢ (𝜑 → ( -Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) = -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
69	2, 30, 68	3eqtrd 2799	. . 3 ⊢ (𝜑 → 𝐾 = -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
70		eqid 2760	. . . . 5 ⊢ (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) = (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1)))
71	17, 51, 18, 38, 70	etransclem45 47425	. . . 4 ⊢ (𝜑 → (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ∈ ℤ)
72	71	znegcld 12812	. . 3 ⊢ (𝜑 → -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ∈ ℤ)
73	69, 72	eqeltrd 2860	. 2 ⊢ (𝜑 → 𝐾 ∈ ℤ)
74	1, 30	eqtrid 2807	. . 3 ⊢ (𝜑 → 𝐾 = ( -Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
75	61, 65, 66	divcld 12100	. . . . 5 ⊢ (𝜑 → (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ∈ ℂ)
76		etransclem47.a0	. . . . . 6 ⊢ (𝜑 → (𝐴‘0) ≠ 0)
77		etransclem47.ap	. . . . . 6 ⊢ (𝜑 → (abs‘(𝐴‘0)) < 𝑃)
78		etransclem47.mp	. . . . . 6 ⊢ (𝜑 → (!‘𝑀) < 𝑃)
79	38, 76, 51, 15, 77, 78, 18, 70	etransclem44 47424	. . . . 5 ⊢ (𝜑 → (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
80	75, 79	negne0d 11674	. . . 4 ⊢ (𝜑 → -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
81	68, 80	eqnetrd 3022	. . 3 ⊢ (𝜑 → ( -Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
82	74, 81	eqnetrd 3022	. 2 ⊢ (𝜑 → 𝐾 ≠ 0)
83		eldifsni 4749	. . . . . 6 ⊢ (𝑄 ∈ ((Poly‘ℤ) ∖ {0_𝑝}) → 𝑄 ≠ 0_𝑝)
84	3, 83	syl 18	. . . . 5 ⊢ (𝜑 → 𝑄 ≠ 0_𝑝)
85		ere 16264	. . . . . . 7 ⊢ e ∈ ℝ
86	85	recni 11330	. . . . . 6 ⊢ e ∈ ℂ
87	86	a1i 11	. . . . 5 ⊢ (𝜑 → e ∈ ℂ)
88		dgrnznn 26575	. . . . 5 ⊢ (((𝑄 ∈ (Poly‘ℤ) ∧ 𝑄 ≠ 0_𝑝) ∧ (e ∈ ℂ ∧ (𝑄‘e) = 0)) → (deg‘𝑄) ∈ ℕ)
89	35, 84, 87, 4, 88	syl22anc 852	. . . 4 ⊢ (𝜑 → (deg‘𝑄) ∈ ℕ)
90	6, 89	eqeltrid 2864	. . 3 ⊢ (𝜑 → 𝑀 ∈ ℕ)
91		etransclem47.9	. . 3 ⊢ (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴‘𝑗) · (e↑_𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) < 1)
92	38, 19, 1, 17, 90, 18, 91	etransclem23 47403	. 2 ⊢ (𝜑 → (abs‘𝐾) < 1)
93		neeq1 3017	. . . 4 ⊢ (𝑘 = 𝐾 → (𝑘 ≠ 0 ↔ 𝐾 ≠ 0))
94		fveq2 6890	. . . . 5 ⊢ (𝑘 = 𝐾 → (abs‘𝑘) = (abs‘𝐾))
95	94	breq1d 5112	. . . 4 ⊢ (𝑘 = 𝐾 → ((abs‘𝑘) < 1 ↔ (abs‘𝐾) < 1))
96	93, 95	anbi12d 644	. . 3 ⊢ (𝑘 = 𝐾 → ((𝑘 ≠ 0 ∧ (abs‘𝑘) < 1) ↔ (𝐾 ≠ 0 ∧ (abs‘𝐾) < 1)))
97	96	rspcev 3576	. 2 ⊢ ((𝐾 ∈ ℤ ∧ (𝐾 ≠ 0 ∧ (abs‘𝐾) < 1)) → ∃𝑘 ∈ ℤ (𝑘 ≠ 0 ∧ (abs‘𝑘) < 1))
98	73, 82, 92, 97	syl12anc 850	1 ⊢ (𝜑 → ∃𝑘 ∈ ℤ (𝑘 ≠ 0 ∧ (abs‘𝑘) < 1))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1569 ∈ wcel 2144 ≠ wne 2955 ∃wrex 3086 ⊆ wss 3896 ∖ cdif 4044 {csn 4584 {cpr 4586 class class class wbr 5102 ↦ cmpt 5185 × cxp 5649 ran crn 5652 ⟶wf 6539 ‘cfv 6543 (class class class)co 7424 1^st c1st 8003 2^nd c2nd 8004 Fincfn 8981 ℂcc 11205 ℝcr 11206 0cc0 11207 1c1 11208 + caddc 11210 · cmul 11212 < clt 11350 − cmin 11548 -cneg 11549 / cdiv 11980 ℕcn 12342 ℕ₀cn0 12613 ℤcz 12700 (,)cioo 13483 [,]cicc 13486 ...cfz 13646 ↑cexp 14211 !cfa 14424 abscabs 15410 Σcsu 15862 ∏cprod 16081 eceu 16237 ℙcprime 16855 ↾_t crest 17600 TopOpenctopn 17601 topGenctg 17617 ℂ_fldccnfld 21687 ∫citg 25948 0_𝑝c0p 25999 D^𝑛 cdvn 26193 Polycply 26511 coeffccoe 26513 degcdgr 26514 ↑_𝑐ccxp 26892

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1942 ax-6 1999 ax-7 2040 ax-8 2146 ax-9 2154 ax-10 2177 ax-11 2193 ax-12 2212 ax-ext 2732 ax-rep 5231 ax-sep 5248 ax-nul 5259 ax-pow 5327 ax-pr 5391 ax-un 7755 ax-inf2 9649 ax-cc 10520 ax-cnex 11263 ax-resscn 11264 ax-1cn 11265 ax-icn 11266 ax-addcl 11267 ax-addrcl 11268 ax-mulcl 11269 ax-mulrcl 11270 ax-mulcom 11271 ax-addass 11272 ax-mulass 11273 ax-distr 11274 ax-i2m1 11275 ax-1ne0 11276 ax-1rid 11277 ax-rnegex 11278 ax-rrecex 11279 ax-cnre 11280 ax-pre-lttri 11281 ax-pre-lttrn 11282 ax-pre-ltadd 11283 ax-pre-mulgt0 11284 ax-pre-sup 11285 ax-addf 11286

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2099 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3848 df-ss 3897 df-pss 4013 df-dif 4046 df-in 4090 df-un 4150 df-symdif 4197 df-nul 4278 df-if 4482 df-pw 4558 df-sn 4585 df-pr 4587 df-tp 4589 df-op 4835 df-uni 4867 df-int 4907 df-iun 4952 df-iin 4953 df-disj 5070 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-se 5605 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6307 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6497 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-isom 6552 df-riota 7381 df-ov 7427 df-oprab 7428 df-mpo 7429 df-of 7697 df-ofr 7698 df-om 7882 df-1st 8005 df-2nd 8006 df-supp 8185 df-frecs 8307 df-wrecs 8338 df-recs 8387 df-rdg 8426 df-1o 8484 df-2o 8485 df-oadd 8488 df-omul 8489 df-er 8725 df-map 8857 df-pm 8858 df-ixp 8934 df-en 8982 df-dom 8983 df-sdom 8984 df-fin 8985 df-fsupp 9362 df-fi 9410 df-sup 9441 df-inf 9442 df-oi 9511 df-dju 9989 df-card 10027 df-acn 10030 df-pnf 11352 df-mnf 11353 df-xr 11354 df-ltxr 11355 df-le 11356 df-sub 11550 df-neg 11551 df-div 11981 df-nn 12343 df-2 12412 df-3 12413 df-4 12414 df-5 12415 df-6 12416 df-7 12417 df-8 12418 df-9 12419 df-n0 12614 df-z 12701 df-dec 12822 df-uz 12973 df-q 13083 df-rp 13128 df-xneg 13248 df-xadd 13249 df-xmul 13250 df-ioo 13487 df-ioc 13488 df-ico 13489 df-icc 13490 df-fz 13647 df-fzo 13796 df-fl 13939 df-mod 14017 df-seq 14152 df-exp 14212 df-fac 14425 df-bc 14454 df-hash 14482 df-shft 15229 df-cj 15275 df-re 15276 df-im 15277 df-sqrt 15411 df-abs 15412 df-limsup 15647 df-clim 15664 df-rlim 15665 df-sum 15863 df-prod 16082 df-ef 16242 df-e 16243 df-sin 16244 df-cos 16245 df-tan 16246 df-pi 16247 df-dvds 16432 df-gcd 16674 df-prm 16856 df-struct 17334 df-sets 17351 df-slot 17369 df-ndx 17381 df-base 17397 df-ress 17418 df-plusg 17450 df-mulr 17451 df-starv 17452 df-sca 17453 df-vsca 17454 df-ip 17455 df-tset 17456 df-ple 17457 df-ds 17459 df-unif 17460 df-hom 17461 df-cco 17462 df-rest 17602 df-topn 17603 df-0g 17621 df-gsum 17622 df-topgen 17623 df-pt 17624 df-prds 17627 df-xrs 17683 df-qtop 17688 df-imas 17689 df-xps 17691 df-mre 17765 df-mrc 17766 df-acs 17768 df-mgm 18825 df-sgrp 18917 df-mnd 18933 df-submnd 18988 df-mulg 19287 df-cntz 19540 df-cmn 20005 df-psmet 21679 df-xmet 21680 df-met 21681 df-bl 21682 df-mopn 21683 df-fbas 21684 df-fg 21685 df-cnfld 21688 df-top 23221 df-topon 23238 df-topsp 23260 df-bases 23273 df-cld 23346 df-ntr 23347 df-cls 23348 df-nei 23425 df-lp 23463 df-perf 23464 df-cn 23554 df-cnp 23555 df-haus 23642 df-cmp 23714 df-tx 23890 df-hmeo 24083 df-fil 24174 df-fm 24266 df-flim 24267 df-flf 24268 df-xms 24648 df-ms 24649 df-tms 24650 df-cncf 25208 df-ovol 25794 df-vol 25795 df-mbf 25949 df-itg1 25950 df-itg2 25951 df-ibl 25952 df-itg 25953 df-0p 26000 df-limc 26195 df-dv 26196 df-dvn 26197 df-ply 26515 df-coe 26517 df-dgr 26518 df-log 26893 df-cxp 26894

This theorem is used by: etransclem48 47428

W3C validator