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 46887

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 3967	. . . . . 6 ⊢ ℝ ⊆ ℝ
8	7	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ⊆ ℝ)
9		reelprrecn 11192	. . . . . 6 ⊢ ℝ ∈ {ℝ, ℂ}
10	9	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
11		reopn 45900	. . . . . . 7 ⊢ ℝ ∈ (topGen‘ran (,))
12		tgioo4 24931	. . . . . . 7 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
13	11, 12	eleqtri 2867	. . . . . 6 ⊢ ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ)
14	13	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ))
15		etransclem47.p	. . . . . 6 ⊢ (𝜑 → 𝑃 ∈ ℙ)
16		prmnn 16732	. . . . . 6 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
17	15, 16	syl 18	. . . . 5 ⊢ (𝜑 → 𝑃 ∈ ℕ)
18		etransclem47.f	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥 − 𝑗)↑𝑃)))
19		etransclem47.l	. . . . 5 ⊢ 𝐿 = Σ𝑗 ∈ (0...𝑀)(((𝐴‘𝑗) · (e↑_𝑐𝑗)) · ∫(0(,)𝑗)((e↑_𝑐-𝑥) · (𝐹‘𝑥)) d𝑥)
20		eqid 2769	. . . . 5 ⊢ ((𝑀 · 𝑃) + (𝑃 − 1)) = ((𝑀 · 𝑃) + (𝑃 − 1))
21		fveq2 6882	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦) = (((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
22	21	sumeq2sdv 15754	. . . . . 6 ⊢ (𝑦 = 𝑥 → Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦) = Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
23	22	cbvmptv 5219	. . . . 5 ⊢ (𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦)) = (𝑥 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑥))
24		negeq 11449	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → -𝑧 = -𝑥)
25	24	oveq2d 7427	. . . . . . . 8 ⊢ (𝑧 = 𝑥 → (e↑_𝑐-𝑧) = (e↑_𝑐-𝑥))
26		fveq2 6882	. . . . . . . 8 ⊢ (𝑧 = 𝑥 → ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧) = ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥))
27	25, 26	oveq12d 7429	. . . . . . 7 ⊢ (𝑧 = 𝑥 → ((e↑_𝑐-𝑧) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧)) = ((e↑_𝑐-𝑥) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥)))
28	27	negeqd 11451	. . . . . 6 ⊢ (𝑧 = 𝑥 → -((e↑_𝑐-𝑧) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑧)) = -((e↑_𝑐-𝑥) · ((𝑦 ∈ ℝ ↦ Σ𝑖 ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1)))(((ℝ D^𝑛 𝐹)‘𝑖)‘𝑦))‘𝑥)))
29	28	cbvmptv 5219	. . . . 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 46886	. . . 4 ⊢ (𝜑 → (𝐿 / (!‘(𝑃 − 1))) = (-Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
31		fzfid 14009	. . . . . . . 8 ⊢ (𝜑 → (0...𝑀) ∈ Fin)
32		fzfid 14009	. . . . . . . 8 ⊢ (𝜑 → (0...((𝑀 · 𝑃) + (𝑃 − 1))) ∈ Fin)
33		xpfi 9279	. . . . . . . 8 ⊢ (((0...𝑀) ∈ Fin ∧ (0...((𝑀 · 𝑃) + (𝑃 − 1))) ∈ Fin) → ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) ∈ Fin)
34	31, 32, 33	syl2anc 595	. . . . . . 7 ⊢ (𝜑 → ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) ∈ Fin)
35	3	eldifad 3925	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑄 ∈ (Poly‘ℤ))
36		0zd 12603	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ∈ ℤ)
37	5	coef2 26357	. . . . . . . . . . . 12 ⊢ ((𝑄 ∈ (Poly‘ℤ) ∧ 0 ∈ ℤ) → 𝐴:ℕ₀⟶ℤ)
38	35, 36, 37	syl2anc 595	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴:ℕ₀⟶ℤ)
39	38	adantr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝐴:ℕ₀⟶ℤ)
40		xp1st 8018	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (1^st ‘𝑘) ∈ (0...𝑀))
41		elfznn0 13648	. . . . . . . . . . . 12 ⊢ ((1^st ‘𝑘) ∈ (0...𝑀) → (1^st ‘𝑘) ∈ ℕ₀)
42	40, 41	syl 18	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (1^st ‘𝑘) ∈ ℕ₀)
43	42	adantl 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (1^st ‘𝑘) ∈ ℕ₀)
44	39, 43	ffvelcdmd 7081	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (𝐴‘(1^st ‘𝑘)) ∈ ℤ)
45	44	zcnd 12701	. . . . . . . 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 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝑃 ∈ ℕ)
49		dgrcl 26359	. . . . . . . . . . . . 13 ⊢ (𝑄 ∈ (Poly‘ℤ) → (deg‘𝑄) ∈ ℕ₀)
50	35, 49	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (deg‘𝑄) ∈ ℕ₀)
51	6, 50	eqeltrid 2873	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℕ₀)
52	51	adantr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → 𝑀 ∈ ℕ₀)
53		xp2nd 8019	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (2^nd ‘𝑘) ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1))))
54		elfznn0 13648	. . . . . . . . . . . 12 ⊢ ((2^nd ‘𝑘) ∈ (0...((𝑀 · 𝑃) + (𝑃 − 1))) → (2^nd ‘𝑘) ∈ ℕ₀)
55	53, 54	syl 18	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1)))) → (2^nd ‘𝑘) ∈ ℕ₀)
56	55	adantl 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (2^nd ‘𝑘) ∈ ℕ₀)
57	46, 47, 48, 52, 18, 56	etransclem33 46873	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘)):ℝ⟶ℂ)
58	43	nn0red 12566	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (1^st ‘𝑘) ∈ ℝ)
59	57, 58	ffvelcdmd 7081	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘)) ∈ ℂ)
60	45, 59	mulcld 11229	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))) → ((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) ∈ ℂ)
61	34, 60	fsumcl 15784	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) ∈ ℂ)
62		nnm1nn0 12545	. . . . . . . . 9 ⊢ (𝑃 ∈ ℕ → (𝑃 − 1) ∈ ℕ₀)
63	17, 62	syl 18	. . . . . . . 8 ⊢ (𝜑 → (𝑃 − 1) ∈ ℕ₀)
64	63	faccld 14320	. . . . . . 7 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ)
65	64	nncnd 12249	. . . . . 6 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℂ)
66	64	nnne0d 12286	. . . . . 6 ⊢ (𝜑 → (!‘(𝑃 − 1)) ≠ 0)
67	61, 65, 66	divnegd 12004	. . . . 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 2775	. . . 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 2808	. . 3 ⊢ (𝜑 → 𝐾 = -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
70		eqid 2769	. . . . 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 46885	. . . 4 ⊢ (𝜑 → (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ∈ ℤ)
72	71	znegcld 12702	. . 3 ⊢ (𝜑 → -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ∈ ℤ)
73	69, 72	eqeltrd 2869	. 2 ⊢ (𝜑 → 𝐾 ∈ ℤ)
74	1, 30	eqtrid 2816	. . 3 ⊢ (𝜑 → 𝐾 = (-Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))))
75	61, 65, 66	divcld 11991	. . . . 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 46884	. . . . 5 ⊢ (𝜑 → (Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
80	75, 79	negne0d 11567	. . . 4 ⊢ (𝜑 → -(Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
81	68, 80	eqnetrd 3031	. . 3 ⊢ (𝜑 → (-Σ𝑘 ∈ ((0...𝑀) × (0...((𝑀 · 𝑃) + (𝑃 − 1))))((𝐴‘(1^st ‘𝑘)) · (((ℝ D^𝑛 𝐹)‘(2^nd ‘𝑘))‘(1^st ‘𝑘))) / (!‘(𝑃 − 1))) ≠ 0)
82	74, 81	eqnetrd 3031	. 2 ⊢ (𝜑 → 𝐾 ≠ 0)
83		eldifsni 4762	. . . . . 6 ⊢ (𝑄 ∈ ((Poly‘ℤ) ∖ {0_𝑝}) → 𝑄 ≠ 0_𝑝)
84	3, 83	syl 18	. . . . 5 ⊢ (𝜑 → 𝑄 ≠ 0_𝑝)
85		ere 16143	. . . . . . 7 ⊢ e ∈ ℝ
86	85	recni 11223	. . . . . 6 ⊢ e ∈ ℂ
87	86	a1i 11	. . . . 5 ⊢ (𝜑 → e ∈ ℂ)
88		dgrnznn 26373	. . . . 5 ⊢ (((𝑄 ∈ (Poly‘ℤ) ∧ 𝑄 ≠ 0_𝑝) ∧ (e ∈ ℂ ∧ (𝑄‘e) = 0)) → (deg‘𝑄) ∈ ℕ)
89	35, 84, 87, 4, 88	syl22anc 851	. . . 4 ⊢ (𝜑 → (deg‘𝑄) ∈ ℕ)
90	6, 89	eqeltrid 2873	. . 3 ⊢ (𝜑 → 𝑀 ∈ ℕ)
91		etransclem47.9	. . 3 ⊢ (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴‘𝑗) · (e↑_𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) < 1)
92	38, 19, 1, 17, 90, 18, 91	etransclem23 46863	. 2 ⊢ (𝜑 → (abs‘𝐾) < 1)
93		neeq1 3026	. . . 4 ⊢ (𝑘 = 𝐾 → (𝑘 ≠ 0 ↔ 𝐾 ≠ 0))
94		fveq2 6882	. . . . 5 ⊢ (𝑘 = 𝐾 → (abs‘𝑘) = (abs‘𝐾))
95	94	breq1d 5123	. . . 4 ⊢ (𝑘 = 𝐾 → ((abs‘𝑘) < 1 ↔ (abs‘𝐾) < 1))
96	93, 95	anbi12d 643	. . 3 ⊢ (𝑘 = 𝐾 → ((𝑘 ≠ 0 ∧ (abs‘𝑘) < 1) ↔ (𝐾 ≠ 0 ∧ (abs‘𝐾) < 1)))
97	96	rspcev 3590	. 2 ⊢ ((𝐾 ∈ ℤ ∧ (𝐾 ≠ 0 ∧ (abs‘𝐾) < 1)) → ∃𝑘 ∈ ℤ (𝑘 ≠ 0 ∧ (abs‘𝑘) < 1))
98	73, 82, 92, 97	syl12anc 849	1 ⊢ (𝜑 → ∃𝑘 ∈ ℤ (𝑘 ≠ 0 ∧ (abs‘𝑘) < 1))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 400 = wceq 1567 ∈ wcel 2149 ≠ wne 2964 ∃wrex 3095 ∖ cdif 3910 ⊆ wss 3913 {csn 4594 {cpr 4596 class class class wbr 5113 ↦ cmpt 5196 × cxp 5660 ran crn 5663 ⟶wf 6533 ‘cfv 6537 (class class class)co 7411 1^st c1st 7984 2^nd c2nd 7985 Fincfn 8943 ℂcc 11098 ℝcr 11099 0cc0 11100 1c1 11101 + caddc 11103 · cmul 11105 < clt 11243 − cmin 11441 -cneg 11442 / cdiv 11871 ℕcn 12233 ℕ₀cn0 12504 ℤcz 12591 (,)cioo 13372 [,]cicc 13375 ...cfz 13535 ↑cexp 14097 !cfa 14309 abscabs 15285 Σcsu 15737 ∏cprod 15957 eceu 16116 ℙcprime 16729 ↾_t crest 17473 TopOpenctopn 17474 topGenctg 17490 ℂ_fldccnfld 21491 ∫citg 25746 0_𝑝c0p 25797 D^𝑛 cdvn 25992 Polycply 26310 coeffccoe 26312 degcdgr 26313 ↑_𝑐ccxp 26686

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1822 ax-4 1836 ax-5 1937 ax-6 1994 ax-7 2035 ax-8 2151 ax-9 2159 ax-10 2182 ax-11 2198 ax-12 2219 ax-ext 2741 ax-rep 5242 ax-sep 5261 ax-nul 5271 ax-pow 5337 ax-pr 5405 ax-un 7733 ax-inf2 9610 ax-cc 10419 ax-cnex 11156 ax-resscn 11157 ax-1cn 11158 ax-icn 11159 ax-addcl 11160 ax-addrcl 11161 ax-mulcl 11162 ax-mulrcl 11163 ax-mulcom 11164 ax-addass 11165 ax-mulass 11166 ax-distr 11167 ax-i2m1 11168 ax-1ne0 11169 ax-1rid 11170 ax-rnegex 11171 ax-rrecex 11172 ax-cnre 11173 ax-pre-lttri 11174 ax-pre-lttrn 11175 ax-pre-ltadd 11176 ax-pre-mulgt0 11177 ax-pre-sup 11178 ax-addf 11179

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1570 df-fal 1580 df-ex 1807 df-nf 1811 df-sb 2098 df-mo 2573 df-eu 2603 df-clab 2748 df-cleq 2761 df-clel 2844 df-nfc 2918 df-ne 2965 df-nel 3071 df-ral 3086 df-rex 3096 df-rmo 3376 df-reu 3377 df-rab 3424 df-v 3465 df-sbc 3754 df-csb 3862 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3933 df-symdif 4214 df-nul 4295 df-if 4493 df-pw 4569 df-sn 4595 df-pr 4597 df-tp 4599 df-op 4601 df-uni 4877 df-int 4917 df-iun 4962 df-iin 4963 df-disj 5081 df-br 5114 df-opab 5178 df-mpt 5197 df-tr 5223 df-id 5557 df-eprel 5562 df-po 5570 df-so 5571 df-fr 5615 df-se 5616 df-we 5617 df-xp 5668 df-rel 5669 df-cnv 5670 df-co 5671 df-dm 5672 df-rn 5673 df-res 5674 df-ima 5675 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7368 df-ov 7414 df-oprab 7415 df-mpo 7416 df-of 7675 df-ofr 7676 df-om 7863 df-1st 7986 df-2nd 7987 df-supp 8157 df-frecs 8278 df-wrecs 8309 df-recs 8358 df-rdg 8397 df-1o 8453 df-2o 8454 df-oadd 8457 df-omul 8458 df-er 8694 df-map 8826 df-pm 8827 df-ixp 8896 df-en 8944 df-dom 8945 df-sdom 8946 df-fin 8947 df-fsupp 9322 df-fi 9371 df-sup 9402 df-inf 9403 df-oi 9472 df-dju 9887 df-card 9925 df-acn 9928 df-pnf 11245 df-mnf 11246 df-xr 11247 df-ltxr 11248 df-le 11249 df-sub 11443 df-neg 11444 df-div 11872 df-nn 12234 df-2 12303 df-3 12304 df-4 12305 df-5 12306 df-6 12307 df-7 12308 df-8 12309 df-9 12310 df-n0 12505 df-z 12592 df-dec 12712 df-uz 12863 df-q 12973 df-rp 13017 df-xneg 13137 df-xadd 13138 df-xmul 13139 df-ioo 13376 df-ioc 13377 df-ico 13378 df-icc 13379 df-fz 13536 df-fzo 13683 df-fl 13825 df-mod 13903 df-seq 14038 df-exp 14098 df-fac 14310 df-bc 14339 df-hash 14367 df-shft 15104 df-cj 15150 df-re 15151 df-im 15152 df-sqrt 15286 df-abs 15287 df-limsup 15522 df-clim 15539 df-rlim 15540 df-sum 15738 df-prod 15958 df-ef 16121 df-e 16122 df-sin 16123 df-cos 16124 df-tan 16125 df-pi 16126 df-dvds 16311 df-gcd 16553 df-prm 16730 df-struct 17207 df-sets 17224 df-slot 17242 df-ndx 17254 df-base 17270 df-ress 17291 df-plusg 17323 df-mulr 17324 df-starv 17325 df-sca 17326 df-vsca 17327 df-ip 17328 df-tset 17329 df-ple 17330 df-ds 17332 df-unif 17333 df-hom 17334 df-cco 17335 df-rest 17475 df-topn 17476 df-0g 17494 df-gsum 17495 df-topgen 17496 df-pt 17497 df-prds 17500 df-xrs 17556 df-qtop 17561 df-imas 17562 df-xps 17564 df-mre 17638 df-mrc 17639 df-acs 17641 df-mgm 18698 df-sgrp 18777 df-mnd 18793 df-submnd 18842 df-mulg 19134 df-cntz 19387 df-cmn 19852 df-psmet 21483 df-xmet 21484 df-met 21485 df-bl 21486 df-mopn 21487 df-fbas 21488 df-fg 21489 df-cnfld 21492 df-top 23020 df-topon 23037 df-topsp 23059 df-bases 23072 df-cld 23145 df-ntr 23146 df-cls 23147 df-nei 23224 df-lp 23262 df-perf 23263 df-cn 23353 df-cnp 23354 df-haus 23441 df-cmp 23513 df-tx 23688 df-hmeo 23881 df-fil 23972 df-fm 24064 df-flim 24065 df-flf 24066 df-xms 24446 df-ms 24447 df-tms 24448 df-cncf 25006 df-ovol 25592 df-vol 25593 df-mbf 25747 df-itg1 25748 df-itg2 25749 df-ibl 25750 df-itg 25751 df-0p 25798 df-limc 25994 df-dv 25995 df-dvn 25996 df-ply 26314 df-coe 26316 df-dgr 26317 df-log 26687 df-cxp 26688

This theorem is referenced by: etransclem48 46888

W3C validator