Theorem eirraplem 12569

Description: Lemma for eirrap 12570. (Contributed by Paul Chapman, 9-Feb-2008.) (Revised by Jim Kingdon, 5-Jan-2022.)

Hypotheses

Ref	Expression
eirr.1	⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ (1 / (!‘𝑛)))
eirr.2	⊢ (𝜑 → 𝑃 ∈ ℤ)
eirr.3	⊢ (𝜑 → 𝑄 ∈ ℕ)

Assertion

Ref	Expression
eirraplem	⊢ (𝜑 → e # (𝑃 / 𝑄))

Distinct variable group:   𝑄,𝑛

Allowed substitution hints:   𝜑(𝑛)   𝑃(𝑛)   𝐹(𝑛)

Proof of Theorem eirraplem

Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		esum 12454	. . . . . . . . . . 11 ⊢ e = Σ𝑘 ∈ ℕ0 (1 / (!‘𝑘))
2		faccl 11195	. . . . . . . . . . . . . 14 ⊢ (𝑘 ∈ ℕ0 → (!‘𝑘) ∈ ℕ)
3	2	nnrecred 9360	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ0 → (1 / (!‘𝑘)) ∈ ℝ)
4		fveq2 5698	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑘 → (!‘𝑛) = (!‘𝑘))
5	4	oveq2d 6104	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 𝑘 → (1 / (!‘𝑛)) = (1 / (!‘𝑘)))
6		eirr.1	. . . . . . . . . . . . . 14 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ (1 / (!‘𝑛)))
7	5, 6	fvmptg 5784	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℕ0 ∧ (1 / (!‘𝑘)) ∈ ℝ) → (𝐹‘𝑘) = (1 / (!‘𝑘)))
8	3, 7	mpdan 425	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ0 → (𝐹‘𝑘) = (1 / (!‘𝑘)))
9	8	sumeq2i 12155	. . . . . . . . . . 11 ⊢ Σ𝑘 ∈ ℕ0 (𝐹‘𝑘) = Σ𝑘 ∈ ℕ0 (1 / (!‘𝑘))
10	1, 9	eqtr4i 2262	. . . . . . . . . 10 ⊢ e = Σ𝑘 ∈ ℕ0 (𝐹‘𝑘)
11		nn0uz 9973	. . . . . . . . . . 11 ⊢ ℕ0 = (ℤ≥‘0)
12		eqid 2238	. . . . . . . . . . 11 ⊢ (ℤ≥‘(𝑄 + 1)) = (ℤ≥‘(𝑄 + 1))
13		eirr.3	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑄 ∈ ℕ)
14	13	peano2nnd 9328	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑄 + 1) ∈ ℕ)
15	14	nnnn0d 9631	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑄 + 1) ∈ ℕ0)
16		eqidd 2239	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = (𝐹‘𝑘))
17		ax-1cn 8278	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℂ
18		nn0z 9675	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ0 → 𝑛 ∈ ℤ)
19		1exp 11026	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℤ → (1↑𝑛) = 1)
20	18, 19	syl 14	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ0 → (1↑𝑛) = 1)
21	20	oveq1d 6103	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ0 → ((1↑𝑛) / (!‘𝑛)) = (1 / (!‘𝑛)))
22	21	mpteq2ia 4219	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ (1 / (!‘𝑛)))
23	6, 22	eqtr4i 2262	. . . . . . . . . . . . . . 15 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛)))
24	23	eftvalcn 12449	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = ((1↑𝑘) / (!‘𝑘)))
25	17, 24	mpan 428	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ0 → (𝐹‘𝑘) = ((1↑𝑘) / (!‘𝑘)))
26	25	adantl 277	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = ((1↑𝑘) / (!‘𝑘)))
27	17	a1i 9	. . . . . . . . . . . . 13 ⊢ (𝜑 → 1 ∈ ℂ)
28		eftcl 12446	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((1↑𝑘) / (!‘𝑘)) ∈ ℂ)
29	27, 28	sylan 283	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((1↑𝑘) / (!‘𝑘)) ∈ ℂ)
30	26, 29	eqeltrd 2315	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) ∈ ℂ)
31	23	efcllem 12451	. . . . . . . . . . . 12 ⊢ (1 ∈ ℂ → seq0( + , 𝐹) ∈ dom ⇝ )
32	27, 31	syl 14	. . . . . . . . . . 11 ⊢ (𝜑 → seq0( + , 𝐹) ∈ dom ⇝ )
33	11, 12, 15, 16, 30, 32	isumsplit 12283	. . . . . . . . . 10 ⊢ (𝜑 → Σ𝑘 ∈ ℕ0 (𝐹‘𝑘) = (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
34	10, 33	eqtrid 2283	. . . . . . . . 9 ⊢ (𝜑 → e = (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
35	13	nncnd 9327	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑄 ∈ ℂ)
36		pncan 8539	. . . . . . . . . . . . 13 ⊢ ((𝑄 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑄 + 1) − 1) = 𝑄)
37	35, 17, 36	sylancl 417	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑄 + 1) − 1) = 𝑄)
38	37	oveq2d 6104	. . . . . . . . . . 11 ⊢ (𝜑 → (0...((𝑄 + 1) − 1)) = (0...𝑄))
39	38	sumeq1d 12157	. . . . . . . . . 10 ⊢ (𝜑 → Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) = Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))
40	39	oveq1d 6103	. . . . . . . . 9 ⊢ (𝜑 → (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = (Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
41	34, 40	eqtrd 2271	. . . . . . . 8 ⊢ (𝜑 → e = (Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
42	41	oveq1d 6103	. . . . . . 7 ⊢ (𝜑 → (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) = ((Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)))
43		0zd 9667	. . . . . . . . . 10 ⊢ (𝜑 → 0 ∈ ℤ)
44	13	nnzd 9778	. . . . . . . . . 10 ⊢ (𝜑 → 𝑄 ∈ ℤ)
45	43, 44	fzfigd 10889	. . . . . . . . 9 ⊢ (𝜑 → (0...𝑄) ∈ Fin)
46		elfznn0 10538	. . . . . . . . . 10 ⊢ (𝑘 ∈ (0...𝑄) → 𝑘 ∈ ℕ0)
47	46, 30	sylan2 286	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (𝐹‘𝑘) ∈ ℂ)
48	45, 47	fsumcl 12192	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) ∈ ℂ)
49	8	adantl 277	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = (1 / (!‘𝑘)))
50	2	adantl 277	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℕ)
51	50	nnrpd 10112	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℝ+)
52	51	rpreccld 10125	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (1 / (!‘𝑘)) ∈ ℝ+)
53	49, 52	eqeltrd 2315	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) ∈ ℝ+)
54	11, 12, 15, 16, 53, 32	isumrpcl 12286	. . . . . . . . . 10 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ+)
55	54	rpred 10114	. . . . . . . . 9 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ)
56	55	recnd 8360	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℂ)
57	48, 56	pncan2d 8646	. . . . . . 7 ⊢ (𝜑 → ((Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
58	42, 57	eqtrd 2271	. . . . . 6 ⊢ (𝜑 → (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
59	58	oveq2d 6104	. . . . 5 ⊢ (𝜑 → ((!‘𝑄) · (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) = ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
60	13	nnnn0d 9631	. . . . . . . 8 ⊢ (𝜑 → 𝑄 ∈ ℕ0)
61	60	faccld 11196	. . . . . . 7 ⊢ (𝜑 → (!‘𝑄) ∈ ℕ)
62	61	nncnd 9327	. . . . . 6 ⊢ (𝜑 → (!‘𝑄) ∈ ℂ)
63		ere 12462	. . . . . . . 8 ⊢ e ∈ ℝ
64	63	recni 8344	. . . . . . 7 ⊢ e ∈ ℂ
65	64	a1i 9	. . . . . 6 ⊢ (𝜑 → e ∈ ℂ)
66	62, 65, 48	subdid 8748	. . . . 5 ⊢ (𝜑 → ((!‘𝑄) · (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) = (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))))
67	59, 66	eqtr3d 2273	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))))
68	61	nnrpd 10112	. . . . . . 7 ⊢ (𝜑 → (!‘𝑄) ∈ ℝ+)
69	68, 54	rpmulcld 10131	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℝ+)
70	69	rpred 10114	. . . . 5 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℝ)
71		eirr.2	. . . . . . . . 9 ⊢ (𝜑 → 𝑃 ∈ ℤ)
72	71	zcnd 9780	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∈ ℂ)
73	13	nnap0d 9359	. . . . . . . 8 ⊢ (𝜑 → 𝑄 # 0)
74	62, 72, 35, 73	div12apd 9165	. . . . . . 7 ⊢ (𝜑 → ((!‘𝑄) · (𝑃 / 𝑄)) = (𝑃 · ((!‘𝑄) / 𝑄)))
75	13	nnred 9326	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑄 ∈ ℝ)
76	75	leidd 8849	. . . . . . . . . 10 ⊢ (𝜑 → 𝑄 ≤ 𝑄)
77		facdiv 11198	. . . . . . . . . 10 ⊢ ((𝑄 ∈ ℕ0 ∧ 𝑄 ∈ ℕ ∧ 𝑄 ≤ 𝑄) → ((!‘𝑄) / 𝑄) ∈ ℕ)
78	60, 13, 76, 77	syl3anc 1278	. . . . . . . . 9 ⊢ (𝜑 → ((!‘𝑄) / 𝑄) ∈ ℕ)
79	78	nnzd 9778	. . . . . . . 8 ⊢ (𝜑 → ((!‘𝑄) / 𝑄) ∈ ℤ)
80	71, 79	zmulcld 9785	. . . . . . 7 ⊢ (𝜑 → (𝑃 · ((!‘𝑄) / 𝑄)) ∈ ℤ)
81	74, 80	eqeltrd 2315	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) · (𝑃 / 𝑄)) ∈ ℤ)
82	45, 62, 47	fsummulc2 12240	. . . . . . 7 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) = Σ𝑘 ∈ (0...𝑄)((!‘𝑄) · (𝐹‘𝑘)))
83	46	adantl 277	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → 𝑘 ∈ ℕ0)
84	83, 8	syl 14	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (𝐹‘𝑘) = (1 / (!‘𝑘)))
85	84	oveq2d 6104	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) = ((!‘𝑄) · (1 / (!‘𝑘))))
86	62	adantr 276	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑄) ∈ ℂ)
87	46, 50	sylan2 286	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) ∈ ℕ)
88	87	nncnd 9327	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) ∈ ℂ)
89	87	nnap0d 9359	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) # 0)
90	86, 88, 89	divrecapd 9131	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) / (!‘𝑘)) = ((!‘𝑄) · (1 / (!‘𝑘))))
91	85, 90	eqtr4d 2274	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) = ((!‘𝑄) / (!‘𝑘)))
92		permnn 11232	. . . . . . . . . . 11 ⊢ (𝑘 ∈ (0...𝑄) → ((!‘𝑄) / (!‘𝑘)) ∈ ℕ)
93	92	adantl 277	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) / (!‘𝑘)) ∈ ℕ)
94	91, 93	eqeltrd 2315	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) ∈ ℕ)
95	94	nnzd 9778	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) ∈ ℤ)
96	45, 95	fsumzcl 12194	. . . . . . 7 ⊢ (𝜑 → Σ𝑘 ∈ (0...𝑄)((!‘𝑄) · (𝐹‘𝑘)) ∈ ℤ)
97	82, 96	eqeltrd 2315	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) ∈ ℤ)
98	81, 97	zsubcld 9784	. . . . 5 ⊢ (𝜑 → (((!‘𝑄) · (𝑃 / 𝑄)) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) ∈ ℤ)
99	69	rpgt0d 10117	. . . . 5 ⊢ (𝜑 → 0 < ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
100	14	peano2nnd 9328	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑄 + 1) + 1) ∈ ℕ)
101	100	nnred 9326	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) + 1) ∈ ℝ)
102	15	faccld 11196	. . . . . . . . . 10 ⊢ (𝜑 → (!‘(𝑄 + 1)) ∈ ℕ)
103	102, 14	nnmulcld 9362	. . . . . . . . 9 ⊢ (𝜑 → ((!‘(𝑄 + 1)) · (𝑄 + 1)) ∈ ℕ)
104	101, 103	nndivred 9363	. . . . . . . 8 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) ∈ ℝ)
105	61	nnrecred 9360	. . . . . . . 8 ⊢ (𝜑 → (1 / (!‘𝑄)) ∈ ℝ)
106		abs1 11860	. . . . . . . . . . . . . 14 ⊢ (abs‘1) = 1
107	106	oveq1i 6098	. . . . . . . . . . . . 13 ⊢ ((abs‘1)↑𝑛) = (1↑𝑛)
108	107	oveq1i 6098	. . . . . . . . . . . 12 ⊢ (((abs‘1)↑𝑛) / (!‘𝑛)) = ((1↑𝑛) / (!‘𝑛))
109	108	mpteq2i 4220	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ0 ↦ (((abs‘1)↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛)))
110	23, 109	eqtr4i 2262	. . . . . . . . . 10 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ (((abs‘1)↑𝑛) / (!‘𝑛)))
111		eqid 2238	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ0 ↦ ((((abs‘1)↑(𝑄 + 1)) / (!‘(𝑄 + 1))) · ((1 / ((𝑄 + 1) + 1))↑𝑛))) = (𝑛 ∈ ℕ0 ↦ ((((abs‘1)↑(𝑄 + 1)) / (!‘(𝑄 + 1))) · ((1 / ((𝑄 + 1) + 1))↑𝑛)))
112		1le1 8908	. . . . . . . . . . . 12 ⊢ 1 ≤ 1
113	106, 112	eqbrtri 4152	. . . . . . . . . . 11 ⊢ (abs‘1) ≤ 1
114	113	a1i 9	. . . . . . . . . 10 ⊢ (𝜑 → (abs‘1) ≤ 1)
115	23, 110, 111, 14, 27, 114	eftlub 12482	. . . . . . . . 9 ⊢ (𝜑 → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ≤ (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))))
116	54	rprege0d 10122	. . . . . . . . . 10 ⊢ (𝜑 → (Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ ∧ 0 ≤ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
117		absid 11859	. . . . . . . . . 10 ⊢ ((Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ ∧ 0 ≤ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
118	116, 117	syl 14	. . . . . . . . 9 ⊢ (𝜑 → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
119	106	oveq1i 6098	. . . . . . . . . . . 12 ⊢ ((abs‘1)↑(𝑄 + 1)) = (1↑(𝑄 + 1))
120	14	nnzd 9778	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑄 + 1) ∈ ℤ)
121		1exp 11026	. . . . . . . . . . . . 13 ⊢ ((𝑄 + 1) ∈ ℤ → (1↑(𝑄 + 1)) = 1)
122	120, 121	syl 14	. . . . . . . . . . . 12 ⊢ (𝜑 → (1↑(𝑄 + 1)) = 1)
123	119, 122	eqtrid 2283	. . . . . . . . . . 11 ⊢ (𝜑 → ((abs‘1)↑(𝑄 + 1)) = 1)
124	123	oveq1d 6103	. . . . . . . . . 10 ⊢ (𝜑 → (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (1 · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))))
125	104	recnd 8360	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) ∈ ℂ)
126	125	mullidd 8350	. . . . . . . . . 10 ⊢ (𝜑 → (1 · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
127	124, 126	eqtrd 2271	. . . . . . . . 9 ⊢ (𝜑 → (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
128	115, 118, 127	3brtr3d 4162	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ≤ (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
129	14	nnred 9326	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑄 + 1) ∈ ℝ)
130	129, 129	readdcld 8361	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑄 + 1) + (𝑄 + 1)) ∈ ℝ)
131	129, 129	remulcld 8362	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) ∈ ℝ)
132		1red 8347	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℝ)
133	13	nnge1d 9356	. . . . . . . . . . . . 13 ⊢ (𝜑 → 1 ≤ 𝑄)
134		1nn 9324	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℕ
135		nnleltp1 9715	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℕ ∧ 𝑄 ∈ ℕ) → (1 ≤ 𝑄 ↔ 1 < (𝑄 + 1)))
136	134, 13, 135	sylancr 418	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 ≤ 𝑄 ↔ 1 < (𝑄 + 1)))
137	133, 136	mpbid 147	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 < (𝑄 + 1))
138	132, 129, 129, 137	ltadd2dd 8757	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑄 + 1) + 1) < ((𝑄 + 1) + (𝑄 + 1)))
139	14	nncnd 9327	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑄 + 1) ∈ ℂ)
140	139	2timesd 9559	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 · (𝑄 + 1)) = ((𝑄 + 1) + (𝑄 + 1)))
141		df-2 9372	. . . . . . . . . . . . . 14 ⊢ 2 = (1 + 1)
142	132, 75, 132, 133	leadd1dd 8894	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 + 1) ≤ (𝑄 + 1))
143	141, 142	eqbrtrid 4166	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 ≤ (𝑄 + 1))
144		2re 9383	. . . . . . . . . . . . . . 15 ⊢ 2 ∈ ℝ
145	144	a1i 9	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 2 ∈ ℝ)
146	14	nngt0d 9357	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 < (𝑄 + 1))
147		lemul1 8929	. . . . . . . . . . . . . 14 ⊢ ((2 ∈ ℝ ∧ (𝑄 + 1) ∈ ℝ ∧ ((𝑄 + 1) ∈ ℝ ∧ 0 < (𝑄 + 1))) → (2 ≤ (𝑄 + 1) ↔ (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1))))
148	145, 129, 129, 146, 147	syl112anc 1282	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2 ≤ (𝑄 + 1) ↔ (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1))))
149	143, 148	mpbid 147	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1)))
150	140, 149	eqbrtrrd 4155	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑄 + 1) + (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1)))
151	101, 130, 131, 138, 150	ltletrd 8758	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑄 + 1) + 1) < ((𝑄 + 1) · (𝑄 + 1)))
152		facp1 11190	. . . . . . . . . . . . . . 15 ⊢ (𝑄 ∈ ℕ0 → (!‘(𝑄 + 1)) = ((!‘𝑄) · (𝑄 + 1)))
153	60, 152	syl 14	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (!‘(𝑄 + 1)) = ((!‘𝑄) · (𝑄 + 1)))
154	153	oveq1d 6103	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((!‘(𝑄 + 1)) / (!‘𝑄)) = (((!‘𝑄) · (𝑄 + 1)) / (!‘𝑄)))
155	102	nncnd 9327	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (!‘(𝑄 + 1)) ∈ ℂ)
156	61	nnap0d 9359	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (!‘𝑄) # 0)
157	155, 62, 156	divrecapd 9131	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((!‘(𝑄 + 1)) / (!‘𝑄)) = ((!‘(𝑄 + 1)) · (1 / (!‘𝑄))))
158	139, 62, 156	divcanap3d 9133	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((!‘𝑄) · (𝑄 + 1)) / (!‘𝑄)) = (𝑄 + 1))
159	154, 157, 158	3eqtr3rd 2280	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑄 + 1) = ((!‘(𝑄 + 1)) · (1 / (!‘𝑄))))
160	159	oveq1d 6103	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (1 / (!‘𝑄))) · (𝑄 + 1)))
161	105	recnd 8360	. . . . . . . . . . . 12 ⊢ (𝜑 → (1 / (!‘𝑄)) ∈ ℂ)
162	155, 161, 139	mul32d 8486	. . . . . . . . . . 11 ⊢ (𝜑 → (((!‘(𝑄 + 1)) · (1 / (!‘𝑄))) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
163	160, 162	eqtrd 2271	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
164	151, 163	breqtrd 4157	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) + 1) < (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
165	103	nnred 9326	. . . . . . . . . 10 ⊢ (𝜑 → ((!‘(𝑄 + 1)) · (𝑄 + 1)) ∈ ℝ)
166	103	nngt0d 9357	. . . . . . . . . 10 ⊢ (𝜑 → 0 < ((!‘(𝑄 + 1)) · (𝑄 + 1)))
167		ltdivmul 9214	. . . . . . . . . 10 ⊢ ((((𝑄 + 1) + 1) ∈ ℝ ∧ (1 / (!‘𝑄)) ∈ ℝ ∧ (((!‘(𝑄 + 1)) · (𝑄 + 1)) ∈ ℝ ∧ 0 < ((!‘(𝑄 + 1)) · (𝑄 + 1)))) → ((((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) < (1 / (!‘𝑄)) ↔ ((𝑄 + 1) + 1) < (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄)))))
168	101, 105, 165, 166, 167	syl112anc 1282	. . . . . . . . 9 ⊢ (𝜑 → ((((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) < (1 / (!‘𝑄)) ↔ ((𝑄 + 1) + 1) < (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄)))))
169	164, 168	mpbird 167	. . . . . . . 8 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) < (1 / (!‘𝑄)))
170	55, 104, 105, 128, 169	lelttrd 8458	. . . . . . 7 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) < (1 / (!‘𝑄)))
171	55, 132, 68	ltmuldiv2d 10163	. . . . . . 7 ⊢ (𝜑 → (((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < 1 ↔ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) < (1 / (!‘𝑄))))
172	170, 171	mpbird 167	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < 1)
173		0p1e1 9427	. . . . . 6 ⊢ (0 + 1) = 1
174	172, 173	breqtrrdi 4173	. . . . 5 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < (0 + 1))
175	43, 70, 98, 99, 174	btwnapz 9787	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) # (((!‘𝑄) · (𝑃 / 𝑄)) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))))
176	67, 175	eqbrtrrd 4155	. . 3 ⊢ (𝜑 → (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) # (((!‘𝑄) · (𝑃 / 𝑄)) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))))
177	62, 65	mulcld 8352	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · e) ∈ ℂ)
178	81	zcnd 9780	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · (𝑃 / 𝑄)) ∈ ℂ)
179	62, 48	mulcld 8352	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) ∈ ℂ)
180		apsub1 8978	. . . 4 ⊢ ((((!‘𝑄) · e) ∈ ℂ ∧ ((!‘𝑄) · (𝑃 / 𝑄)) ∈ ℂ ∧ ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) ∈ ℂ) → (((!‘𝑄) · e) # ((!‘𝑄) · (𝑃 / 𝑄)) ↔ (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) # (((!‘𝑄) · (𝑃 / 𝑄)) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)))))
181	177, 178, 179, 180	syl3anc 1278	. . 3 ⊢ (𝜑 → (((!‘𝑄) · e) # ((!‘𝑄) · (𝑃 / 𝑄)) ↔ (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) # (((!‘𝑄) · (𝑃 / 𝑄)) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)))))
182	176, 181	mpbird 167	. 2 ⊢ (𝜑 → ((!‘𝑄) · e) # ((!‘𝑄) · (𝑃 / 𝑄)))
183		znq 10040	. . . . 5 ⊢ ((𝑃 ∈ ℤ ∧ 𝑄 ∈ ℕ) → (𝑃 / 𝑄) ∈ ℚ)
184	71, 13, 183	syl2anc 415	. . . 4 ⊢ (𝜑 → (𝑃 / 𝑄) ∈ ℚ)
185		qcn 10050	. . . 4 ⊢ ((𝑃 / 𝑄) ∈ ℚ → (𝑃 / 𝑄) ∈ ℂ)
186	184, 185	syl 14	. . 3 ⊢ (𝜑 → (𝑃 / 𝑄) ∈ ℂ)
187		apmul2 9127	. . 3 ⊢ ((e ∈ ℂ ∧ (𝑃 / 𝑄) ∈ ℂ ∧ ((!‘𝑄) ∈ ℂ ∧ (!‘𝑄) # 0)) → (e # (𝑃 / 𝑄) ↔ ((!‘𝑄) · e) # ((!‘𝑄) · (𝑃 / 𝑄))))
188	65, 186, 62, 156, 187	syl112anc 1282	. 2 ⊢ (𝜑 → (e # (𝑃 / 𝑄) ↔ ((!‘𝑄) · e) # ((!‘𝑄) · (𝑃 / 𝑄))))
189	182, 188	mpbird 167	1 ⊢ (𝜑 → e # (𝑃 / 𝑄))

This proof depends on syntax axioms:   → wi 4   ∧ wa 104   ↔ wb 105   = wceq 1402   ∈ wcel 2209   class class class wbr 4131   ↦ cmpt 4193  dom cdm 4776  ‘cfv 5380  (class class class)co 6088  ℂcc 8183  ℝcr 8184  0cc0 8185  1c1 8186   + caddc 8188   · cmul 8190   < clt 8366   ≤ cle 8367   − cmin 8504   # cap 8917   / cdiv 9010  ℕcn 9313  2c2 9364  ℕ₀cn0 9574  ℤcz 9655  ℤ_≥cuz 9937  ℚcq 10035  ℝ⁺crp 10071  ...cfz 10428  seqcseq 10905  ↑cexp 10996  !cfa 11185  abscabs 11785   ⇝ cli 12069  Σcsu 12144  eceu 12435

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4248  ax-sep 4251  ax-nul 4261  ax-pow 4313  ax-pr 4348  ax-un 4580  ax-setind 4686  ax-iinf 4737  ax-cnex 8276  ax-resscn 8277  ax-1cn 8278  ax-1re 8279  ax-icn 8280  ax-addcl 8281  ax-addrcl 8282  ax-mulcl 8283  ax-mulrcl 8284  ax-addcom 8285  ax-mulcom 8286  ax-addass 8287  ax-mulass 8288  ax-distr 8289  ax-i2m1 8290  ax-0lt1 8291  ax-1rid 8292  ax-0id 8293  ax-rnegex 8294  ax-precex 8295  ax-cnre 8296  ax-pre-ltirr 8297  ax-pre-ltwlin 8298  ax-pre-lttrn 8299  ax-pre-apti 8300  ax-pre-ltadd 8301  ax-pre-mulgt0 8302  ax-pre-mulext 8303  ax-arch 8304  ax-caucvg 8305

This proof depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4132  df-opab 4194  df-mpt 4195  df-tr 4232  df-id 4440  df-po 4443  df-iso 4444  df-iord 4513  df-on 4515  df-ilim 4516  df-suc 4518  df-iom 4740  df-xp 4782  df-rel 4783  df-cnv 4784  df-co 4785  df-dm 4786  df-rn 4787  df-res 4788  df-ima 4789  df-iota 5340  df-fun 5382  df-fn 5383  df-f 5384  df-f1 5385  df-fo 5386  df-f1o 5387  df-fv 5388  df-isom 5389  df-riota 6041  df-ov 6091  df-oprab 6092  df-mpo 6093  df-1st 6378  df-2nd 6379  df-recs 6580  df-irdg 6645  df-frec 6666  df-1o 6691  df-oadd 6695  df-er 6811  df-en 7027  df-dom 7028  df-fin 7029  df-pnf 8368  df-mnf 8369  df-xr 8370  df-ltxr 8371  df-le 8372  df-sub 8506  df-neg 8507  df-reap 8911  df-ap 8918  df-div 9011  df-inn 9314  df-2 9372  df-3 9373  df-4 9374  df-n0 9575  df-z 9656  df-uz 9938  df-q 10036  df-rp 10072  df-ico 10313  df-fz 10429  df-fzo 10567  df-seqfrec 10906  df-exp 10997  df-fac 11186  df-bc 11208  df-ihash 11237  df-shft 11602  df-cj 11629  df-re 11630  df-im 11631  df-rsqrt 11786  df-abs 11787  df-clim 12070  df-sumdc 12145  df-ef 12440  df-e 12441

This theorem is used by:  eirrap  12570