Theorem eirrlem 16086

Description: Lemma for eirr 16087. (Contributed by Paul Chapman, 9-Feb-2008.) (Revised by Mario Carneiro, 29-Apr-2014.)

Hypotheses

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

Assertion

Ref	Expression
eirrlem	⊢ ¬ 𝜑

Distinct variable group:   𝑄,𝑛

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

Proof of Theorem eirrlem

Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		fzfid 13878	. . . . . . 7 ⊢ (𝜑 → (0...𝑄) ∈ Fin)
2		elfznn0 13534	. . . . . . . 8 ⊢ (𝑘 ∈ (0...𝑄) → 𝑘 ∈ ℕ0)
3		eirr.1	. . . . . . . . . . . 12 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ (1 / (!‘𝑛)))
4		nn0z 12524	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℕ0 → 𝑛 ∈ ℤ)
5		1exp 13997	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℤ → (1↑𝑛) = 1)
6	4, 5	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ ℕ0 → (1↑𝑛) = 1)
7	6	oveq1d 7372	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ0 → ((1↑𝑛) / (!‘𝑛)) = (1 / (!‘𝑛)))
8	7	mpteq2ia 5208	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ (1 / (!‘𝑛)))
9	3, 8	eqtr4i 2767	. . . . . . . . . . 11 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛)))
10	9	eftval 15959	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ0 → (𝐹‘𝑘) = ((1↑𝑘) / (!‘𝑘)))
11	10	adantl 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = ((1↑𝑘) / (!‘𝑘)))
12		ax-1cn 11109	. . . . . . . . . . 11 ⊢ 1 ∈ ℂ
13	12	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℂ)
14		eftcl 15956	. . . . . . . . . 10 ⊢ ((1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((1↑𝑘) / (!‘𝑘)) ∈ ℂ)
15	13, 14	sylan 580	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((1↑𝑘) / (!‘𝑘)) ∈ ℂ)
16	11, 15	eqeltrd 2838	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) ∈ ℂ)
17	2, 16	sylan2 593	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (𝐹‘𝑘) ∈ ℂ)
18	1, 17	fsumcl 15618	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) ∈ ℂ)
19		nn0uz 12805	. . . . . . . . 9 ⊢ ℕ0 = (ℤ≥‘0)
20		eqid 2736	. . . . . . . . 9 ⊢ (ℤ≥‘(𝑄 + 1)) = (ℤ≥‘(𝑄 + 1))
21		eirr.3	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑄 ∈ ℕ)
22	21	peano2nnd 12170	. . . . . . . . . 10 ⊢ (𝜑 → (𝑄 + 1) ∈ ℕ)
23	22	nnnn0d 12473	. . . . . . . . 9 ⊢ (𝜑 → (𝑄 + 1) ∈ ℕ0)
24		eqidd 2737	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = (𝐹‘𝑘))
25		fveq2 6842	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑘 → (!‘𝑛) = (!‘𝑘))
26	25	oveq2d 7373	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑘 → (1 / (!‘𝑛)) = (1 / (!‘𝑘)))
27		ovex 7390	. . . . . . . . . . . 12 ⊢ (1 / (!‘𝑘)) ∈ V
28	26, 3, 27	fvmpt 6948	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ0 → (𝐹‘𝑘) = (1 / (!‘𝑘)))
29	28	adantl 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = (1 / (!‘𝑘)))
30		faccl 14183	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ0 → (!‘𝑘) ∈ ℕ)
31	30	adantl 482	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℕ)
32	31	nnrpd 12955	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℝ+)
33	32	rpreccld 12967	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (1 / (!‘𝑘)) ∈ ℝ+)
34	29, 33	eqeltrd 2838	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) ∈ ℝ+)
35	9	efcllem 15960	. . . . . . . . . 10 ⊢ (1 ∈ ℂ → seq0( + , 𝐹) ∈ dom ⇝ )
36	13, 35	syl 17	. . . . . . . . 9 ⊢ (𝜑 → seq0( + , 𝐹) ∈ dom ⇝ )
37	19, 20, 23, 24, 34, 36	isumrpcl 15728	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ+)
38	37	rpred 12957	. . . . . . 7 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ)
39	38	recnd 11183	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℂ)
40		esum 15963	. . . . . . . . 9 ⊢ e = Σ𝑘 ∈ ℕ0 (1 / (!‘𝑘))
41	28	sumeq2i 15584	. . . . . . . . 9 ⊢ Σ𝑘 ∈ ℕ0 (𝐹‘𝑘) = Σ𝑘 ∈ ℕ0 (1 / (!‘𝑘))
42	40, 41	eqtr4i 2767	. . . . . . . 8 ⊢ e = Σ𝑘 ∈ ℕ0 (𝐹‘𝑘)
43	19, 20, 23, 24, 16, 36	isumsplit 15725	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ ℕ0 (𝐹‘𝑘) = (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
44	42, 43	eqtrid 2788	. . . . . . 7 ⊢ (𝜑 → e = (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
45	21	nncnd 12169	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑄 ∈ ℂ)
46		pncan 11407	. . . . . . . . . . 11 ⊢ ((𝑄 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑄 + 1) − 1) = 𝑄)
47	45, 12, 46	sylancl 586	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑄 + 1) − 1) = 𝑄)
48	47	oveq2d 7373	. . . . . . . . 9 ⊢ (𝜑 → (0...((𝑄 + 1) − 1)) = (0...𝑄))
49	48	sumeq1d 15586	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) = Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))
50	49	oveq1d 7372	. . . . . . 7 ⊢ (𝜑 → (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = (Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
51	44, 50	eqtrd 2776	. . . . . 6 ⊢ (𝜑 → e = (Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
52	18, 39, 51	mvrladdd 11568	. . . . 5 ⊢ (𝜑 → (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
53	52	oveq2d 7373	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) = ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
54	21	nnnn0d 12473	. . . . . . 7 ⊢ (𝜑 → 𝑄 ∈ ℕ0)
55	54	faccld 14184	. . . . . 6 ⊢ (𝜑 → (!‘𝑄) ∈ ℕ)
56	55	nncnd 12169	. . . . 5 ⊢ (𝜑 → (!‘𝑄) ∈ ℂ)
57		ere 15971	. . . . . . 7 ⊢ e ∈ ℝ
58	57	recni 11169	. . . . . 6 ⊢ e ∈ ℂ
59	58	a1i 11	. . . . 5 ⊢ (𝜑 → e ∈ ℂ)
60	56, 59, 18	subdid 11611	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) = (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))))
61	53, 60	eqtr3d 2778	. . 3 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))))
62		eirr.4	. . . . . . 7 ⊢ (𝜑 → e = (𝑃 / 𝑄))
63	62	oveq2d 7373	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) · e) = ((!‘𝑄) · (𝑃 / 𝑄)))
64		eirr.2	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∈ ℤ)
65	64	zcnd 12608	. . . . . . 7 ⊢ (𝜑 → 𝑃 ∈ ℂ)
66	21	nnne0d 12203	. . . . . . 7 ⊢ (𝜑 → 𝑄 ≠ 0)
67	56, 65, 45, 66	div12d 11967	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) · (𝑃 / 𝑄)) = (𝑃 · ((!‘𝑄) / 𝑄)))
68	63, 67	eqtrd 2776	. . . . 5 ⊢ (𝜑 → ((!‘𝑄) · e) = (𝑃 · ((!‘𝑄) / 𝑄)))
69	21	nnred 12168	. . . . . . . . 9 ⊢ (𝜑 → 𝑄 ∈ ℝ)
70	69	leidd 11721	. . . . . . . 8 ⊢ (𝜑 → 𝑄 ≤ 𝑄)
71		facdiv 14187	. . . . . . . 8 ⊢ ((𝑄 ∈ ℕ0 ∧ 𝑄 ∈ ℕ ∧ 𝑄 ≤ 𝑄) → ((!‘𝑄) / 𝑄) ∈ ℕ)
72	54, 21, 70, 71	syl3anc 1371	. . . . . . 7 ⊢ (𝜑 → ((!‘𝑄) / 𝑄) ∈ ℕ)
73	72	nnzd 12526	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) / 𝑄) ∈ ℤ)
74	64, 73	zmulcld 12613	. . . . 5 ⊢ (𝜑 → (𝑃 · ((!‘𝑄) / 𝑄)) ∈ ℤ)
75	68, 74	eqeltrd 2838	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · e) ∈ ℤ)
76	1, 56, 17	fsummulc2 15669	. . . . 5 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) = Σ𝑘 ∈ (0...𝑄)((!‘𝑄) · (𝐹‘𝑘)))
77	2	adantl 482	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → 𝑘 ∈ ℕ0)
78	77, 28	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (𝐹‘𝑘) = (1 / (!‘𝑘)))
79	78	oveq2d 7373	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) = ((!‘𝑄) · (1 / (!‘𝑘))))
80	56	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑄) ∈ ℂ)
81	2, 31	sylan2 593	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) ∈ ℕ)
82	81	nncnd 12169	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) ∈ ℂ)
83		facne0 14186	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ0 → (!‘𝑘) ≠ 0)
84	77, 83	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) ≠ 0)
85	80, 82, 84	divrecd 11934	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) / (!‘𝑘)) = ((!‘𝑄) · (1 / (!‘𝑘))))
86	79, 85	eqtr4d 2779	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) = ((!‘𝑄) / (!‘𝑘)))
87		permnn 14226	. . . . . . . . 9 ⊢ (𝑘 ∈ (0...𝑄) → ((!‘𝑄) / (!‘𝑘)) ∈ ℕ)
88	87	adantl 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) / (!‘𝑘)) ∈ ℕ)
89	86, 88	eqeltrd 2838	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) ∈ ℕ)
90	89	nnzd 12526	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) ∈ ℤ)
91	1, 90	fsumzcl 15620	. . . . 5 ⊢ (𝜑 → Σ𝑘 ∈ (0...𝑄)((!‘𝑄) · (𝐹‘𝑘)) ∈ ℤ)
92	76, 91	eqeltrd 2838	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) ∈ ℤ)
93	75, 92	zsubcld 12612	. . 3 ⊢ (𝜑 → (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) ∈ ℤ)
94	61, 93	eqeltrd 2838	. 2 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℤ)
95		0zd 12511	. . 3 ⊢ (𝜑 → 0 ∈ ℤ)
96	55	nnrpd 12955	. . . . 5 ⊢ (𝜑 → (!‘𝑄) ∈ ℝ+)
97	96, 37	rpmulcld 12973	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℝ+)
98	97	rpgt0d 12960	. . 3 ⊢ (𝜑 → 0 < ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
99	22	peano2nnd 12170	. . . . . . . 8 ⊢ (𝜑 → ((𝑄 + 1) + 1) ∈ ℕ)
100	99	nnred 12168	. . . . . . 7 ⊢ (𝜑 → ((𝑄 + 1) + 1) ∈ ℝ)
101	23	faccld 14184	. . . . . . . 8 ⊢ (𝜑 → (!‘(𝑄 + 1)) ∈ ℕ)
102	101, 22	nnmulcld 12206	. . . . . . 7 ⊢ (𝜑 → ((!‘(𝑄 + 1)) · (𝑄 + 1)) ∈ ℕ)
103	100, 102	nndivred 12207	. . . . . 6 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) ∈ ℝ)
104	55	nnrecred 12204	. . . . . 6 ⊢ (𝜑 → (1 / (!‘𝑄)) ∈ ℝ)
105		abs1 15182	. . . . . . . . . . . 12 ⊢ (abs‘1) = 1
106	105	oveq1i 7367	. . . . . . . . . . 11 ⊢ ((abs‘1)↑𝑛) = (1↑𝑛)
107	106	oveq1i 7367	. . . . . . . . . 10 ⊢ (((abs‘1)↑𝑛) / (!‘𝑛)) = ((1↑𝑛) / (!‘𝑛))
108	107	mpteq2i 5210	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ0 ↦ (((abs‘1)↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛)))
109	9, 108	eqtr4i 2767	. . . . . . . 8 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ (((abs‘1)↑𝑛) / (!‘𝑛)))
110		eqid 2736	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ0 ↦ ((((abs‘1)↑(𝑄 + 1)) / (!‘(𝑄 + 1))) · ((1 / ((𝑄 + 1) + 1))↑𝑛))) = (𝑛 ∈ ℕ0 ↦ ((((abs‘1)↑(𝑄 + 1)) / (!‘(𝑄 + 1))) · ((1 / ((𝑄 + 1) + 1))↑𝑛)))
111		1le1 11783	. . . . . . . . . 10 ⊢ 1 ≤ 1
112	105, 111	eqbrtri 5126	. . . . . . . . 9 ⊢ (abs‘1) ≤ 1
113	112	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (abs‘1) ≤ 1)
114	9, 109, 110, 22, 13, 113	eftlub 15991	. . . . . . 7 ⊢ (𝜑 → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ≤ (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))))
115	37	rprege0d 12964	. . . . . . . 8 ⊢ (𝜑 → (Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ ∧ 0 ≤ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
116		absid 15181	. . . . . . . 8 ⊢ ((Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ ∧ 0 ≤ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
117	115, 116	syl 17	. . . . . . 7 ⊢ (𝜑 → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
118	105	oveq1i 7367	. . . . . . . . . 10 ⊢ ((abs‘1)↑(𝑄 + 1)) = (1↑(𝑄 + 1))
119	22	nnzd 12526	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑄 + 1) ∈ ℤ)
120		1exp 13997	. . . . . . . . . . 11 ⊢ ((𝑄 + 1) ∈ ℤ → (1↑(𝑄 + 1)) = 1)
121	119, 120	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (1↑(𝑄 + 1)) = 1)
122	118, 121	eqtrid 2788	. . . . . . . . 9 ⊢ (𝜑 → ((abs‘1)↑(𝑄 + 1)) = 1)
123	122	oveq1d 7372	. . . . . . . 8 ⊢ (𝜑 → (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (1 · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))))
124	103	recnd 11183	. . . . . . . . 9 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) ∈ ℂ)
125	124	mulid2d 11173	. . . . . . . 8 ⊢ (𝜑 → (1 · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
126	123, 125	eqtrd 2776	. . . . . . 7 ⊢ (𝜑 → (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
127	114, 117, 126	3brtr3d 5136	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ≤ (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
128	22	nnred 12168	. . . . . . . . . 10 ⊢ (𝜑 → (𝑄 + 1) ∈ ℝ)
129	128, 128	readdcld 11184	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) + (𝑄 + 1)) ∈ ℝ)
130	128, 128	remulcld 11185	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) ∈ ℝ)
131		1red 11156	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℝ)
132	21	nnge1d 12201	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ≤ 𝑄)
133		1nn 12164	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ
134		nnleltp1 12558	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℕ ∧ 𝑄 ∈ ℕ) → (1 ≤ 𝑄 ↔ 1 < (𝑄 + 1)))
135	133, 21, 134	sylancr 587	. . . . . . . . . . 11 ⊢ (𝜑 → (1 ≤ 𝑄 ↔ 1 < (𝑄 + 1)))
136	132, 135	mpbid 231	. . . . . . . . . 10 ⊢ (𝜑 → 1 < (𝑄 + 1))
137	131, 128, 128, 136	ltadd2dd 11314	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) + 1) < ((𝑄 + 1) + (𝑄 + 1)))
138	22	nncnd 12169	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑄 + 1) ∈ ℂ)
139	138	2timesd 12396	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (𝑄 + 1)) = ((𝑄 + 1) + (𝑄 + 1)))
140		df-2 12216	. . . . . . . . . . . 12 ⊢ 2 = (1 + 1)
141	131, 69, 131, 132	leadd1dd 11769	. . . . . . . . . . . 12 ⊢ (𝜑 → (1 + 1) ≤ (𝑄 + 1))
142	140, 141	eqbrtrid 5140	. . . . . . . . . . 11 ⊢ (𝜑 → 2 ≤ (𝑄 + 1))
143		2re 12227	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℝ
144	143	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 2 ∈ ℝ)
145	22	nngt0d 12202	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 < (𝑄 + 1))
146		lemul1 12007	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℝ ∧ (𝑄 + 1) ∈ ℝ ∧ ((𝑄 + 1) ∈ ℝ ∧ 0 < (𝑄 + 1))) → (2 ≤ (𝑄 + 1) ↔ (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1))))
147	144, 128, 128, 145, 146	syl112anc 1374	. . . . . . . . . . 11 ⊢ (𝜑 → (2 ≤ (𝑄 + 1) ↔ (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1))))
148	142, 147	mpbid 231	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1)))
149	139, 148	eqbrtrrd 5129	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) + (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1)))
150	100, 129, 130, 137, 149	ltletrd 11315	. . . . . . . 8 ⊢ (𝜑 → ((𝑄 + 1) + 1) < ((𝑄 + 1) · (𝑄 + 1)))
151		facp1 14178	. . . . . . . . . . . . 13 ⊢ (𝑄 ∈ ℕ0 → (!‘(𝑄 + 1)) = ((!‘𝑄) · (𝑄 + 1)))
152	54, 151	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘(𝑄 + 1)) = ((!‘𝑄) · (𝑄 + 1)))
153	152	oveq1d 7372	. . . . . . . . . . 11 ⊢ (𝜑 → ((!‘(𝑄 + 1)) / (!‘𝑄)) = (((!‘𝑄) · (𝑄 + 1)) / (!‘𝑄)))
154	101	nncnd 12169	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘(𝑄 + 1)) ∈ ℂ)
155	55	nnne0d 12203	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘𝑄) ≠ 0)
156	154, 56, 155	divrecd 11934	. . . . . . . . . . 11 ⊢ (𝜑 → ((!‘(𝑄 + 1)) / (!‘𝑄)) = ((!‘(𝑄 + 1)) · (1 / (!‘𝑄))))
157	138, 56, 155	divcan3d 11936	. . . . . . . . . . 11 ⊢ (𝜑 → (((!‘𝑄) · (𝑄 + 1)) / (!‘𝑄)) = (𝑄 + 1))
158	153, 156, 157	3eqtr3rd 2785	. . . . . . . . . 10 ⊢ (𝜑 → (𝑄 + 1) = ((!‘(𝑄 + 1)) · (1 / (!‘𝑄))))
159	158	oveq1d 7372	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (1 / (!‘𝑄))) · (𝑄 + 1)))
160	104	recnd 11183	. . . . . . . . . 10 ⊢ (𝜑 → (1 / (!‘𝑄)) ∈ ℂ)
161	154, 160, 138	mul32d 11365	. . . . . . . . 9 ⊢ (𝜑 → (((!‘(𝑄 + 1)) · (1 / (!‘𝑄))) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
162	159, 161	eqtrd 2776	. . . . . . . 8 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
163	150, 162	breqtrd 5131	. . . . . . 7 ⊢ (𝜑 → ((𝑄 + 1) + 1) < (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
164	102	nnred 12168	. . . . . . . 8 ⊢ (𝜑 → ((!‘(𝑄 + 1)) · (𝑄 + 1)) ∈ ℝ)
165	102	nngt0d 12202	. . . . . . . 8 ⊢ (𝜑 → 0 < ((!‘(𝑄 + 1)) · (𝑄 + 1)))
166		ltdivmul 12030	. . . . . . . 8 ⊢ ((((𝑄 + 1) + 1) ∈ ℝ ∧ (1 / (!‘𝑄)) ∈ ℝ ∧ (((!‘(𝑄 + 1)) · (𝑄 + 1)) ∈ ℝ ∧ 0 < ((!‘(𝑄 + 1)) · (𝑄 + 1)))) → ((((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) < (1 / (!‘𝑄)) ↔ ((𝑄 + 1) + 1) < (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄)))))
167	100, 104, 164, 165, 166	syl112anc 1374	. . . . . . 7 ⊢ (𝜑 → ((((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) < (1 / (!‘𝑄)) ↔ ((𝑄 + 1) + 1) < (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄)))))
168	163, 167	mpbird 256	. . . . . 6 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) < (1 / (!‘𝑄)))
169	38, 103, 104, 127, 168	lelttrd 11313	. . . . 5 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) < (1 / (!‘𝑄)))
170	38, 131, 96	ltmuldiv2d 13005	. . . . 5 ⊢ (𝜑 → (((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < 1 ↔ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) < (1 / (!‘𝑄))))
171	169, 170	mpbird 256	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < 1)
172		0p1e1 12275	. . . 4 ⊢ (0 + 1) = 1
173	171, 172	breqtrrdi 5147	. . 3 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < (0 + 1))
174		btwnnz 12579	. . 3 ⊢ ((0 ∈ ℤ ∧ 0 < ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∧ ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < (0 + 1)) → ¬ ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℤ)
175	95, 98, 173, 174	syl3anc 1371	. 2 ⊢ (𝜑 → ¬ ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℤ)
176	94, 175	pm2.65i 193	1 ⊢ ¬ 𝜑

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541   ∈ wcel 2106   ≠ wne 2943   class class class wbr 5105   ↦ cmpt 5188  dom cdm 5633  ‘cfv 6496  (class class class)co 7357  ℂcc 11049  ℝcr 11050  0cc0 11051  1c1 11052   + caddc 11054   · cmul 11056   < clt 11189   ≤ cle 11190   − cmin 11385   / cdiv 11812  ℕcn 12153  2c2 12208  ℕ₀cn0 12413  ℤcz 12499  ℤ_≥cuz 12763  ℝ⁺crp 12915  ...cfz 13424  seqcseq 13906  ↑cexp 13967  !cfa 14173  abscabs 15119   ⇝ cli 15366  Σcsu 15570  eceu 15945

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672  ax-inf2 9577  ax-cnex 11107  ax-resscn 11108  ax-1cn 11109  ax-icn 11110  ax-addcl 11111  ax-addrcl 11112  ax-mulcl 11113  ax-mulrcl 11114  ax-mulcom 11115  ax-addass 11116  ax-mulass 11117  ax-distr 11118  ax-i2m1 11119  ax-1ne0 11120  ax-1rid 11121  ax-rnegex 11122  ax-rrecex 11123  ax-cnre 11124  ax-pre-lttri 11125  ax-pre-lttrn 11126  ax-pre-ltadd 11127  ax-pre-mulgt0 11128  ax-pre-sup 11129

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3065  df-rex 3074  df-rmo 3353  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-pss 3929  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-int 4908  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-tr 5223  df-id 5531  df-eprel 5537  df-po 5545  df-so 5546  df-fr 5588  df-se 5589  df-we 5590  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-pred 6253  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-isom 6505  df-riota 7313  df-ov 7360  df-oprab 7361  df-mpo 7362  df-om 7803  df-1st 7921  df-2nd 7922  df-frecs 8212  df-wrecs 8243  df-recs 8317  df-rdg 8356  df-1o 8412  df-er 8648  df-pm 8768  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-sup 9378  df-inf 9379  df-oi 9446  df-card 9875  df-pnf 11191  df-mnf 11192  df-xr 11193  df-ltxr 11194  df-le 11195  df-sub 11387  df-neg 11388  df-div 11813  df-nn 12154  df-2 12216  df-3 12217  df-n0 12414  df-z 12500  df-uz 12764  df-rp 12916  df-ico 13270  df-fz 13425  df-fzo 13568  df-fl 13697  df-seq 13907  df-exp 13968  df-fac 14174  df-bc 14203  df-hash 14231  df-shft 14952  df-cj 14984  df-re 14985  df-im 14986  df-sqrt 15120  df-abs 15121  df-limsup 15353  df-clim 15370  df-rlim 15371  df-sum 15571  df-ef 15950  df-e 15951

This theorem is referenced by:  eirr  16087