Theorem pntlemf 21252

Description: Lemma for pnt 21261. Add up the pieces in pntlemi 21251 to get an estimate slightly better than the naive lower bound 0. (Contributed by Mario Carneiro, 13-Apr-2016.)

Hypotheses

Ref	Expression
pntlem1.r	|- R = ( a e. RR+ |-> ( (ψ ` a ) - a ) )
pntlem1.a	|- ( ph -> A e. RR+ )
pntlem1.b	|- ( ph -> B e. RR+ )
pntlem1.l	|- ( ph -> L e. ( 0 (,) 1 ) )
pntlem1.d	|- D = ( A + 1 )
pntlem1.f	|- F = ( ( 1 - ( 1 / D ) ) x. ( ( L / (; 3 2 x. B ) ) / ( D ^ 2 ) ) )
pntlem1.u	|- ( ph -> U e. RR+ )
pntlem1.u2	|- ( ph -> U <_ A )
pntlem1.e	|- E = ( U / D )
pntlem1.k	|- K = ( exp ` ( B / E ) )
pntlem1.y	|- ( ph -> ( Y e. RR+ /\ 1 <_ Y ) )
pntlem1.x	|- ( ph -> ( X e. RR+ /\ Y < X ) )
pntlem1.c	|- ( ph -> C e. RR+ )
pntlem1.w	|- W = ( ( ( Y + ( 4 / ( L x. E ) ) ) ^ 2 ) + ( ( ( X x. ( K ^ 2 ) ) ^ 4 ) + ( exp ` ( ( (; 3 2 x. B ) / ( ( U - E ) x. ( L x. ( E ^ 2 ) ) ) ) x. ( ( U x. 3 ) + C ) ) ) ) )
pntlem1.z	|- ( ph -> Z e. ( W [,) +oo ) )
pntlem1.m	|- M = ( ( |_ ` ( ( log ` X ) / ( log ` K ) ) ) + 1 )
pntlem1.n	|- N = ( |_ ` ( ( ( log ` Z ) / ( log ` K ) ) / 2 ) )
pntlem1.U	|- ( ph -> A. z e. ( Y [,) +oo ) ( abs ` ( ( R ` z ) / z ) ) <_ U )
pntlem1.K	|- ( ph -> A. y e. ( X (,) +oo ) E. z e. RR+ ( ( y < z /\ ( ( 1 + ( L x. E ) ) x. z ) < ( K x. y ) ) /\ A. u e. ( z [,] ( ( 1 + ( L x. E ) ) x. z ) ) ( abs ` ( ( R ` u ) / u ) ) <_ E ) )

Assertion

Ref	Expression
pntlemf	|- ( ph -> ( ( U - E ) x. ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) ) <_ sum_ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )

Distinct variable groups:   z, C   y, n, z, u, L   n, K, y, z   n, M, z   ph, n   n, N, z   R, n, u, y, z   U, n, z   n, W, z   n, X, y, z   n, Y, z   n, a, u, y, z, E   n, Z, u, z

Allowed substitution hints:   ph( y, z, u, a)   A( y, z, u, n, a)   B( y, z, u, n, a)   C( y, u, n, a)   D( y, z, u, n, a)   R( a)   U( y, u, a)   F( y, z, u, n, a)   K( u, a)   L( a)   M( y, u, a)   N( y, u, a)   W( y, u, a)   X( u, a)   Y( y, u, a)   Z( y, a)

Proof of Theorem pntlemf

Dummy variables j m are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		pntlem1.r	. . . . . . 7 |- R = ( a e. RR+ |-> ( (ψ ` a ) - a ) )
2		pntlem1.a	. . . . . . 7 |- ( ph -> A e. RR+ )
3		pntlem1.b	. . . . . . 7 |- ( ph -> B e. RR+ )
4		pntlem1.l	. . . . . . 7 |- ( ph -> L e. ( 0 (,) 1 ) )
5		pntlem1.d	. . . . . . 7 |- D = ( A + 1 )
6		pntlem1.f	. . . . . . 7 |- F = ( ( 1 - ( 1 / D ) ) x. ( ( L / (; 3 2 x. B ) ) / ( D ^ 2 ) ) )
7		pntlem1.u	. . . . . . 7 |- ( ph -> U e. RR+ )
8		pntlem1.u2	. . . . . . 7 |- ( ph -> U <_ A )
9		pntlem1.e	. . . . . . 7 |- E = ( U / D )
10		pntlem1.k	. . . . . . 7 |- K = ( exp ` ( B / E ) )
11	1, 2, 3, 4, 5, 6, 7, 8, 9, 10	pntlemc 21242	. . . . . 6 |- ( ph -> ( E e. RR+ /\ K e. RR+ /\ ( E e. ( 0 (,) 1 ) /\ 1 < K /\ ( U - E ) e. RR+ ) ) )
12	11	simp3d 971	. . . . 5 |- ( ph -> ( E e. ( 0 (,) 1 ) /\ 1 < K /\ ( U - E ) e. RR+ ) )
13	12	simp3d 971	. . . 4 |- ( ph -> ( U - E ) e. RR+ )
14	1, 2, 3, 4, 5, 6	pntlemd 21241	. . . . . . . 8 |- ( ph -> ( L e. RR+ /\ D e. RR+ /\ F e. RR+ ) )
15	14	simp1d 969	. . . . . . 7 |- ( ph -> L e. RR+ )
16	11	simp1d 969	. . . . . . . 8 |- ( ph -> E e. RR+ )
17		2z 10268	. . . . . . . 8 |- 2 e. ZZ
18		rpexpcl 11355	. . . . . . . 8 |- ( ( E e. RR+ /\ 2 e. ZZ ) -> ( E ^ 2 ) e. RR+ )
19	16, 17, 18	sylancl 644	. . . . . . 7 |- ( ph -> ( E ^ 2 ) e. RR+ )
20	15, 19	rpmulcld 10620	. . . . . 6 |- ( ph -> ( L x. ( E ^ 2 ) ) e. RR+ )
21		3nn0 10195	. . . . . . . . 9 |- 3 e. NN0
22		2nn 10089	. . . . . . . . 9 |- 2 e. NN
23	21, 22	decnncl 10351	. . . . . . . 8 |- ; 3 2 e. NN
24		nnrp 10577	. . . . . . . 8 |- (; 3 2 e. NN -> ; 3 2 e. RR+ )
25	23, 24	ax-mp 8	. . . . . . 7 |- ; 3 2 e. RR+
26		rpmulcl 10589	. . . . . . 7 |- ( (; 3 2 e. RR+ /\ B e. RR+ ) -> (; 3 2 x. B ) e. RR+ )
27	25, 3, 26	sylancr 645	. . . . . 6 |- ( ph -> (; 3 2 x. B ) e. RR+ )
28	20, 27	rpdivcld 10621	. . . . 5 |- ( ph -> ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) e. RR+ )
29		pntlem1.y	. . . . . . . . . 10 |- ( ph -> ( Y e. RR+ /\ 1 <_ Y ) )
30		pntlem1.x	. . . . . . . . . 10 |- ( ph -> ( X e. RR+ /\ Y < X ) )
31		pntlem1.c	. . . . . . . . . 10 |- ( ph -> C e. RR+ )
32		pntlem1.w	. . . . . . . . . 10 |- W = ( ( ( Y + ( 4 / ( L x. E ) ) ) ^ 2 ) + ( ( ( X x. ( K ^ 2 ) ) ^ 4 ) + ( exp ` ( ( (; 3 2 x. B ) / ( ( U - E ) x. ( L x. ( E ^ 2 ) ) ) ) x. ( ( U x. 3 ) + C ) ) ) ) )
33		pntlem1.z	. . . . . . . . . 10 |- ( ph -> Z e. ( W [,) +oo ) )
34	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 29, 30, 31, 32, 33	pntlemb 21244	. . . . . . . . 9 |- ( ph -> ( Z e. RR+ /\ ( 1 < Z /\ _e <_ ( sqr ` Z ) /\ ( sqr ` Z ) <_ ( Z / Y ) ) /\ ( ( 4 / ( L x. E ) ) <_ ( sqr ` Z ) /\ ( ( ( log ` X ) / ( log ` K ) ) + 2 ) <_ ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) /\ ( ( U x. 3 ) + C ) <_ ( ( ( U - E ) x. ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) ) x. ( log ` Z ) ) ) ) )
35	34	simp1d 969	. . . . . . . 8 |- ( ph -> Z e. RR+ )
36	35	rpred 10604	. . . . . . 7 |- ( ph -> Z e. RR )
37	34	simp2d 970	. . . . . . . 8 |- ( ph -> ( 1 < Z /\ _e <_ ( sqr ` Z ) /\ ( sqr ` Z ) <_ ( Z / Y ) ) )
38	37	simp1d 969	. . . . . . 7 |- ( ph -> 1 < Z )
39	36, 38	rplogcld 20477	. . . . . 6 |- ( ph -> ( log ` Z ) e. RR+ )
40		rpexpcl 11355	. . . . . 6 |- ( ( ( log ` Z ) e. RR+ /\ 2 e. ZZ ) -> ( ( log ` Z ) ^ 2 ) e. RR+ )
41	39, 17, 40	sylancl 644	. . . . 5 |- ( ph -> ( ( log ` Z ) ^ 2 ) e. RR+ )
42	28, 41	rpmulcld 10620	. . . 4 |- ( ph -> ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) e. RR+ )
43	13, 42	rpmulcld 10620	. . 3 |- ( ph -> ( ( U - E ) x. ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) ) e. RR+ )
44	43	rpred 10604	. 2 |- ( ph -> ( ( U - E ) x. ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) ) e. RR )
45	15, 16	rpmulcld 10620	. . . . . . 7 |- ( ph -> ( L x. E ) e. RR+ )
46		8re 10034	. . . . . . . 8 |- 8 e. RR
47		8pos 10046	. . . . . . . 8 |- 0 < 8
48	46, 47	elrpii 10571	. . . . . . 7 |- 8 e. RR+
49		rpdivcl 10590	. . . . . . 7 |- ( ( ( L x. E ) e. RR+ /\ 8 e. RR+ ) -> ( ( L x. E ) / 8 ) e. RR+ )
50	45, 48, 49	sylancl 644	. . . . . 6 |- ( ph -> ( ( L x. E ) / 8 ) e. RR+ )
51	50, 39	rpmulcld 10620	. . . . 5 |- ( ph -> ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) e. RR+ )
52	13, 51	rpmulcld 10620	. . . 4 |- ( ph -> ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) e. RR+ )
53	52	rpred 10604	. . 3 |- ( ph -> ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) e. RR )
54		pntlem1.m	. . . . . . . 8 |- M = ( ( |_ ` ( ( log ` X ) / ( log ` K ) ) ) + 1 )
55		pntlem1.n	. . . . . . . 8 |- N = ( |_ ` ( ( ( log ` Z ) / ( log ` K ) ) / 2 ) )
56	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 29, 30, 31, 32, 33, 54, 55	pntlemg 21245	. . . . . . 7 |- ( ph -> ( M e. NN /\ N e. ( ZZ>= ` M ) /\ ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) <_ ( N - M ) ) )
57	56	simp1d 969	. . . . . 6 |- ( ph -> M e. NN )
58	56	simp2d 970	. . . . . 6 |- ( ph -> N e. ( ZZ>= ` M ) )
59		nnuz 10477	. . . . . . 7 |- NN = ( ZZ>= ` 1 )
60	59	uztrn2 10459	. . . . . 6 |- ( ( M e. NN /\ N e. ( ZZ>= ` M ) ) -> N e. NN )
61	57, 58, 60	syl2anc 643	. . . . 5 |- ( ph -> N e. NN )
62	61	nnred 9971	. . . 4 |- ( ph -> N e. RR )
63	57	nnred 9971	. . . 4 |- ( ph -> M e. RR )
64	62, 63	resubcld 9421	. . 3 |- ( ph -> ( N - M ) e. RR )
65	53, 64	remulcld 9072	. 2 |- ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( N - M ) ) e. RR )
66		fzfid 11267	. . 3 |- ( ph -> ( 1 ... ( |_ ` ( Z / Y ) ) ) e. Fin )
67	7	rpred 10604	. . . . . 6 |- ( ph -> U e. RR )
68		elfznn 11036	. . . . . 6 |- ( n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) -> n e. NN )
69		nndivre 9991	. . . . . 6 |- ( ( U e. RR /\ n e. NN ) -> ( U / n ) e. RR )
70	67, 68, 69	syl2an 464	. . . . 5 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( U / n ) e. RR )
71	35	adantr 452	. . . . . . . . . 10 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> Z e. RR+ )
72	68	adantl 453	. . . . . . . . . . 11 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> n e. NN )
73	72	nnrpd 10603	. . . . . . . . . 10 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> n e. RR+ )
74	71, 73	rpdivcld 10621	. . . . . . . . 9 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( Z / n ) e. RR+ )
75	1	pntrf 21210	. . . . . . . . . 10 |- R : RR+ --> RR
76	75	ffvelrni 5828	. . . . . . . . 9 |- ( ( Z / n ) e. RR+ -> ( R ` ( Z / n ) ) e. RR )
77	74, 76	syl 16	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( R ` ( Z / n ) ) e. RR )
78	77, 71	rerpdivcld 10631	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( ( R ` ( Z / n ) ) / Z ) e. RR )
79	78	recnd 9070	. . . . . 6 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( ( R ` ( Z / n ) ) / Z ) e. CC )
80	79	abscld 12193	. . . . 5 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) e. RR )
81	70, 80	resubcld 9421	. . . 4 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) e. RR )
82	73	relogcld 20471	. . . 4 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( log ` n ) e. RR )
83	81, 82	remulcld 9072	. . 3 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
84	66, 83	fsumrecl 12483	. 2 |- ( ph -> sum_ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
85	45	rpcnd 10606	. . . . . . . . 9 |- ( ph -> ( L x. E ) e. CC )
86	11	simp2d 970	. . . . . . . . . . . . 13 |- ( ph -> K e. RR+ )
87	86	rpred 10604	. . . . . . . . . . . 12 |- ( ph -> K e. RR )
88	12	simp2d 970	. . . . . . . . . . . 12 |- ( ph -> 1 < K )
89	87, 88	rplogcld 20477	. . . . . . . . . . 11 |- ( ph -> ( log ` K ) e. RR+ )
90	39, 89	rpdivcld 10621	. . . . . . . . . 10 |- ( ph -> ( ( log ` Z ) / ( log ` K ) ) e. RR+ )
91	90	rpcnd 10606	. . . . . . . . 9 |- ( ph -> ( ( log ` Z ) / ( log ` K ) ) e. CC )
92		rpcnne0 10585	. . . . . . . . . 10 |- ( 8 e. RR+ -> ( 8 e. CC /\ 8 =/= 0 ) )
93	48, 92	mp1i 12	. . . . . . . . 9 |- ( ph -> ( 8 e. CC /\ 8 =/= 0 ) )
94		4re 10029	. . . . . . . . . . 11 |- 4 e. RR
95		4pos 10042	. . . . . . . . . . 11 |- 0 < 4
96	94, 95	elrpii 10571	. . . . . . . . . 10 |- 4 e. RR+
97		rpcnne0 10585	. . . . . . . . . 10 |- ( 4 e. RR+ -> ( 4 e. CC /\ 4 =/= 0 ) )
98	96, 97	mp1i 12	. . . . . . . . 9 |- ( ph -> ( 4 e. CC /\ 4 =/= 0 ) )
99		divmuldiv 9670	. . . . . . . . 9 |- ( ( ( ( L x. E ) e. CC /\ ( ( log ` Z ) / ( log ` K ) ) e. CC ) /\ ( ( 8 e. CC /\ 8 =/= 0 ) /\ ( 4 e. CC /\ 4 =/= 0 ) ) ) -> ( ( ( L x. E ) / 8 ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) = ( ( ( L x. E ) x. ( ( log ` Z ) / ( log ` K ) ) ) / ( 8 x. 4 ) ) )
100	85, 91, 93, 98, 99	syl22anc 1185	. . . . . . . 8 |- ( ph -> ( ( ( L x. E ) / 8 ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) = ( ( ( L x. E ) x. ( ( log ` Z ) / ( log ` K ) ) ) / ( 8 x. 4 ) ) )
101	10	fveq2i 5690	. . . . . . . . . . . . . 14 |- ( log ` K ) = ( log ` ( exp ` ( B / E ) ) )
102	3, 16	rpdivcld 10621	. . . . . . . . . . . . . . . 16 |- ( ph -> ( B / E ) e. RR+ )
103	102	rpred 10604	. . . . . . . . . . . . . . 15 |- ( ph -> ( B / E ) e. RR )
104	103	relogefd 20476	. . . . . . . . . . . . . 14 |- ( ph -> ( log ` ( exp ` ( B / E ) ) ) = ( B / E ) )
105	101, 104	syl5eq 2448	. . . . . . . . . . . . 13 |- ( ph -> ( log ` K ) = ( B / E ) )
106	105	oveq2d 6056	. . . . . . . . . . . 12 |- ( ph -> ( ( log ` Z ) / ( log ` K ) ) = ( ( log ` Z ) / ( B / E ) ) )
107	39	rpcnd 10606	. . . . . . . . . . . . 13 |- ( ph -> ( log ` Z ) e. CC )
108	3	rpcnne0d 10613	. . . . . . . . . . . . 13 |- ( ph -> ( B e. CC /\ B =/= 0 ) )
109	16	rpcnne0d 10613	. . . . . . . . . . . . 13 |- ( ph -> ( E e. CC /\ E =/= 0 ) )
110		divdiv2 9682	. . . . . . . . . . . . 13 |- ( ( ( log ` Z ) e. CC /\ ( B e. CC /\ B =/= 0 ) /\ ( E e. CC /\ E =/= 0 ) ) -> ( ( log ` Z ) / ( B / E ) ) = ( ( ( log ` Z ) x. E ) / B ) )
111	107, 108, 109, 110	syl3anc 1184	. . . . . . . . . . . 12 |- ( ph -> ( ( log ` Z ) / ( B / E ) ) = ( ( ( log ` Z ) x. E ) / B ) )
112	106, 111	eqtrd 2436	. . . . . . . . . . 11 |- ( ph -> ( ( log ` Z ) / ( log ` K ) ) = ( ( ( log ` Z ) x. E ) / B ) )
113	112	oveq2d 6056	. . . . . . . . . 10 |- ( ph -> ( ( L x. E ) x. ( ( log ` Z ) / ( log ` K ) ) ) = ( ( L x. E ) x. ( ( ( log ` Z ) x. E ) / B ) ) )
114	16	rpcnd 10606	. . . . . . . . . . . 12 |- ( ph -> E e. CC )
115	107, 114	mulcld 9064	. . . . . . . . . . 11 |- ( ph -> ( ( log ` Z ) x. E ) e. CC )
116		divass 9652	. . . . . . . . . . 11 |- ( ( ( L x. E ) e. CC /\ ( ( log ` Z ) x. E ) e. CC /\ ( B e. CC /\ B =/= 0 ) ) -> ( ( ( L x. E ) x. ( ( log ` Z ) x. E ) ) / B ) = ( ( L x. E ) x. ( ( ( log ` Z ) x. E ) / B ) ) )
117	85, 115, 108, 116	syl3anc 1184	. . . . . . . . . 10 |- ( ph -> ( ( ( L x. E ) x. ( ( log ` Z ) x. E ) ) / B ) = ( ( L x. E ) x. ( ( ( log ` Z ) x. E ) / B ) ) )
118	15	rpcnd 10606	. . . . . . . . . . . . 13 |- ( ph -> L e. CC )
119	118, 114, 107, 114	mul4d 9234	. . . . . . . . . . . 12 |- ( ph -> ( ( L x. E ) x. ( ( log ` Z ) x. E ) ) = ( ( L x. ( log ` Z ) ) x. ( E x. E ) ) )
120	114	sqvald 11475	. . . . . . . . . . . . 13 |- ( ph -> ( E ^ 2 ) = ( E x. E ) )
121	120	oveq2d 6056	. . . . . . . . . . . 12 |- ( ph -> ( ( L x. ( log ` Z ) ) x. ( E ^ 2 ) ) = ( ( L x. ( log ` Z ) ) x. ( E x. E ) ) )
122	114	sqcld 11476	. . . . . . . . . . . . 13 |- ( ph -> ( E ^ 2 ) e. CC )
123	118, 107, 122	mul32d 9232	. . . . . . . . . . . 12 |- ( ph -> ( ( L x. ( log ` Z ) ) x. ( E ^ 2 ) ) = ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) )
124	119, 121, 123	3eqtr2d 2442	. . . . . . . . . . 11 |- ( ph -> ( ( L x. E ) x. ( ( log ` Z ) x. E ) ) = ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) )
125	124	oveq1d 6055	. . . . . . . . . 10 |- ( ph -> ( ( ( L x. E ) x. ( ( log ` Z ) x. E ) ) / B ) = ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / B ) )
126	113, 117, 125	3eqtr2d 2442	. . . . . . . . 9 |- ( ph -> ( ( L x. E ) x. ( ( log ` Z ) / ( log ` K ) ) ) = ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / B ) )
127		8t4e32 10428	. . . . . . . . . 10 |- ( 8 x. 4 ) = ; 3 2
128	127	a1i 11	. . . . . . . . 9 |- ( ph -> ( 8 x. 4 ) = ; 3 2 )
129	126, 128	oveq12d 6058	. . . . . . . 8 |- ( ph -> ( ( ( L x. E ) x. ( ( log ` Z ) / ( log ` K ) ) ) / ( 8 x. 4 ) ) = ( ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / B ) / ; 3 2 ) )
130	20	rpcnd 10606	. . . . . . . . . . 11 |- ( ph -> ( L x. ( E ^ 2 ) ) e. CC )
131	130, 107	mulcld 9064	. . . . . . . . . 10 |- ( ph -> ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) e. CC )
132		rpcnne0 10585	. . . . . . . . . . 11 |- (; 3 2 e. RR+ -> (; 3 2 e. CC /\ ; 3 2 =/= 0 ) )
133	25, 132	mp1i 12	. . . . . . . . . 10 |- ( ph -> (; 3 2 e. CC /\ ; 3 2 =/= 0 ) )
134		divdiv1 9681	. . . . . . . . . 10 |- ( ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) e. CC /\ ( B e. CC /\ B =/= 0 ) /\ (; 3 2 e. CC /\ ; 3 2 =/= 0 ) ) -> ( ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / B ) / ; 3 2 ) = ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / ( B x. ; 3 2 ) ) )
135	131, 108, 133, 134	syl3anc 1184	. . . . . . . . 9 |- ( ph -> ( ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / B ) / ; 3 2 ) = ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / ( B x. ; 3 2 ) ) )
136	23	nncni 9966	. . . . . . . . . . 11 |- ; 3 2 e. CC
137	3	rpcnd 10606	. . . . . . . . . . 11 |- ( ph -> B e. CC )
138		mulcom 9032	. . . . . . . . . . 11 |- ( (; 3 2 e. CC /\ B e. CC ) -> (; 3 2 x. B ) = ( B x. ; 3 2 ) )
139	136, 137, 138	sylancr 645	. . . . . . . . . 10 |- ( ph -> (; 3 2 x. B ) = ( B x. ; 3 2 ) )
140	139	oveq2d 6056	. . . . . . . . 9 |- ( ph -> ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / (; 3 2 x. B ) ) = ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / ( B x. ; 3 2 ) ) )
141	27	rpcnne0d 10613	. . . . . . . . . 10 |- ( ph -> ( (; 3 2 x. B ) e. CC /\ (; 3 2 x. B ) =/= 0 ) )
142		div23 9653	. . . . . . . . . 10 |- ( ( ( L x. ( E ^ 2 ) ) e. CC /\ ( log ` Z ) e. CC /\ ( (; 3 2 x. B ) e. CC /\ (; 3 2 x. B ) =/= 0 ) ) -> ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / (; 3 2 x. B ) ) = ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( log ` Z ) ) )
143	130, 107, 141, 142	syl3anc 1184	. . . . . . . . 9 |- ( ph -> ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / (; 3 2 x. B ) ) = ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( log ` Z ) ) )
144	135, 140, 143	3eqtr2d 2442	. . . . . . . 8 |- ( ph -> ( ( ( ( L x. ( E ^ 2 ) ) x. ( log ` Z ) ) / B ) / ; 3 2 ) = ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( log ` Z ) ) )
145	100, 129, 144	3eqtrd 2440	. . . . . . 7 |- ( ph -> ( ( ( L x. E ) / 8 ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) = ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( log ` Z ) ) )
146	145	oveq1d 6055	. . . . . 6 |- ( ph -> ( ( ( ( L x. E ) / 8 ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) x. ( log ` Z ) ) = ( ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( log ` Z ) ) x. ( log ` Z ) ) )
147	50	rpcnd 10606	. . . . . . 7 |- ( ph -> ( ( L x. E ) / 8 ) e. CC )
148	90	rpred 10604	. . . . . . . . 9 |- ( ph -> ( ( log ` Z ) / ( log ` K ) ) e. RR )
149		4nn 10091	. . . . . . . . 9 |- 4 e. NN
150		nndivre 9991	. . . . . . . . 9 |- ( ( ( ( log ` Z ) / ( log ` K ) ) e. RR /\ 4 e. NN ) -> ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) e. RR )
151	148, 149, 150	sylancl 644	. . . . . . . 8 |- ( ph -> ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) e. RR )
152	151	recnd 9070	. . . . . . 7 |- ( ph -> ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) e. CC )
153	147, 107, 152	mul32d 9232	. . . . . 6 |- ( ph -> ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) = ( ( ( ( L x. E ) / 8 ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) x. ( log ` Z ) ) )
154	107	sqvald 11475	. . . . . . . 8 |- ( ph -> ( ( log ` Z ) ^ 2 ) = ( ( log ` Z ) x. ( log ` Z ) ) )
155	154	oveq2d 6056	. . . . . . 7 |- ( ph -> ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) = ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) x. ( log ` Z ) ) ) )
156	28	rpcnd 10606	. . . . . . . 8 |- ( ph -> ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) e. CC )
157	156, 107, 107	mulassd 9067	. . . . . . 7 |- ( ph -> ( ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( log ` Z ) ) x. ( log ` Z ) ) = ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) x. ( log ` Z ) ) ) )
158	155, 157	eqtr4d 2439	. . . . . 6 |- ( ph -> ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) = ( ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( log ` Z ) ) x. ( log ` Z ) ) )
159	146, 153, 158	3eqtr4d 2446	. . . . 5 |- ( ph -> ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) = ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) )
160	56	simp3d 971	. . . . . 6 |- ( ph -> ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) <_ ( N - M ) )
161	151, 64, 51	lemul2d 10644	. . . . . 6 |- ( ph -> ( ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) <_ ( N - M ) <-> ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) <_ ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( N - M ) ) ) )
162	160, 161	mpbid 202	. . . . 5 |- ( ph -> ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( ( ( log ` Z ) / ( log ` K ) ) / 4 ) ) <_ ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( N - M ) ) )
163	159, 162	eqbrtrrd 4194	. . . 4 |- ( ph -> ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) <_ ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( N - M ) ) )
164	42	rpred 10604	. . . . 5 |- ( ph -> ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) e. RR )
165	51	rpred 10604	. . . . . 6 |- ( ph -> ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) e. RR )
166	165, 64	remulcld 9072	. . . . 5 |- ( ph -> ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( N - M ) ) e. RR )
167	164, 166, 13	lemul2d 10644	. . . 4 |- ( ph -> ( ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) <_ ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( N - M ) ) <-> ( ( U - E ) x. ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) ) <_ ( ( U - E ) x. ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( N - M ) ) ) ) )
168	163, 167	mpbid 202	. . 3 |- ( ph -> ( ( U - E ) x. ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) ) <_ ( ( U - E ) x. ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( N - M ) ) ) )
169	13	rpcnd 10606	. . . 4 |- ( ph -> ( U - E ) e. CC )
170	51	rpcnd 10606	. . . 4 |- ( ph -> ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) e. CC )
171	64	recnd 9070	. . . 4 |- ( ph -> ( N - M ) e. CC )
172	169, 170, 171	mulassd 9067	. . 3 |- ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( N - M ) ) = ( ( U - E ) x. ( ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) x. ( N - M ) ) ) )
173	168, 172	breqtrrd 4198	. 2 |- ( ph -> ( ( U - E ) x. ( ( ( L x. ( E ^ 2 ) ) / (; 3 2 x. B ) ) x. ( ( log ` Z ) ^ 2 ) ) ) <_ ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( N - M ) ) )
174		fzfid 11267	. . . 4 |- ( ph -> ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) e. Fin )
175	61	nnzd 10330	. . . . . . . . . . . 12 |- ( ph -> N e. ZZ )
176	86, 175	rpexpcld 11501	. . . . . . . . . . 11 |- ( ph -> ( K ^ N ) e. RR+ )
177	35, 176	rpdivcld 10621	. . . . . . . . . 10 |- ( ph -> ( Z / ( K ^ N ) ) e. RR+ )
178	177	rprege0d 10611	. . . . . . . . 9 |- ( ph -> ( ( Z / ( K ^ N ) ) e. RR /\ 0 <_ ( Z / ( K ^ N ) ) ) )
179		flge0nn0 11180	. . . . . . . . 9 |- ( ( ( Z / ( K ^ N ) ) e. RR /\ 0 <_ ( Z / ( K ^ N ) ) ) -> ( |_ ` ( Z / ( K ^ N ) ) ) e. NN0 )
180		nn0p1nn 10215	. . . . . . . . 9 |- ( ( |_ ` ( Z / ( K ^ N ) ) ) e. NN0 -> ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) e. NN )
181	178, 179, 180	3syl 19	. . . . . . . 8 |- ( ph -> ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) e. NN )
182	181, 59	syl6eleq 2494	. . . . . . 7 |- ( ph -> ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) e. ( ZZ>= ` 1 ) )
183		fzss1 11047	. . . . . . 7 |- ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) e. ( ZZ>= ` 1 ) -> ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( 1 ... ( |_ ` ( Z / Y ) ) ) )
184	182, 183	syl 16	. . . . . 6 |- ( ph -> ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( 1 ... ( |_ ` ( Z / Y ) ) ) )
185	184	sselda 3308	. . . . 5 |- ( ( ph /\ n e. ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) -> n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) )
186	185, 83	syldan 457	. . . 4 |- ( ( ph /\ n e. ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) -> ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
187	174, 186	fsumrecl 12483	. . 3 |- ( ph -> sum_ n e. ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
188		eluzfz2 11021	. . . . 5 |- ( N e. ( ZZ>= ` M ) -> N e. ( M ... N ) )
189	58, 188	syl 16	. . . 4 |- ( ph -> N e. ( M ... N ) )
190		oveq1 6047	. . . . . . . 8 |- ( m = M -> ( m - M ) = ( M - M ) )
191	190	oveq2d 6056	. . . . . . 7 |- ( m = M -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) = ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( M - M ) ) )
192		oveq2 6048	. . . . . . . . . . . 12 |- ( m = M -> ( K ^ m ) = ( K ^ M ) )
193	192	oveq2d 6056	. . . . . . . . . . 11 |- ( m = M -> ( Z / ( K ^ m ) ) = ( Z / ( K ^ M ) ) )
194	193	fveq2d 5691	. . . . . . . . . 10 |- ( m = M -> ( |_ ` ( Z / ( K ^ m ) ) ) = ( |_ ` ( Z / ( K ^ M ) ) ) )
195	194	oveq1d 6055	. . . . . . . . 9 |- ( m = M -> ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) = ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) )
196	195	oveq1d 6055	. . . . . . . 8 |- ( m = M -> ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) = ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) )
197	196	sumeq1d 12450	. . . . . . 7 |- ( m = M -> sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) = sum_ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
198	191, 197	breq12d 4185	. . . . . 6 |- ( m = M -> ( ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) <-> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( M - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) )
199	198	imbi2d 308	. . . . 5 |- ( m = M -> ( ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) <-> ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( M - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) ) )
200		oveq1 6047	. . . . . . . 8 |- ( m = j -> ( m - M ) = ( j - M ) )
201	200	oveq2d 6056	. . . . . . 7 |- ( m = j -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) = ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) )
202		oveq2 6048	. . . . . . . . . . . 12 |- ( m = j -> ( K ^ m ) = ( K ^ j ) )
203	202	oveq2d 6056	. . . . . . . . . . 11 |- ( m = j -> ( Z / ( K ^ m ) ) = ( Z / ( K ^ j ) ) )
204	203	fveq2d 5691	. . . . . . . . . 10 |- ( m = j -> ( |_ ` ( Z / ( K ^ m ) ) ) = ( |_ ` ( Z / ( K ^ j ) ) ) )
205	204	oveq1d 6055	. . . . . . . . 9 |- ( m = j -> ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) = ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) )
206	205	oveq1d 6055	. . . . . . . 8 |- ( m = j -> ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) = ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) )
207	206	sumeq1d 12450	. . . . . . 7 |- ( m = j -> sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) = sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
208	201, 207	breq12d 4185	. . . . . 6 |- ( m = j -> ( ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) <-> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) )
209	208	imbi2d 308	. . . . 5 |- ( m = j -> ( ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) <-> ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) ) )
210		oveq1 6047	. . . . . . . 8 |- ( m = ( j + 1 ) -> ( m - M ) = ( ( j + 1 ) - M ) )
211	210	oveq2d 6056	. . . . . . 7 |- ( m = ( j + 1 ) -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) = ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( ( j + 1 ) - M ) ) )
212		oveq2 6048	. . . . . . . . . . . 12 |- ( m = ( j + 1 ) -> ( K ^ m ) = ( K ^ ( j + 1 ) ) )
213	212	oveq2d 6056	. . . . . . . . . . 11 |- ( m = ( j + 1 ) -> ( Z / ( K ^ m ) ) = ( Z / ( K ^ ( j + 1 ) ) ) )
214	213	fveq2d 5691	. . . . . . . . . 10 |- ( m = ( j + 1 ) -> ( |_ ` ( Z / ( K ^ m ) ) ) = ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) )
215	214	oveq1d 6055	. . . . . . . . 9 |- ( m = ( j + 1 ) -> ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) = ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) )
216	215	oveq1d 6055	. . . . . . . 8 |- ( m = ( j + 1 ) -> ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) = ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) )
217	216	sumeq1d 12450	. . . . . . 7 |- ( m = ( j + 1 ) -> sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) = sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
218	211, 217	breq12d 4185	. . . . . 6 |- ( m = ( j + 1 ) -> ( ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) <-> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( ( j + 1 ) - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) )
219	218	imbi2d 308	. . . . 5 |- ( m = ( j + 1 ) -> ( ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) <-> ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( ( j + 1 ) - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) ) )
220		oveq1 6047	. . . . . . . 8 |- ( m = N -> ( m - M ) = ( N - M ) )
221	220	oveq2d 6056	. . . . . . 7 |- ( m = N -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) = ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( N - M ) ) )
222		oveq2 6048	. . . . . . . . . . . 12 |- ( m = N -> ( K ^ m ) = ( K ^ N ) )
223	222	oveq2d 6056	. . . . . . . . . . 11 |- ( m = N -> ( Z / ( K ^ m ) ) = ( Z / ( K ^ N ) ) )
224	223	fveq2d 5691	. . . . . . . . . 10 |- ( m = N -> ( |_ ` ( Z / ( K ^ m ) ) ) = ( |_ ` ( Z / ( K ^ N ) ) ) )
225	224	oveq1d 6055	. . . . . . . . 9 |- ( m = N -> ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) = ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) )
226	225	oveq1d 6055	. . . . . . . 8 |- ( m = N -> ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) = ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) )
227	226	sumeq1d 12450	. . . . . . 7 |- ( m = N -> sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) = sum_ n e. ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
228	221, 227	breq12d 4185	. . . . . 6 |- ( m = N -> ( ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) <-> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( N - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) )
229	228	imbi2d 308	. . . . 5 |- ( m = N -> ( ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( m - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ m ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) <-> ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( N - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ N ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) ) )
230	57	nncnd 9972	. . . . . . . . . 10 |- ( ph -> M e. CC )
231	230	subidd 9355	. . . . . . . . 9 |- ( ph -> ( M - M ) = 0 )
232	231	oveq2d 6056	. . . . . . . 8 |- ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( M - M ) ) = ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. 0 ) )
233	52	rpcnd 10606	. . . . . . . . 9 |- ( ph -> ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) e. CC )
234	233	mul01d 9221	. . . . . . . 8 |- ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. 0 ) = 0 )
235	232, 234	eqtrd 2436	. . . . . . 7 |- ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( M - M ) ) = 0 )
236		fzfid 11267	. . . . . . . 8 |- ( ph -> ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) e. Fin )
237	57	nnzd 10330	. . . . . . . . . . . . . . . 16 |- ( ph -> M e. ZZ )
238	86, 237	rpexpcld 11501	. . . . . . . . . . . . . . 15 |- ( ph -> ( K ^ M ) e. RR+ )
239	35, 238	rpdivcld 10621	. . . . . . . . . . . . . 14 |- ( ph -> ( Z / ( K ^ M ) ) e. RR+ )
240	239	rprege0d 10611	. . . . . . . . . . . . 13 |- ( ph -> ( ( Z / ( K ^ M ) ) e. RR /\ 0 <_ ( Z / ( K ^ M ) ) ) )
241		flge0nn0 11180	. . . . . . . . . . . . 13 |- ( ( ( Z / ( K ^ M ) ) e. RR /\ 0 <_ ( Z / ( K ^ M ) ) ) -> ( |_ ` ( Z / ( K ^ M ) ) ) e. NN0 )
242		nn0p1nn 10215	. . . . . . . . . . . . 13 |- ( ( |_ ` ( Z / ( K ^ M ) ) ) e. NN0 -> ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) e. NN )
243	240, 241, 242	3syl 19	. . . . . . . . . . . 12 |- ( ph -> ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) e. NN )
244	243, 59	syl6eleq 2494	. . . . . . . . . . 11 |- ( ph -> ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) e. ( ZZ>= ` 1 ) )
245		fzss1 11047	. . . . . . . . . . 11 |- ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) e. ( ZZ>= ` 1 ) -> ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( 1 ... ( |_ ` ( Z / Y ) ) ) )
246	244, 245	syl 16	. . . . . . . . . 10 |- ( ph -> ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( 1 ... ( |_ ` ( Z / Y ) ) ) )
247	246	sselda 3308	. . . . . . . . 9 |- ( ( ph /\ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) -> n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) )
248	247, 83	syldan 457	. . . . . . . 8 |- ( ( ph /\ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) -> ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
249		elfzle2 11017	. . . . . . . . . . . . 13 |- ( n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) -> n <_ ( |_ ` ( Z / Y ) ) )
250	249	adantl 453	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> n <_ ( |_ ` ( Z / Y ) ) )
251	29	simpld 446	. . . . . . . . . . . . . . 15 |- ( ph -> Y e. RR+ )
252	35, 251	rpdivcld 10621	. . . . . . . . . . . . . 14 |- ( ph -> ( Z / Y ) e. RR+ )
253	252	rpred 10604	. . . . . . . . . . . . 13 |- ( ph -> ( Z / Y ) e. RR )
254		elfzelz 11015	. . . . . . . . . . . . 13 |- ( n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) -> n e. ZZ )
255		flge 11169	. . . . . . . . . . . . 13 |- ( ( ( Z / Y ) e. RR /\ n e. ZZ ) -> ( n <_ ( Z / Y ) <-> n <_ ( |_ ` ( Z / Y ) ) ) )
256	253, 254, 255	syl2an 464	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( n <_ ( Z / Y ) <-> n <_ ( |_ ` ( Z / Y ) ) ) )
257	250, 256	mpbird 224	. . . . . . . . . . 11 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> n <_ ( Z / Y ) )
258	72, 257	jca 519	. . . . . . . . . 10 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( n e. NN /\ n <_ ( Z / Y ) ) )
259		pntlem1.U	. . . . . . . . . . 11 |- ( ph -> A. z e. ( Y [,) +oo ) ( abs ` ( ( R ` z ) / z ) ) <_ U )
260	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 29, 30, 31, 32, 33, 54, 55, 259	pntlemn 21247	. . . . . . . . . 10 |- ( ( ph /\ ( n e. NN /\ n <_ ( Z / Y ) ) ) -> 0 <_ ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
261	258, 260	syldan 457	. . . . . . . . 9 |- ( ( ph /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> 0 <_ ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
262	247, 261	syldan 457	. . . . . . . 8 |- ( ( ph /\ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) -> 0 <_ ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
263	236, 248, 262	fsumge0 12529	. . . . . . 7 |- ( ph -> 0 <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
264	235, 263	eqbrtrd 4192	. . . . . 6 |- ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( M - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
265	264	a1i 11	. . . . 5 |- ( N e. ( ZZ>= ` M ) -> ( ph -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( M - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ M ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) )
266		pntlem1.K	. . . . . . . . . 10 |- ( ph -> A. y e. ( X (,) +oo ) E. z e. RR+ ( ( y < z /\ ( ( 1 + ( L x. E ) ) x. z ) < ( K x. y ) ) /\ A. u e. ( z [,] ( ( 1 + ( L x. E ) ) x. z ) ) ( abs ` ( ( R ` u ) / u ) ) <_ E ) )
267		eqid 2404	. . . . . . . . . 10 |- ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) = ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) )
268	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 29, 30, 31, 32, 33, 54, 55, 259, 266, 267	pntlemi 21251	. . . . . . . . 9 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) )
269	52	adantr 452	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) e. RR+ )
270	269	rpred 10604	. . . . . . . . . 10 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) e. RR )
271		elfzoelz 11095	. . . . . . . . . . . . . 14 |- ( j e. ( M..^ N ) -> j e. ZZ )
272	271	adantl 453	. . . . . . . . . . . . 13 |- ( ( ph /\ j e. ( M..^ N ) ) -> j e. ZZ )
273	272	zred 10331	. . . . . . . . . . . 12 |- ( ( ph /\ j e. ( M..^ N ) ) -> j e. RR )
274	57	adantr 452	. . . . . . . . . . . . 13 |- ( ( ph /\ j e. ( M..^ N ) ) -> M e. NN )
275	274	nnred 9971	. . . . . . . . . . . 12 |- ( ( ph /\ j e. ( M..^ N ) ) -> M e. RR )
276	273, 275	resubcld 9421	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( j - M ) e. RR )
277	270, 276	remulcld 9072	. . . . . . . . . 10 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) e. RR )
278		fzfid 11267	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) e. Fin )
279		ssun1 3470	. . . . . . . . . . . . . . 15 |- ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) C_ ( ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) u. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) )
280	36	adantr 452	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ j e. ( M..^ N ) ) -> Z e. RR )
281	86	adantr 452	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> K e. RR+ )
282	272	peano2zd 10334	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( j + 1 ) e. ZZ )
283	281, 282	rpexpcld 11501	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( K ^ ( j + 1 ) ) e. RR+ )
284	280, 283	rerpdivcld 10631	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( Z / ( K ^ ( j + 1 ) ) ) e. RR )
285	281, 272	rpexpcld 11501	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( K ^ j ) e. RR+ )
286	280, 285	rerpdivcld 10631	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( Z / ( K ^ j ) ) e. RR )
287	87	adantr 452	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> K e. RR )
288		1re 9046	. . . . . . . . . . . . . . . . . . . . . . 23 |- 1 e. RR
289		ltle 9119	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( 1 e. RR /\ K e. RR ) -> ( 1 < K -> 1 <_ K ) )
290	288, 87, 289	sylancr 645	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ph -> ( 1 < K -> 1 <_ K ) )
291	88, 290	mpd 15	. . . . . . . . . . . . . . . . . . . . 21 |- ( ph -> 1 <_ K )
292	291	adantr 452	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> 1 <_ K )
293		uzid 10456	. . . . . . . . . . . . . . . . . . . . 21 |- ( j e. ZZ -> j e. ( ZZ>= ` j ) )
294		peano2uz 10486	. . . . . . . . . . . . . . . . . . . . 21 |- ( j e. ( ZZ>= ` j ) -> ( j + 1 ) e. ( ZZ>= ` j ) )
295	272, 293, 294	3syl 19	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( j + 1 ) e. ( ZZ>= ` j ) )
296	287, 292, 295	leexp2ad 11510	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( K ^ j ) <_ ( K ^ ( j + 1 ) ) )
297	35	adantr 452	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> Z e. RR+ )
298	285, 283, 297	lediv2d 10628	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( K ^ j ) <_ ( K ^ ( j + 1 ) ) <-> ( Z / ( K ^ ( j + 1 ) ) ) <_ ( Z / ( K ^ j ) ) ) )
299	296, 298	mpbid 202	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( Z / ( K ^ ( j + 1 ) ) ) <_ ( Z / ( K ^ j ) ) )
300		flword2 11175	. . . . . . . . . . . . . . . . . 18 |- ( ( ( Z / ( K ^ ( j + 1 ) ) ) e. RR /\ ( Z / ( K ^ j ) ) e. RR /\ ( Z / ( K ^ ( j + 1 ) ) ) <_ ( Z / ( K ^ j ) ) ) -> ( |_ ` ( Z / ( K ^ j ) ) ) e. ( ZZ>= ` ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) ) )
301	284, 286, 299, 300	syl3anc 1184	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( |_ ` ( Z / ( K ^ j ) ) ) e. ( ZZ>= ` ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) ) )
302		eluzp1p1 10467	. . . . . . . . . . . . . . . . 17 |- ( ( |_ ` ( Z / ( K ^ j ) ) ) e. ( ZZ>= ` ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) ) -> ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) e. ( ZZ>= ` ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ) )
303	301, 302	syl 16	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) e. ( ZZ>= ` ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ) )
304	286	flcld 11162	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( |_ ` ( Z / ( K ^ j ) ) ) e. ZZ )
305	252	adantr 452	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( Z / Y ) e. RR+ )
306	305	rpred 10604	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( Z / Y ) e. RR )
307	306	flcld 11162	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( |_ ` ( Z / Y ) ) e. ZZ )
308	251	adantr 452	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ph /\ j e. ( M..^ N ) ) -> Y e. RR+ )
309	308	rpred 10604	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> Y e. RR )
310	285	rpred 10604	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( K ^ j ) e. RR )
311	30	simpld 446	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ph -> X e. RR+ )
312	311	rpred 10604	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ph -> X e. RR )
313	312	adantr 452	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ph /\ j e. ( M..^ N ) ) -> X e. RR )
314	30	simprd 450	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ph -> Y < X )
315	314	adantr 452	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ph /\ j e. ( M..^ N ) ) -> Y < X )
316		elfzofz 11109	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( j e. ( M..^ N ) -> j e. ( M ... N ) )
317	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 29, 30, 31, 32, 33, 54, 55	pntlemh 21246	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ph /\ j e. ( M ... N ) ) -> ( X < ( K ^ j ) /\ ( K ^ j ) <_ ( sqr ` Z ) ) )
318	316, 317	sylan2 461	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( X < ( K ^ j ) /\ ( K ^ j ) <_ ( sqr ` Z ) ) )
319	318	simpld 446	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ph /\ j e. ( M..^ N ) ) -> X < ( K ^ j ) )
320	309, 313, 310, 315, 319	lttrd 9187	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ph /\ j e. ( M..^ N ) ) -> Y < ( K ^ j ) )
321	309, 310, 320	ltled 9177	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ j e. ( M..^ N ) ) -> Y <_ ( K ^ j ) )
322	308, 285, 297	lediv2d 10628	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( Y <_ ( K ^ j ) <-> ( Z / ( K ^ j ) ) <_ ( Z / Y ) ) )
323	321, 322	mpbid 202	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( Z / ( K ^ j ) ) <_ ( Z / Y ) )
324		flwordi 11174	. . . . . . . . . . . . . . . . . 18 |- ( ( ( Z / ( K ^ j ) ) e. RR /\ ( Z / Y ) e. RR /\ ( Z / ( K ^ j ) ) <_ ( Z / Y ) ) -> ( |_ ` ( Z / ( K ^ j ) ) ) <_ ( |_ ` ( Z / Y ) ) )
325	286, 306, 323, 324	syl3anc 1184	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( |_ ` ( Z / ( K ^ j ) ) ) <_ ( |_ ` ( Z / Y ) ) )
326		eluz2 10450	. . . . . . . . . . . . . . . . 17 |- ( ( |_ ` ( Z / Y ) ) e. ( ZZ>= ` ( |_ ` ( Z / ( K ^ j ) ) ) ) <-> ( ( |_ ` ( Z / ( K ^ j ) ) ) e. ZZ /\ ( |_ ` ( Z / Y ) ) e. ZZ /\ ( |_ ` ( Z / ( K ^ j ) ) ) <_ ( |_ ` ( Z / Y ) ) ) )
327	304, 307, 325, 326	syl3anbrc 1138	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( |_ ` ( Z / Y ) ) e. ( ZZ>= ` ( |_ ` ( Z / ( K ^ j ) ) ) ) )
328		fzsplit2 11032	. . . . . . . . . . . . . . . 16 |- ( ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) e. ( ZZ>= ` ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ) /\ ( |_ ` ( Z / Y ) ) e. ( ZZ>= ` ( |_ ` ( Z / ( K ^ j ) ) ) ) ) -> ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) = ( ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) u. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) )
329	303, 327, 328	syl2anc 643	. . . . . . . . . . . . . . 15 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) = ( ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) u. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) )
330	279, 329	syl5sseqr 3357	. . . . . . . . . . . . . 14 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) C_ ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) )
331	297, 283	rpdivcld 10621	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( Z / ( K ^ ( j + 1 ) ) ) e. RR+ )
332	331	rprege0d 10611	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( Z / ( K ^ ( j + 1 ) ) ) e. RR /\ 0 <_ ( Z / ( K ^ ( j + 1 ) ) ) ) )
333		flge0nn0 11180	. . . . . . . . . . . . . . . . 17 |- ( ( ( Z / ( K ^ ( j + 1 ) ) ) e. RR /\ 0 <_ ( Z / ( K ^ ( j + 1 ) ) ) ) -> ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) e. NN0 )
334		nn0p1nn 10215	. . . . . . . . . . . . . . . . 17 |- ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) e. NN0 -> ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) e. NN )
335	332, 333, 334	3syl 19	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) e. NN )
336	335, 59	syl6eleq 2494	. . . . . . . . . . . . . . 15 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) e. ( ZZ>= ` 1 ) )
337		fzss1 11047	. . . . . . . . . . . . . . 15 |- ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) e. ( ZZ>= ` 1 ) -> ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( 1 ... ( |_ ` ( Z / Y ) ) ) )
338	336, 337	syl 16	. . . . . . . . . . . . . 14 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( 1 ... ( |_ ` ( Z / Y ) ) ) )
339	330, 338	sstrd 3318	. . . . . . . . . . . . 13 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) C_ ( 1 ... ( |_ ` ( Z / Y ) ) ) )
340	339	sselda 3308	. . . . . . . . . . . 12 |- ( ( ( ph /\ j e. ( M..^ N ) ) /\ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ) -> n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) )
341	83	adantlr 696	. . . . . . . . . . . 12 |- ( ( ( ph /\ j e. ( M..^ N ) ) /\ n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) ) -> ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
342	340, 341	syldan 457	. . . . . . . . . . 11 |- ( ( ( ph /\ j e. ( M..^ N ) ) /\ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ) -> ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
343	278, 342	fsumrecl 12483	. . . . . . . . . 10 |- ( ( ph /\ j e. ( M..^ N ) ) -> sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
344		fzfid 11267	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) e. Fin )
345		ssun2 3471	. . . . . . . . . . . . . . 15 |- ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) u. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) )
346	345, 329	syl5sseqr 3357	. . . . . . . . . . . . . 14 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) )
347	346, 338	sstrd 3318	. . . . . . . . . . . . 13 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) C_ ( 1 ... ( |_ ` ( Z / Y ) ) ) )
348	347	sselda 3308	. . . . . . . . . . . 12 |- ( ( ( ph /\ j e. ( M..^ N ) ) /\ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) -> n e. ( 1 ... ( |_ ` ( Z / Y ) ) ) )
349	348, 341	syldan 457	. . . . . . . . . . 11 |- ( ( ( ph /\ j e. ( M..^ N ) ) /\ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ) -> ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
350	344, 349	fsumrecl 12483	. . . . . . . . . 10 |- ( ( ph /\ j e. ( M..^ N ) ) -> sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR )
351		le2add 9466	. . . . . . . . . 10 |- ( ( ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) e. RR /\ ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) e. RR ) /\ ( sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR /\ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) e. RR ) ) -> ( ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) /\ ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) + ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) ) <_ ( sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) + sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) ) )
352	270, 277, 343, 350, 351	syl22anc 1185	. . . . . . . . 9 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) /\ ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) + ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) ) <_ ( sum_ n e. ( ( ( |_ ` ( Z / ( K ^ ( j + 1 ) ) ) ) + 1 ) ... ( |_ ` ( Z / ( K ^ j ) ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) + sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) ) ) )
353	268, 352	mpand 657	. . . . . . . 8 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) <_ sum_ n e. ( ( ( |_ ` ( Z / ( K ^ j ) ) ) + 1 ) ... ( |_ ` ( Z / Y ) ) ) ( ( ( U / n ) - ( abs ` ( ( R ` ( Z / n ) ) / Z ) ) ) x. ( log ` n ) ) -> ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) + ( ( ( U - E ) x. ( ( ( L x. E ) / 8 ) x. ( log ` Z ) ) ) x. ( j - M ) ) ) <_ ( sum_ n e. ( ( (