Theorem stoweidlem14 37912

Description: There exists a k as in the proof of Lemma 1 in [BrosowskiDeutsh] p. 90: k is an integer and 1 < k * δ < 2. D is used to represent δ in the paper. (Contributed by Glauco Siliprandi, 20-Apr-2017.)

Hypotheses

Ref	Expression
stoweidlem14.1	|- A = { j e. NN | ( 1 / D ) < j }
stoweidlem14.2	|- ( ph -> D e. RR+ )
stoweidlem14.3	|- ( ph -> D < 1 )

Assertion

Ref	Expression
stoweidlem14	|- ( ph -> E. k e. NN ( 1 < ( k x. D ) /\ ( ( k x. D ) / 2 ) < 1 ) )

Distinct variable groups:   j, k, D   A, k   ph, k

Allowed substitution hints:   ph( j)   A( j)

Proof of Theorem stoweidlem14

Dummy variable z is distinct from all other variables.

Step	Hyp	Ref	Expression
1		stoweidlem14.1	. . . . . 6 |- A = { j e. NN | ( 1 / D ) < j }
2		ssrab2 3526	. . . . . . 7 |- { j e. NN | ( 1 / D ) < j } C_ NN
3	2	a1i 11	. . . . . 6 |- ( ph -> { j e. NN | ( 1 / D ) < j } C_ NN )
4	1, 3	syl5eqss 3488	. . . . 5 |- ( ph -> A C_ NN )
5		stoweidlem14.2	. . . . . . 7 |- ( ph -> D e. RR+ )
6	5	rprecred 11381	. . . . . 6 |- ( ph -> ( 1 / D ) e. RR )
7		arch 10895	. . . . . 6 |- ( ( 1 / D ) e. RR -> E. k e. NN ( 1 / D ) < k )
8		breq2 4420	. . . . . . . . . . 11 |- ( j = k -> ( ( 1 / D ) < j <-> ( 1 / D ) < k ) )
9	8	elrab 3208	. . . . . . . . . 10 |- ( k e. { j e. NN | ( 1 / D ) < j } <-> ( k e. NN /\ ( 1 / D ) < k ) )
10	9	biimpri 211	. . . . . . . . 9 |- ( ( k e. NN /\ ( 1 / D ) < k ) -> k e. { j e. NN | ( 1 / D ) < j } )
11	10, 1	syl6eleqr 2551	. . . . . . . 8 |- ( ( k e. NN /\ ( 1 / D ) < k ) -> k e. A )
12		simpr 467	. . . . . . . 8 |- ( ( k e. NN /\ ( 1 / D ) < k ) -> ( 1 / D ) < k )
13	11, 12	jca 539	. . . . . . 7 |- ( ( k e. NN /\ ( 1 / D ) < k ) -> ( k e. A /\ ( 1 / D ) < k ) )
14	13	reximi2 2866	. . . . . 6 |- ( E. k e. NN ( 1 / D ) < k -> E. k e. A ( 1 / D ) < k )
15		rexn0 3884	. . . . . 6 |- ( E. k e. A ( 1 / D ) < k -> A =/= (/) )
16	6, 7, 14, 15	4syl 19	. . . . 5 |- ( ph -> A =/= (/) )
17		nnwo 11253	. . . . 5 |- ( ( A C_ NN /\ A =/= (/) ) -> E. k e. A A. z e. A k <_ z )
18	4, 16, 17	syl2anc 671	. . . 4 |- ( ph -> E. k e. A A. z e. A k <_ z )
19		df-rex 2755	. . . 4 |- ( E. k e. A A. z e. A k <_ z <-> E. k ( k e. A /\ A. z e. A k <_ z ) )
20	18, 19	sylib 201	. . 3 |- ( ph -> E. k ( k e. A /\ A. z e. A k <_ z ) )
21	8, 1	elrab2 3210	. . . . . . . 8 |- ( k e. A <-> ( k e. NN /\ ( 1 / D ) < k ) )
22	21	simplbi 466	. . . . . . 7 |- ( k e. A -> k e. NN )
23	22	ad2antrl 739	. . . . . 6 |- ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) -> k e. NN )
24		simpl 463	. . . . . . 7 |- ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) -> ph )
25		simprl 769	. . . . . . 7 |- ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) -> k e. A )
26		simprr 771	. . . . . . . 8 |- ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) -> A. z e. A k <_ z )
27		nfcv 2603	. . . . . . . . 9 |- F/_ z A
28		nfrab1 2983	. . . . . . . . . 10 |- F/_ j { j e. NN | ( 1 / D ) < j }
29	1, 28	nfcxfr 2601	. . . . . . . . 9 |- F/_ j A
30		nfv 1772	. . . . . . . . 9 |- F/ j k <_ z
31		nfv 1772	. . . . . . . . 9 |- F/ z k <_ j
32		breq2 4420	. . . . . . . . 9 |- ( z = j -> ( k <_ z <-> k <_ j ) )
33	27, 29, 30, 31, 32	cbvralf 3025	. . . . . . . 8 |- ( A. z e. A k <_ z <-> A. j e. A k <_ j )
34	26, 33	sylib 201	. . . . . . 7 |- ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) -> A. j e. A k <_ j )
35	21	simprbi 470	. . . . . . . . 9 |- ( k e. A -> ( 1 / D ) < k )
36	35	ad2antrl 739	. . . . . . . 8 |- ( ( ph /\ ( k e. A /\ A. j e. A k <_ j ) ) -> ( 1 / D ) < k )
37	22	ad2antrl 739	. . . . . . . . 9 |- ( ( ph /\ ( k e. A /\ A. j e. A k <_ j ) ) -> k e. NN )
38		1red 9684	. . . . . . . . . 10 |- ( ( ph /\ k e. NN ) -> 1 e. RR )
39		nnre 10644	. . . . . . . . . . 11 |- ( k e. NN -> k e. RR )
40	39	adantl 472	. . . . . . . . . 10 |- ( ( ph /\ k e. NN ) -> k e. RR )
41	5	rpregt0d 11376	. . . . . . . . . . 11 |- ( ph -> ( D e. RR /\ 0 < D ) )
42	41	adantr 471	. . . . . . . . . 10 |- ( ( ph /\ k e. NN ) -> ( D e. RR /\ 0 < D ) )
43		ltdivmul2 10510	. . . . . . . . . 10 |- ( ( 1 e. RR /\ k e. RR /\ ( D e. RR /\ 0 < D ) ) -> ( ( 1 / D ) < k <-> 1 < ( k x. D ) ) )
44	38, 40, 42, 43	syl3anc 1276	. . . . . . . . 9 |- ( ( ph /\ k e. NN ) -> ( ( 1 / D ) < k <-> 1 < ( k x. D ) ) )
45	37, 44	syldan 477	. . . . . . . 8 |- ( ( ph /\ ( k e. A /\ A. j e. A k <_ j ) ) -> ( ( 1 / D ) < k <-> 1 < ( k x. D ) ) )
46	36, 45	mpbid 215	. . . . . . 7 |- ( ( ph /\ ( k e. A /\ A. j e. A k <_ j ) ) -> 1 < ( k x. D ) )
47	24, 25, 34, 46	syl12anc 1274	. . . . . 6 |- ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) -> 1 < ( k x. D ) )
48		oveq1 6322	. . . . . . . . . . . 12 |- ( k = 1 -> ( k x. D ) = ( 1 x. D ) )
49	48	adantl 472	. . . . . . . . . . 11 |- ( ( ph /\ k = 1 ) -> ( k x. D ) = ( 1 x. D ) )
50	5	rpcnd 11372	. . . . . . . . . . . . 13 |- ( ph -> D e. CC )
51	50	adantr 471	. . . . . . . . . . . 12 |- ( ( ph /\ k = 1 ) -> D e. CC )
52	51	mulid2d 9687	. . . . . . . . . . 11 |- ( ( ph /\ k = 1 ) -> ( 1 x. D ) = D )
53	49, 52	eqtrd 2496	. . . . . . . . . 10 |- ( ( ph /\ k = 1 ) -> ( k x. D ) = D )
54	53	oveq1d 6330	. . . . . . . . 9 |- ( ( ph /\ k = 1 ) -> ( ( k x. D ) / 2 ) = ( D / 2 ) )
55	5	rpred 11370	. . . . . . . . . . . 12 |- ( ph -> D e. RR )
56	55	rehalfcld 10888	. . . . . . . . . . 11 |- ( ph -> ( D / 2 ) e. RR )
57		halfre 10857	. . . . . . . . . . . 12 |- ( 1 / 2 ) e. RR
58	57	a1i 11	. . . . . . . . . . 11 |- ( ph -> ( 1 / 2 ) e. RR )
59		1red 9684	. . . . . . . . . . 11 |- ( ph -> 1 e. RR )
60		stoweidlem14.3	. . . . . . . . . . . 12 |- ( ph -> D < 1 )
61		2re 10707	. . . . . . . . . . . . . 14 |- 2 e. RR
62	61	a1i 11	. . . . . . . . . . . . 13 |- ( ph -> 2 e. RR )
63		2pos 10729	. . . . . . . . . . . . . 14 |- 0 < 2
64	63	a1i 11	. . . . . . . . . . . . 13 |- ( ph -> 0 < 2 )
65		ltdiv1 10497	. . . . . . . . . . . . 13 |- ( ( D e. RR /\ 1 e. RR /\ ( 2 e. RR /\ 0 < 2 ) ) -> ( D < 1 <-> ( D / 2 ) < ( 1 / 2 ) ) )
66	55, 59, 62, 64, 65	syl112anc 1280	. . . . . . . . . . . 12 |- ( ph -> ( D < 1 <-> ( D / 2 ) < ( 1 / 2 ) ) )
67	60, 66	mpbid 215	. . . . . . . . . . 11 |- ( ph -> ( D / 2 ) < ( 1 / 2 ) )
68		halflt1 10860	. . . . . . . . . . . 12 |- ( 1 / 2 ) < 1
69	68	a1i 11	. . . . . . . . . . 11 |- ( ph -> ( 1 / 2 ) < 1 )
70	56, 58, 59, 67, 69	lttrd 9822	. . . . . . . . . 10 |- ( ph -> ( D / 2 ) < 1 )
71	70	adantr 471	. . . . . . . . 9 |- ( ( ph /\ k = 1 ) -> ( D / 2 ) < 1 )
72	54, 71	eqbrtrd 4437	. . . . . . . 8 |- ( ( ph /\ k = 1 ) -> ( ( k x. D ) / 2 ) < 1 )
73	72	adantlr 726	. . . . . . 7 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ k = 1 ) -> ( ( k x. D ) / 2 ) < 1 )
74		simpll 765	. . . . . . . 8 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> ph )
75		simplrl 775	. . . . . . . . . 10 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> k e. A )
76	75, 22	syl 17	. . . . . . . . 9 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> k e. NN )
77		neqne 2643	. . . . . . . . . 10 |- ( -. k = 1 -> k =/= 1 )
78	77	adantl 472	. . . . . . . . 9 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> k =/= 1 )
79		eluz2b3 11261	. . . . . . . . 9 |- ( k e. ( ZZ>= ` 2 ) <-> ( k e. NN /\ k =/= 1 ) )
80	76, 78, 79	sylanbrc 675	. . . . . . . 8 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> k e. ( ZZ>= ` 2 ) )
81		peano2rem 9967	. . . . . . . . . 10 |- ( k e. RR -> ( k - 1 ) e. RR )
82	75, 22, 39, 81	4syl 19	. . . . . . . . 9 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> ( k - 1 ) e. RR )
83	55	ad2antrr 737	. . . . . . . . . 10 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> D e. RR )
84	5	rpne0d 11375	. . . . . . . . . . 11 |- ( ph -> D =/= 0 )
85	84	ad2antrr 737	. . . . . . . . . 10 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> D =/= 0 )
86	83, 85	rereccld 10462	. . . . . . . . 9 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> ( 1 / D ) e. RR )
87		1zzd 10997	. . . . . . . . . . 11 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> 1 e. ZZ )
88		df-2 10696	. . . . . . . . . . . . . . 15 |- 2 = ( 1 + 1 )
89	88	fveq2i 5891	. . . . . . . . . . . . . 14 |- ( ZZ>= ` 2 ) = ( ZZ>= ` ( 1 + 1 ) )
90	89	eleq2i 2532	. . . . . . . . . . . . 13 |- ( k e. ( ZZ>= ` 2 ) <-> k e. ( ZZ>= ` ( 1 + 1 ) ) )
91		eluzsub 11217	. . . . . . . . . . . . 13 |- ( ( 1 e. ZZ /\ 1 e. ZZ /\ k e. ( ZZ>= ` ( 1 + 1 ) ) ) -> ( k - 1 ) e. ( ZZ>= ` 1 ) )
92	90, 91	syl3an3b 1314	. . . . . . . . . . . 12 |- ( ( 1 e. ZZ /\ 1 e. ZZ /\ k e. ( ZZ>= ` 2 ) ) -> ( k - 1 ) e. ( ZZ>= ` 1 ) )
93		nnuz 11223	. . . . . . . . . . . 12 |- NN = ( ZZ>= ` 1 )
94	92, 93	syl6eleqr 2551	. . . . . . . . . . 11 |- ( ( 1 e. ZZ /\ 1 e. ZZ /\ k e. ( ZZ>= ` 2 ) ) -> ( k - 1 ) e. NN )
95	87, 87, 80, 94	syl3anc 1276	. . . . . . . . . 10 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> ( k - 1 ) e. NN )
96	22, 39	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 |- ( k e. A -> k e. RR )
97	96	adantl 472	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( k - 1 ) e. A /\ k e. A ) -> k e. RR )
98	97, 81	syl 17	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( k - 1 ) e. A /\ k e. A ) -> ( k - 1 ) e. RR )
99		simpr 467	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ( k - 1 ) e. RR /\ k e. RR ) -> k e. RR )
100	99	ltm1d 10567	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( k - 1 ) e. RR /\ k e. RR ) -> ( k - 1 ) < k )
101		ltnle 9739	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( k - 1 ) e. RR /\ k e. RR ) -> ( ( k - 1 ) < k <-> -. k <_ ( k - 1 ) ) )
102	100, 101	mpbid 215	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( k - 1 ) e. RR /\ k e. RR ) -> -. k <_ ( k - 1 ) )
103	98, 97, 102	syl2anc 671	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( k - 1 ) e. A /\ k e. A ) -> -. k <_ ( k - 1 ) )
104		breq2 4420	. . . . . . . . . . . . . . . . . . . . 21 |- ( z = ( k - 1 ) -> ( k <_ z <-> k <_ ( k - 1 ) ) )
105	104	notbid 300	. . . . . . . . . . . . . . . . . . . 20 |- ( z = ( k - 1 ) -> ( -. k <_ z <-> -. k <_ ( k - 1 ) ) )
106	105	rspcev 3162	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( k - 1 ) e. A /\ -. k <_ ( k - 1 ) ) -> E. z e. A -. k <_ z )
107	103, 106	syldan 477	. . . . . . . . . . . . . . . . . 18 |- ( ( ( k - 1 ) e. A /\ k e. A ) -> E. z e. A -. k <_ z )
108		rexnal 2848	. . . . . . . . . . . . . . . . . 18 |- ( E. z e. A -. k <_ z <-> -. A. z e. A k <_ z )
109	107, 108	sylib 201	. . . . . . . . . . . . . . . . 17 |- ( ( ( k - 1 ) e. A /\ k e. A ) -> -. A. z e. A k <_ z )
110	109	ex 440	. . . . . . . . . . . . . . . 16 |- ( ( k - 1 ) e. A -> ( k e. A -> -. A. z e. A k <_ z ) )
111		imnan 428	. . . . . . . . . . . . . . . 16 |- ( ( k e. A -> -. A. z e. A k <_ z ) <-> -. ( k e. A /\ A. z e. A k <_ z ) )
112	110, 111	sylib 201	. . . . . . . . . . . . . . 15 |- ( ( k - 1 ) e. A -> -. ( k e. A /\ A. z e. A k <_ z ) )
113	112	con2i 125	. . . . . . . . . . . . . 14 |- ( ( k e. A /\ A. z e. A k <_ z ) -> -. ( k - 1 ) e. A )
114	113	ad2antlr 738	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> -. ( k - 1 ) e. A )
115		breq2 4420	. . . . . . . . . . . . . 14 |- ( j = ( k - 1 ) -> ( ( 1 / D ) < j <-> ( 1 / D ) < ( k - 1 ) ) )
116	115, 1	elrab2 3210	. . . . . . . . . . . . 13 |- ( ( k - 1 ) e. A <-> ( ( k - 1 ) e. NN /\ ( 1 / D ) < ( k - 1 ) ) )
117	114, 116	sylnib 310	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> -. ( ( k - 1 ) e. NN /\ ( 1 / D ) < ( k - 1 ) ) )
118		ianor 495	. . . . . . . . . . . 12 |- ( -. ( ( k - 1 ) e. NN /\ ( 1 / D ) < ( k - 1 ) ) <-> ( -. ( k - 1 ) e. NN \/ -. ( 1 / D ) < ( k - 1 ) ) )
119	117, 118	sylib 201	. . . . . . . . . . 11 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> ( -. ( k - 1 ) e. NN \/ -. ( 1 / D ) < ( k - 1 ) ) )
120		imor 418	. . . . . . . . . . 11 |- ( ( ( k - 1 ) e. NN -> -. ( 1 / D ) < ( k - 1 ) ) <-> ( -. ( k - 1 ) e. NN \/ -. ( 1 / D ) < ( k - 1 ) ) )
121	119, 120	sylibr 217	. . . . . . . . . 10 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> ( ( k - 1 ) e. NN -> -. ( 1 / D ) < ( k - 1 ) ) )
122	95, 121	mpd 15	. . . . . . . . 9 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> -. ( 1 / D ) < ( k - 1 ) )
123	82, 86, 122	nltled 9811	. . . . . . . 8 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> ( k - 1 ) <_ ( 1 / D ) )
124		eluzelre 11198	. . . . . . . . . . . . 13 |- ( k e. ( ZZ>= ` 2 ) -> k e. RR )
125	124	adantl 472	. . . . . . . . . . . 12 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> k e. RR )
126	55	adantr 471	. . . . . . . . . . . 12 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> D e. RR )
127	125, 126	remulcld 9697	. . . . . . . . . . 11 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( k x. D ) e. RR )
128	127	rehalfcld 10888	. . . . . . . . . 10 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( ( k x. D ) / 2 ) e. RR )
129	128	3adant3 1034	. . . . . . . . 9 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k x. D ) / 2 ) e. RR )
130	59, 55	readdcld 9696	. . . . . . . . . . . 12 |- ( ph -> ( 1 + D ) e. RR )
131	130	adantr 471	. . . . . . . . . . 11 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( 1 + D ) e. RR )
132	131	rehalfcld 10888	. . . . . . . . . 10 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( ( 1 + D ) / 2 ) e. RR )
133	132	3adant3 1034	. . . . . . . . 9 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( 1 + D ) / 2 ) e. RR )
134		1red 9684	. . . . . . . . 9 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> 1 e. RR )
135		eluzelcn 11199	. . . . . . . . . . . . . . 15 |- ( k e. ( ZZ>= ` 2 ) -> k e. CC )
136	135	adantl 472	. . . . . . . . . . . . . 14 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> k e. CC )
137	50	adantr 471	. . . . . . . . . . . . . 14 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> D e. CC )
138	136, 137	mulcld 9689	. . . . . . . . . . . . 13 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( k x. D ) e. CC )
139	138	3adant3 1034	. . . . . . . . . . . 12 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( k x. D ) e. CC )
140	50	3ad2ant1 1035	. . . . . . . . . . . 12 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> D e. CC )
141	139, 140	npcand 10016	. . . . . . . . . . 11 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( ( k x. D ) - D ) + D ) = ( k x. D ) )
142	127, 126	resubcld 10075	. . . . . . . . . . . . 13 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( ( k x. D ) - D ) e. RR )
143	142	3adant3 1034	. . . . . . . . . . . 12 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k x. D ) - D ) e. RR )
144	55	3ad2ant1 1035	. . . . . . . . . . . 12 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> D e. RR )
145		simp3 1016	. . . . . . . . . . . . . 14 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( k - 1 ) <_ ( 1 / D ) )
146		1red 9684	. . . . . . . . . . . . . . . . 17 |- ( k e. ( ZZ>= ` 2 ) -> 1 e. RR )
147	124, 146	resubcld 10075	. . . . . . . . . . . . . . . 16 |- ( k e. ( ZZ>= ` 2 ) -> ( k - 1 ) e. RR )
148	147	3ad2ant2 1036	. . . . . . . . . . . . . . 15 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( k - 1 ) e. RR )
149	6	3ad2ant1 1035	. . . . . . . . . . . . . . 15 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( 1 / D ) e. RR )
150	41	3ad2ant1 1035	. . . . . . . . . . . . . . 15 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( D e. RR /\ 0 < D ) )
151		lemul1 10485	. . . . . . . . . . . . . . 15 |- ( ( ( k - 1 ) e. RR /\ ( 1 / D ) e. RR /\ ( D e. RR /\ 0 < D ) ) -> ( ( k - 1 ) <_ ( 1 / D ) <-> ( ( k - 1 ) x. D ) <_ ( ( 1 / D ) x. D ) ) )
152	148, 149, 150, 151	syl3anc 1276	. . . . . . . . . . . . . 14 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k - 1 ) <_ ( 1 / D ) <-> ( ( k - 1 ) x. D ) <_ ( ( 1 / D ) x. D ) ) )
153	145, 152	mpbid 215	. . . . . . . . . . . . 13 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k - 1 ) x. D ) <_ ( ( 1 / D ) x. D ) )
154		1cnd 9685	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> 1 e. CC )
155	136, 154, 137	subdird 10103	. . . . . . . . . . . . . . 15 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( ( k - 1 ) x. D ) = ( ( k x. D ) - ( 1 x. D ) ) )
156	137	mulid2d 9687	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( 1 x. D ) = D )
157	156	oveq2d 6331	. . . . . . . . . . . . . . 15 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( ( k x. D ) - ( 1 x. D ) ) = ( ( k x. D ) - D ) )
158	155, 157	eqtrd 2496	. . . . . . . . . . . . . 14 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) ) -> ( ( k - 1 ) x. D ) = ( ( k x. D ) - D ) )
159	158	3adant3 1034	. . . . . . . . . . . . 13 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k - 1 ) x. D ) = ( ( k x. D ) - D ) )
160		1cnd 9685	. . . . . . . . . . . . . . . 16 |- ( ph -> 1 e. CC )
161	160, 50, 84	3jca 1194	. . . . . . . . . . . . . . 15 |- ( ph -> ( 1 e. CC /\ D e. CC /\ D =/= 0 ) )
162	161	3ad2ant1 1035	. . . . . . . . . . . . . 14 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( 1 e. CC /\ D e. CC /\ D =/= 0 ) )
163		divcan1 10307	. . . . . . . . . . . . . 14 |- ( ( 1 e. CC /\ D e. CC /\ D =/= 0 ) -> ( ( 1 / D ) x. D ) = 1 )
164	162, 163	syl 17	. . . . . . . . . . . . 13 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( 1 / D ) x. D ) = 1 )
165	153, 159, 164	3brtr3d 4446	. . . . . . . . . . . 12 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k x. D ) - D ) <_ 1 )
166	143, 134, 144, 165	leadd1dd 10255	. . . . . . . . . . 11 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( ( k x. D ) - D ) + D ) <_ ( 1 + D ) )
167	141, 166	eqbrtrrd 4439	. . . . . . . . . 10 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( k x. D ) <_ ( 1 + D ) )
168	127	3adant3 1034	. . . . . . . . . . 11 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( k x. D ) e. RR )
169	130	3ad2ant1 1035	. . . . . . . . . . 11 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( 1 + D ) e. RR )
170	61, 63	pm3.2i 461	. . . . . . . . . . . 12 |- ( 2 e. RR /\ 0 < 2 )
171	170	a1i 11	. . . . . . . . . . 11 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( 2 e. RR /\ 0 < 2 ) )
172		lediv1 10498	. . . . . . . . . . 11 |- ( ( ( k x. D ) e. RR /\ ( 1 + D ) e. RR /\ ( 2 e. RR /\ 0 < 2 ) ) -> ( ( k x. D ) <_ ( 1 + D ) <-> ( ( k x. D ) / 2 ) <_ ( ( 1 + D ) / 2 ) ) )
173	168, 169, 171, 172	syl3anc 1276	. . . . . . . . . 10 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k x. D ) <_ ( 1 + D ) <-> ( ( k x. D ) / 2 ) <_ ( ( 1 + D ) / 2 ) ) )
174	167, 173	mpbid 215	. . . . . . . . 9 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k x. D ) / 2 ) <_ ( ( 1 + D ) / 2 ) )
175	55, 59, 59, 60	ltadd2dd 9820	. . . . . . . . . . . . 13 |- ( ph -> ( 1 + D ) < ( 1 + 1 ) )
176		1p1e2 10751	. . . . . . . . . . . . 13 |- ( 1 + 1 ) = 2
177	175, 176	syl6breq 4456	. . . . . . . . . . . 12 |- ( ph -> ( 1 + D ) < 2 )
178		ltdiv1 10497	. . . . . . . . . . . . 13 |- ( ( ( 1 + D ) e. RR /\ 2 e. RR /\ ( 2 e. RR /\ 0 < 2 ) ) -> ( ( 1 + D ) < 2 <-> ( ( 1 + D ) / 2 ) < ( 2 / 2 ) ) )
179	130, 62, 62, 64, 178	syl112anc 1280	. . . . . . . . . . . 12 |- ( ph -> ( ( 1 + D ) < 2 <-> ( ( 1 + D ) / 2 ) < ( 2 / 2 ) ) )
180	177, 179	mpbid 215	. . . . . . . . . . 11 |- ( ph -> ( ( 1 + D ) / 2 ) < ( 2 / 2 ) )
181		2div2e1 10761	. . . . . . . . . . 11 |- ( 2 / 2 ) = 1
182	180, 181	syl6breq 4456	. . . . . . . . . 10 |- ( ph -> ( ( 1 + D ) / 2 ) < 1 )
183	182	3ad2ant1 1035	. . . . . . . . 9 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( 1 + D ) / 2 ) < 1 )
184	129, 133, 134, 174, 183	lelttrd 9819	. . . . . . . 8 |- ( ( ph /\ k e. ( ZZ>= ` 2 ) /\ ( k - 1 ) <_ ( 1 / D ) ) -> ( ( k x. D ) / 2 ) < 1 )
185	74, 80, 123, 184	syl3anc 1276	. . . . . . 7 |- ( ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) /\ -. k = 1 ) -> ( ( k x. D ) / 2 ) < 1 )
186	73, 185	pm2.61dan 805	. . . . . 6 |- ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) -> ( ( k x. D ) / 2 ) < 1 )
187	23, 47, 186	jca32 542	. . . . 5 |- ( ( ph /\ ( k e. A /\ A. z e. A k <_ z ) ) -> ( k e. NN /\ ( 1 < ( k x. D ) /\ ( ( k x. D ) / 2 ) < 1 ) ) )
188	187	ex 440	. . . 4 |- ( ph -> ( ( k e. A /\ A. z e. A k <_ z ) -> ( k e. NN /\ ( 1 < ( k x. D ) /\ ( ( k x. D ) / 2 ) < 1 ) ) ) )
189	188	eximdv 1775	. . 3 |- ( ph -> ( E. k ( k e. A /\ A. z e. A k <_ z ) -> E. k ( k e. NN /\ ( 1 < ( k x. D ) /\ ( ( k x. D ) / 2 ) < 1 ) ) ) )
190	20, 189	mpd 15	. 2 |- ( ph -> E. k ( k e. NN /\ ( 1 < ( k x. D ) /\ ( ( k x. D ) / 2 ) < 1 ) ) )
191		df-rex 2755	. 2 |- ( E. k e. NN ( 1 < ( k x. D ) /\ ( ( k x. D ) / 2 ) < 1 ) <-> E. k ( k e. NN /\ ( 1 < ( k x. D ) /\ ( ( k x. D ) / 2 ) < 1 ) ) )
192	190, 191	sylibr 217	1 |- ( ph -> E. k e. NN ( 1 < ( k x. D ) /\ ( ( k x. D ) / 2 ) < 1 ) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 189   \/ wo 374   /\ wa 375   /\ w3a 991   = wceq 1455   E.wex 1674   e. wcel 1898   =/= wne 2633   A.wral 2749   E.wrex 2750   {crab 2753   C_ wss 3416   (/)c0 3743   class class class wbr 4416   ` cfv 5601  (class class class)co 6315   CCcc 9563   RRcr 9564   0cc0 9565   1c1 9566   + caddc 9568   x. cmul 9570   < clt 9701   <_ cle 9702   - cmin 9886   / cdiv 10297   NNcn 10637   2c2 10687   ZZcz 10966   ZZ>=cuz 11188   RR+crp 11331

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1680  ax-4 1693  ax-5 1769  ax-6 1816  ax-7 1862  ax-8 1900  ax-9 1907  ax-10 1926  ax-11 1931  ax-12 1944  ax-13 2102  ax-ext 2442  ax-sep 4539  ax-nul 4548  ax-pow 4595  ax-pr 4653  ax-un 6610  ax-cnex 9621  ax-resscn 9622  ax-1cn 9623  ax-icn 9624  ax-addcl 9625  ax-addrcl 9626  ax-mulcl 9627  ax-mulrcl 9628  ax-mulcom 9629  ax-addass 9630  ax-mulass 9631  ax-distr 9632  ax-i2m1 9633  ax-1ne0 9634  ax-1rid 9635  ax-rnegex 9636  ax-rrecex 9637  ax-cnre 9638  ax-pre-lttri 9639  ax-pre-lttrn 9640  ax-pre-ltadd 9641  ax-pre-mulgt0 9642  ax-pre-sup 9643

This theorem depends on definitions:  df-bi 190  df-or 376  df-an 377  df-3or 992  df-3an 993  df-tru 1458  df-ex 1675  df-nf 1679  df-sb 1809  df-eu 2314  df-mo 2315  df-clab 2449  df-cleq 2455  df-clel 2458  df-nfc 2592  df-ne 2635  df-nel 2636  df-ral 2754  df-rex 2755  df-reu 2756  df-rmo 2757  df-rab 2758  df-v 3059  df-sbc 3280  df-csb 3376  df-dif 3419  df-un 3421  df-in 3423  df-ss 3430  df-pss 3432  df-nul 3744  df-if 3894  df-pw 3965  df-sn 3981  df-pr 3983  df-tp 3985  df-op 3987  df-uni 4213  df-iun 4294  df-br 4417  df-opab 4476  df-mpt 4477  df-tr 4512  df-eprel 4764  df-id 4768  df-po 4774  df-so 4775  df-fr 4812  df-we 4814  df-xp 4859  df-rel 4860  df-cnv 4861  df-co 4862  df-dm 4863  df-rn 4864  df-res 4865  df-ima 4866  df-pred 5399  df-ord 5445  df-on 5446  df-lim 5447  df-suc 5448  df-iota 5565  df-fun 5603  df-fn 5604  df-f 5605  df-f1 5606  df-fo 5607  df-f1o 5608  df-fv 5609  df-riota 6277  df-ov 6318  df-oprab 6319  df-mpt2 6320  df-om 6720  df-wrecs 7054  df-recs 7116  df-rdg 7154  df-er 7389  df-en 7596  df-dom 7597  df-sdom 7598  df-pnf 9703  df-mnf 9704  df-xr 9705  df-ltxr 9706  df-le 9707  df-sub 9888  df-neg 9889  df-div 10298  df-nn 10638  df-2 10696  df-n0 10899  df-z 10967  df-uz 11189  df-rp 11332

This theorem is referenced by:  stoweidlem49  37948