Theorem eirrlem 16131

Description: Lemma for eirr 16132. (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 13898	. . . . . . 7 ⊢ (𝜑 → (0...𝑄) ∈ Fin)
2		elfznn0 13541	. . . . . . . 8 ⊢ (𝑘 ∈ (0...𝑄) → 𝑘 ∈ ℕ0)
3		eirr.1	. . . . . . . . . . . 12 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ (1 / (!‘𝑛)))
4		nn0z 12514	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℕ0 → 𝑛 ∈ ℤ)
5		1exp 14016	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℤ → (1↑𝑛) = 1)
6	4, 5	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ ℕ0 → (1↑𝑛) = 1)
7	6	oveq1d 7368	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ0 → ((1↑𝑛) / (!‘𝑛)) = (1 / (!‘𝑛)))
8	7	mpteq2ia 5190	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ (1 / (!‘𝑛)))
9	3, 8	eqtr4i 2755	. . . . . . . . . . 11 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛)))
10	9	eftval 16001	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ0 → (𝐹‘𝑘) = ((1↑𝑘) / (!‘𝑘)))
11	10	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = ((1↑𝑘) / (!‘𝑘)))
12		ax-1cn 11086	. . . . . . . . . . 11 ⊢ 1 ∈ ℂ
13	12	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℂ)
14		eftcl 15998	. . . . . . . . . 10 ⊢ ((1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((1↑𝑘) / (!‘𝑘)) ∈ ℂ)
15	13, 14	sylan 580	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → ((1↑𝑘) / (!‘𝑘)) ∈ ℂ)
16	11, 15	eqeltrd 2828	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) ∈ ℂ)
17	2, 16	sylan2 593	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (𝐹‘𝑘) ∈ ℂ)
18	1, 17	fsumcl 15658	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) ∈ ℂ)
19		nn0uz 12795	. . . . . . . . 9 ⊢ ℕ0 = (ℤ≥‘0)
20		eqid 2729	. . . . . . . . 9 ⊢ (ℤ≥‘(𝑄 + 1)) = (ℤ≥‘(𝑄 + 1))
21		eirr.3	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑄 ∈ ℕ)
22	21	peano2nnd 12163	. . . . . . . . . 10 ⊢ (𝜑 → (𝑄 + 1) ∈ ℕ)
23	22	nnnn0d 12463	. . . . . . . . 9 ⊢ (𝜑 → (𝑄 + 1) ∈ ℕ0)
24		eqidd 2730	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = (𝐹‘𝑘))
25		fveq2 6826	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑘 → (!‘𝑛) = (!‘𝑘))
26	25	oveq2d 7369	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑘 → (1 / (!‘𝑛)) = (1 / (!‘𝑘)))
27		ovex 7386	. . . . . . . . . . . 12 ⊢ (1 / (!‘𝑘)) ∈ V
28	26, 3, 27	fvmpt 6934	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ0 → (𝐹‘𝑘) = (1 / (!‘𝑘)))
29	28	adantl 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = (1 / (!‘𝑘)))
30		faccl 14208	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ0 → (!‘𝑘) ∈ ℕ)
31	30	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℕ)
32	31	nnrpd 12953	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (!‘𝑘) ∈ ℝ+)
33	32	rpreccld 12965	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (1 / (!‘𝑘)) ∈ ℝ+)
34	29, 33	eqeltrd 2828	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) ∈ ℝ+)
35	9	efcllem 16002	. . . . . . . . . 10 ⊢ (1 ∈ ℂ → seq0( + , 𝐹) ∈ dom ⇝ )
36	13, 35	syl 17	. . . . . . . . 9 ⊢ (𝜑 → seq0( + , 𝐹) ∈ dom ⇝ )
37	19, 20, 23, 24, 34, 36	isumrpcl 15768	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ+)
38	37	rpred 12955	. . . . . . 7 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ)
39	38	recnd 11162	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℂ)
40		esum 16005	. . . . . . . . 9 ⊢ e = Σ𝑘 ∈ ℕ0 (1 / (!‘𝑘))
41	28	sumeq2i 15623	. . . . . . . . 9 ⊢ Σ𝑘 ∈ ℕ0 (𝐹‘𝑘) = Σ𝑘 ∈ ℕ0 (1 / (!‘𝑘))
42	40, 41	eqtr4i 2755	. . . . . . . 8 ⊢ e = Σ𝑘 ∈ ℕ0 (𝐹‘𝑘)
43	19, 20, 23, 24, 16, 36	isumsplit 15765	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ ℕ0 (𝐹‘𝑘) = (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
44	42, 43	eqtrid 2776	. . . . . . 7 ⊢ (𝜑 → e = (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
45	21	nncnd 12162	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑄 ∈ ℂ)
46		pncan 11387	. . . . . . . . . . 11 ⊢ ((𝑄 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑄 + 1) − 1) = 𝑄)
47	45, 12, 46	sylancl 586	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑄 + 1) − 1) = 𝑄)
48	47	oveq2d 7369	. . . . . . . . 9 ⊢ (𝜑 → (0...((𝑄 + 1) − 1)) = (0...𝑄))
49	48	sumeq1d 15625	. . . . . . . 8 ⊢ (𝜑 → Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) = Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))
50	49	oveq1d 7368	. . . . . . 7 ⊢ (𝜑 → (Σ𝑘 ∈ (0...((𝑄 + 1) − 1))(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = (Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
51	44, 50	eqtrd 2764	. . . . . 6 ⊢ (𝜑 → e = (Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘) + Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
52	18, 39, 51	mvrladdd 11551	. . . . 5 ⊢ (𝜑 → (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
53	52	oveq2d 7369	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) = ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
54	21	nnnn0d 12463	. . . . . . 7 ⊢ (𝜑 → 𝑄 ∈ ℕ0)
55	54	faccld 14209	. . . . . 6 ⊢ (𝜑 → (!‘𝑄) ∈ ℕ)
56	55	nncnd 12162	. . . . 5 ⊢ (𝜑 → (!‘𝑄) ∈ ℂ)
57		ere 16014	. . . . . . 7 ⊢ e ∈ ℝ
58	57	recni 11148	. . . . . 6 ⊢ e ∈ ℂ
59	58	a1i 11	. . . . 5 ⊢ (𝜑 → e ∈ ℂ)
60	56, 59, 18	subdid 11594	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · (e − Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) = (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))))
61	53, 60	eqtr3d 2766	. . 3 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))))
62		eirr.4	. . . . . . 7 ⊢ (𝜑 → e = (𝑃 / 𝑄))
63	62	oveq2d 7369	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) · e) = ((!‘𝑄) · (𝑃 / 𝑄)))
64		eirr.2	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∈ ℤ)
65	64	zcnd 12599	. . . . . . 7 ⊢ (𝜑 → 𝑃 ∈ ℂ)
66	21	nnne0d 12196	. . . . . . 7 ⊢ (𝜑 → 𝑄 ≠ 0)
67	56, 65, 45, 66	div12d 11954	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) · (𝑃 / 𝑄)) = (𝑃 · ((!‘𝑄) / 𝑄)))
68	63, 67	eqtrd 2764	. . . . 5 ⊢ (𝜑 → ((!‘𝑄) · e) = (𝑃 · ((!‘𝑄) / 𝑄)))
69	21	nnred 12161	. . . . . . . . 9 ⊢ (𝜑 → 𝑄 ∈ ℝ)
70	69	leidd 11704	. . . . . . . 8 ⊢ (𝜑 → 𝑄 ≤ 𝑄)
71		facdiv 14212	. . . . . . . 8 ⊢ ((𝑄 ∈ ℕ0 ∧ 𝑄 ∈ ℕ ∧ 𝑄 ≤ 𝑄) → ((!‘𝑄) / 𝑄) ∈ ℕ)
72	54, 21, 70, 71	syl3anc 1373	. . . . . . 7 ⊢ (𝜑 → ((!‘𝑄) / 𝑄) ∈ ℕ)
73	72	nnzd 12516	. . . . . 6 ⊢ (𝜑 → ((!‘𝑄) / 𝑄) ∈ ℤ)
74	64, 73	zmulcld 12604	. . . . 5 ⊢ (𝜑 → (𝑃 · ((!‘𝑄) / 𝑄)) ∈ ℤ)
75	68, 74	eqeltrd 2828	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · e) ∈ ℤ)
76	1, 56, 17	fsummulc2 15709	. . . . 5 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) = Σ𝑘 ∈ (0...𝑄)((!‘𝑄) · (𝐹‘𝑘)))
77	2	adantl 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → 𝑘 ∈ ℕ0)
78	77, 28	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (𝐹‘𝑘) = (1 / (!‘𝑘)))
79	78	oveq2d 7369	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) = ((!‘𝑄) · (1 / (!‘𝑘))))
80	56	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑄) ∈ ℂ)
81	2, 31	sylan2 593	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) ∈ ℕ)
82	81	nncnd 12162	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) ∈ ℂ)
83		facne0 14211	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ0 → (!‘𝑘) ≠ 0)
84	77, 83	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → (!‘𝑘) ≠ 0)
85	80, 82, 84	divrecd 11921	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) / (!‘𝑘)) = ((!‘𝑄) · (1 / (!‘𝑘))))
86	79, 85	eqtr4d 2767	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) = ((!‘𝑄) / (!‘𝑘)))
87		permnn 14251	. . . . . . . . 9 ⊢ (𝑘 ∈ (0...𝑄) → ((!‘𝑄) / (!‘𝑘)) ∈ ℕ)
88	87	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) / (!‘𝑘)) ∈ ℕ)
89	86, 88	eqeltrd 2828	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) ∈ ℕ)
90	89	nnzd 12516	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑄)) → ((!‘𝑄) · (𝐹‘𝑘)) ∈ ℤ)
91	1, 90	fsumzcl 15660	. . . . 5 ⊢ (𝜑 → Σ𝑘 ∈ (0...𝑄)((!‘𝑄) · (𝐹‘𝑘)) ∈ ℤ)
92	76, 91	eqeltrd 2828	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘)) ∈ ℤ)
93	75, 92	zsubcld 12603	. . 3 ⊢ (𝜑 → (((!‘𝑄) · e) − ((!‘𝑄) · Σ𝑘 ∈ (0...𝑄)(𝐹‘𝑘))) ∈ ℤ)
94	61, 93	eqeltrd 2828	. 2 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℤ)
95		0zd 12501	. . 3 ⊢ (𝜑 → 0 ∈ ℤ)
96	55	nnrpd 12953	. . . . 5 ⊢ (𝜑 → (!‘𝑄) ∈ ℝ+)
97	96, 37	rpmulcld 12971	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℝ+)
98	97	rpgt0d 12958	. . 3 ⊢ (𝜑 → 0 < ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
99	22	peano2nnd 12163	. . . . . . . 8 ⊢ (𝜑 → ((𝑄 + 1) + 1) ∈ ℕ)
100	99	nnred 12161	. . . . . . 7 ⊢ (𝜑 → ((𝑄 + 1) + 1) ∈ ℝ)
101	23	faccld 14209	. . . . . . . 8 ⊢ (𝜑 → (!‘(𝑄 + 1)) ∈ ℕ)
102	101, 22	nnmulcld 12199	. . . . . . 7 ⊢ (𝜑 → ((!‘(𝑄 + 1)) · (𝑄 + 1)) ∈ ℕ)
103	100, 102	nndivred 12200	. . . . . 6 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) ∈ ℝ)
104	55	nnrecred 12197	. . . . . 6 ⊢ (𝜑 → (1 / (!‘𝑄)) ∈ ℝ)
105		abs1 15222	. . . . . . . . . . . 12 ⊢ (abs‘1) = 1
106	105	oveq1i 7363	. . . . . . . . . . 11 ⊢ ((abs‘1)↑𝑛) = (1↑𝑛)
107	106	oveq1i 7363	. . . . . . . . . 10 ⊢ (((abs‘1)↑𝑛) / (!‘𝑛)) = ((1↑𝑛) / (!‘𝑛))
108	107	mpteq2i 5191	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ0 ↦ (((abs‘1)↑𝑛) / (!‘𝑛))) = (𝑛 ∈ ℕ0 ↦ ((1↑𝑛) / (!‘𝑛)))
109	9, 108	eqtr4i 2755	. . . . . . . 8 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ (((abs‘1)↑𝑛) / (!‘𝑛)))
110		eqid 2729	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ0 ↦ ((((abs‘1)↑(𝑄 + 1)) / (!‘(𝑄 + 1))) · ((1 / ((𝑄 + 1) + 1))↑𝑛))) = (𝑛 ∈ ℕ0 ↦ ((((abs‘1)↑(𝑄 + 1)) / (!‘(𝑄 + 1))) · ((1 / ((𝑄 + 1) + 1))↑𝑛)))
111		1le1 11766	. . . . . . . . . 10 ⊢ 1 ≤ 1
112	105, 111	eqbrtri 5116	. . . . . . . . 9 ⊢ (abs‘1) ≤ 1
113	112	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (abs‘1) ≤ 1)
114	9, 109, 110, 22, 13, 113	eftlub 16036	. . . . . . 7 ⊢ (𝜑 → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ≤ (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))))
115	37	rprege0d 12962	. . . . . . . 8 ⊢ (𝜑 → (Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ ∧ 0 ≤ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)))
116		absid 15221	. . . . . . . 8 ⊢ ((Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ∈ ℝ ∧ 0 ≤ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
117	115, 116	syl 17	. . . . . . 7 ⊢ (𝜑 → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) = Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘))
118	105	oveq1i 7363	. . . . . . . . . 10 ⊢ ((abs‘1)↑(𝑄 + 1)) = (1↑(𝑄 + 1))
119	22	nnzd 12516	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑄 + 1) ∈ ℤ)
120		1exp 14016	. . . . . . . . . . 11 ⊢ ((𝑄 + 1) ∈ ℤ → (1↑(𝑄 + 1)) = 1)
121	119, 120	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (1↑(𝑄 + 1)) = 1)
122	118, 121	eqtrid 2776	. . . . . . . . 9 ⊢ (𝜑 → ((abs‘1)↑(𝑄 + 1)) = 1)
123	122	oveq1d 7368	. . . . . . . 8 ⊢ (𝜑 → (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (1 · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))))
124	103	recnd 11162	. . . . . . . . 9 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) ∈ ℂ)
125	124	mullidd 11152	. . . . . . . 8 ⊢ (𝜑 → (1 · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
126	123, 125	eqtrd 2764	. . . . . . 7 ⊢ (𝜑 → (((abs‘1)↑(𝑄 + 1)) · (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1)))) = (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
127	114, 117, 126	3brtr3d 5126	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) ≤ (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))))
128	22	nnred 12161	. . . . . . . . . 10 ⊢ (𝜑 → (𝑄 + 1) ∈ ℝ)
129	128, 128	readdcld 11163	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) + (𝑄 + 1)) ∈ ℝ)
130	128, 128	remulcld 11164	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) ∈ ℝ)
131		1red 11135	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℝ)
132	21	nnge1d 12194	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ≤ 𝑄)
133		1nn 12157	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ
134		nnleltp1 12549	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℕ ∧ 𝑄 ∈ ℕ) → (1 ≤ 𝑄 ↔ 1 < (𝑄 + 1)))
135	133, 21, 134	sylancr 587	. . . . . . . . . . 11 ⊢ (𝜑 → (1 ≤ 𝑄 ↔ 1 < (𝑄 + 1)))
136	132, 135	mpbid 232	. . . . . . . . . 10 ⊢ (𝜑 → 1 < (𝑄 + 1))
137	131, 128, 128, 136	ltadd2dd 11293	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) + 1) < ((𝑄 + 1) + (𝑄 + 1)))
138	22	nncnd 12162	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑄 + 1) ∈ ℂ)
139	138	2timesd 12385	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (𝑄 + 1)) = ((𝑄 + 1) + (𝑄 + 1)))
140		df-2 12209	. . . . . . . . . . . 12 ⊢ 2 = (1 + 1)
141	131, 69, 131, 132	leadd1dd 11752	. . . . . . . . . . . 12 ⊢ (𝜑 → (1 + 1) ≤ (𝑄 + 1))
142	140, 141	eqbrtrid 5130	. . . . . . . . . . 11 ⊢ (𝜑 → 2 ≤ (𝑄 + 1))
143		2re 12220	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℝ
144	143	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 2 ∈ ℝ)
145	22	nngt0d 12195	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 < (𝑄 + 1))
146		lemul1 11994	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℝ ∧ (𝑄 + 1) ∈ ℝ ∧ ((𝑄 + 1) ∈ ℝ ∧ 0 < (𝑄 + 1))) → (2 ≤ (𝑄 + 1) ↔ (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1))))
147	144, 128, 128, 145, 146	syl112anc 1376	. . . . . . . . . . 11 ⊢ (𝜑 → (2 ≤ (𝑄 + 1) ↔ (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1))))
148	142, 147	mpbid 232	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1)))
149	139, 148	eqbrtrrd 5119	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) + (𝑄 + 1)) ≤ ((𝑄 + 1) · (𝑄 + 1)))
150	100, 129, 130, 137, 149	ltletrd 11294	. . . . . . . 8 ⊢ (𝜑 → ((𝑄 + 1) + 1) < ((𝑄 + 1) · (𝑄 + 1)))
151		facp1 14203	. . . . . . . . . . . . 13 ⊢ (𝑄 ∈ ℕ0 → (!‘(𝑄 + 1)) = ((!‘𝑄) · (𝑄 + 1)))
152	54, 151	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘(𝑄 + 1)) = ((!‘𝑄) · (𝑄 + 1)))
153	152	oveq1d 7368	. . . . . . . . . . 11 ⊢ (𝜑 → ((!‘(𝑄 + 1)) / (!‘𝑄)) = (((!‘𝑄) · (𝑄 + 1)) / (!‘𝑄)))
154	101	nncnd 12162	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘(𝑄 + 1)) ∈ ℂ)
155	55	nnne0d 12196	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘𝑄) ≠ 0)
156	154, 56, 155	divrecd 11921	. . . . . . . . . . 11 ⊢ (𝜑 → ((!‘(𝑄 + 1)) / (!‘𝑄)) = ((!‘(𝑄 + 1)) · (1 / (!‘𝑄))))
157	138, 56, 155	divcan3d 11923	. . . . . . . . . . 11 ⊢ (𝜑 → (((!‘𝑄) · (𝑄 + 1)) / (!‘𝑄)) = (𝑄 + 1))
158	153, 156, 157	3eqtr3rd 2773	. . . . . . . . . 10 ⊢ (𝜑 → (𝑄 + 1) = ((!‘(𝑄 + 1)) · (1 / (!‘𝑄))))
159	158	oveq1d 7368	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (1 / (!‘𝑄))) · (𝑄 + 1)))
160	104	recnd 11162	. . . . . . . . . 10 ⊢ (𝜑 → (1 / (!‘𝑄)) ∈ ℂ)
161	154, 160, 138	mul32d 11344	. . . . . . . . 9 ⊢ (𝜑 → (((!‘(𝑄 + 1)) · (1 / (!‘𝑄))) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
162	159, 161	eqtrd 2764	. . . . . . . 8 ⊢ (𝜑 → ((𝑄 + 1) · (𝑄 + 1)) = (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
163	150, 162	breqtrd 5121	. . . . . . 7 ⊢ (𝜑 → ((𝑄 + 1) + 1) < (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄))))
164	102	nnred 12161	. . . . . . . 8 ⊢ (𝜑 → ((!‘(𝑄 + 1)) · (𝑄 + 1)) ∈ ℝ)
165	102	nngt0d 12195	. . . . . . . 8 ⊢ (𝜑 → 0 < ((!‘(𝑄 + 1)) · (𝑄 + 1)))
166		ltdivmul 12018	. . . . . . . 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 1376	. . . . . . 7 ⊢ (𝜑 → ((((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) < (1 / (!‘𝑄)) ↔ ((𝑄 + 1) + 1) < (((!‘(𝑄 + 1)) · (𝑄 + 1)) · (1 / (!‘𝑄)))))
168	163, 167	mpbird 257	. . . . . 6 ⊢ (𝜑 → (((𝑄 + 1) + 1) / ((!‘(𝑄 + 1)) · (𝑄 + 1))) < (1 / (!‘𝑄)))
169	38, 103, 104, 127, 168	lelttrd 11292	. . . . 5 ⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) < (1 / (!‘𝑄)))
170	38, 131, 96	ltmuldiv2d 13003	. . . . 5 ⊢ (𝜑 → (((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < 1 ↔ Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘) < (1 / (!‘𝑄))))
171	169, 170	mpbird 257	. . . 4 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < 1)
172		0p1e1 12263	. . . 4 ⊢ (0 + 1) = 1
173	171, 172	breqtrrdi 5137	. . 3 ⊢ (𝜑 → ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < (0 + 1))
174		btwnnz 12570	. . 3 ⊢ ((0 ∈ ℤ ∧ 0 < ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∧ ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) < (0 + 1)) → ¬ ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℤ)
175	95, 98, 173, 174	syl3anc 1373	. 2 ⊢ (𝜑 → ¬ ((!‘𝑄) · Σ𝑘 ∈ (ℤ≥‘(𝑄 + 1))(𝐹‘𝑘)) ∈ ℤ)
176	94, 175	pm2.65i 194	1 ⊢ ¬ 𝜑

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540   ∈ wcel 2109   ≠ wne 2925   class class class wbr 5095   ↦ cmpt 5176  dom cdm 5623  ‘cfv 6486  (class class class)co 7353  ℂcc 11026  ℝcr 11027  0cc0 11028  1c1 11029   + caddc 11031   · cmul 11033   < clt 11168   ≤ cle 11169   − cmin 11365   / cdiv 11795  ℕcn 12146  2c2 12201  ℕ₀cn0 12402  ℤcz 12489  ℤ_≥cuz 12753  ℝ⁺crp 12911  ...cfz 13428  seqcseq 13926  ↑cexp 13986  !cfa 14198  abscabs 15159   ⇝ cli 15409  Σcsu 15611  eceu 15987

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7675  ax-inf2 9556  ax-cnex 11084  ax-resscn 11085  ax-1cn 11086  ax-icn 11087  ax-addcl 11088  ax-addrcl 11089  ax-mulcl 11090  ax-mulrcl 11091  ax-mulcom 11092  ax-addass 11093  ax-mulass 11094  ax-distr 11095  ax-i2m1 11096  ax-1ne0 11097  ax-1rid 11098  ax-rnegex 11099  ax-rrecex 11100  ax-cnre 11101  ax-pre-lttri 11102  ax-pre-lttrn 11103  ax-pre-ltadd 11104  ax-pre-mulgt0 11105  ax-pre-sup 11106

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3345  df-reu 3346  df-rab 3397  df-v 3440  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4862  df-int 4900  df-iun 4946  df-br 5096  df-opab 5158  df-mpt 5177  df-tr 5203  df-id 5518  df-eprel 5523  df-po 5531  df-so 5532  df-fr 5576  df-se 5577  df-we 5578  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-isom 6495  df-riota 7310  df-ov 7356  df-oprab 7357  df-mpo 7358  df-om 7807  df-1st 7931  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-er 8632  df-pm 8763  df-en 8880  df-dom 8881  df-sdom 8882  df-fin 8883  df-sup 9351  df-inf 9352  df-oi 9421  df-card 9854  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11367  df-neg 11368  df-div 11796  df-nn 12147  df-2 12209  df-3 12210  df-n0 12403  df-z 12490  df-uz 12754  df-rp 12912  df-ico 13272  df-fz 13429  df-fzo 13576  df-fl 13714  df-seq 13927  df-exp 13987  df-fac 14199  df-bc 14228  df-hash 14256  df-shft 14992  df-cj 15024  df-re 15025  df-im 15026  df-sqrt 15160  df-abs 15161  df-limsup 15396  df-clim 15413  df-rlim 15414  df-sum 15612  df-ef 15992  df-e 15993

This theorem is referenced by:  eirr  16132