Theorem ioodvbdlimc2lem 37905

Description: Limit at the upper bound of an open interval, for a function with bounded derivative. (Contributed by Glauco Siliprandi, 11-Dec-2019.) (Revised by AV, 3-Oct-2020.)

Hypotheses

Ref	Expression
ioodvbdlimc2lem.a	|- ( ph -> A e. RR )
ioodvbdlimc2lem.b	|- ( ph -> B e. RR )
ioodvbdlimc2lem.altb	|- ( ph -> A < B )
ioodvbdlimc2lem.f	|- ( ph -> F : ( A (,) B ) --> RR )
ioodvbdlimc2lem.dmdv	|- ( ph -> dom ( RR _D F ) = ( A (,) B ) )
ioodvbdlimc2lem.dvbd	|- ( ph -> E. y e. RR A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ y )
ioodvbdlimc2lem.y	|- Y = sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < )
ioodvbdlimc2lem.m	|- M = ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 )
ioodvbdlimc2lem.s	|- S = ( j e. ( ZZ>= ` M ) |-> ( F ` ( B - ( 1 / j ) ) ) )
ioodvbdlimc2lem.r	|- R = ( j e. ( ZZ>= ` M ) |-> ( B - ( 1 / j ) ) )
ioodvbdlimc2lem.n	|- N = if ( M <_ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , M )
ioodvbdlimc2lem.ch	|- ( ch <-> ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) )

Assertion

Ref	Expression
ioodvbdlimc2lem	|- ( ph -> ( limsup ` S ) e. ( F lim CC B ) )

Distinct variable groups:   A, j, x, z, y   B, j, x, z, y   j, F, x, z, y   j, M, x, y   j, N, z   R, j, x, y   x, S, j, y, z   x, Y   ph, x, j, z, y

Allowed substitution hints:   ch( x, y, z, j)   R( z)   M( z)   N( x, y)   Y( y, z, j)

Proof of Theorem ioodvbdlimc2lem

Dummy variables b k h i l w m c a are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		uzssz 11202	. . . . . 6 |- ( ZZ>= ` M ) C_ ZZ
2		zssre 10968	. . . . . 6 |- ZZ C_ RR
3	1, 2	sstri 3427	. . . . 5 |- ( ZZ>= ` M ) C_ RR
4	3	a1i 11	. . . 4 |- ( ph -> ( ZZ>= ` M ) C_ RR )
5		ioodvbdlimc2lem.m	. . . . . . 7 |- M = ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 )
6		ioodvbdlimc2lem.b	. . . . . . . . . . 11 |- ( ph -> B e. RR )
7		ioodvbdlimc2lem.a	. . . . . . . . . . 11 |- ( ph -> A e. RR )
8	6, 7	resubcld 10068	. . . . . . . . . 10 |- ( ph -> ( B - A ) e. RR )
9		ioodvbdlimc2lem.altb	. . . . . . . . . . . 12 |- ( ph -> A < B )
10	7, 6	posdifd 10221	. . . . . . . . . . . 12 |- ( ph -> ( A < B <-> 0 < ( B - A ) ) )
11	9, 10	mpbid 215	. . . . . . . . . . 11 |- ( ph -> 0 < ( B - A ) )
12	11	gt0ne0d 10199	. . . . . . . . . 10 |- ( ph -> ( B - A ) =/= 0 )
13	8, 12	rereccld 10456	. . . . . . . . 9 |- ( ph -> ( 1 / ( B - A ) ) e. RR )
14		0red 9662	. . . . . . . . . 10 |- ( ph -> 0 e. RR )
15	8, 11	recgt0d 10563	. . . . . . . . . 10 |- ( ph -> 0 < ( 1 / ( B - A ) ) )
16	14, 13, 15	ltled 9800	. . . . . . . . 9 |- ( ph -> 0 <_ ( 1 / ( B - A ) ) )
17		flge0nn0 12087	. . . . . . . . 9 |- ( ( ( 1 / ( B - A ) ) e. RR /\ 0 <_ ( 1 / ( B - A ) ) ) -> ( |_ ` ( 1 / ( B - A ) ) ) e. NN0 )
18	13, 16, 17	syl2anc 673	. . . . . . . 8 |- ( ph -> ( |_ ` ( 1 / ( B - A ) ) ) e. NN0 )
19		peano2nn0 10934	. . . . . . . 8 |- ( ( |_ ` ( 1 / ( B - A ) ) ) e. NN0 -> ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) e. NN0 )
20	18, 19	syl 17	. . . . . . 7 |- ( ph -> ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) e. NN0 )
21	5, 20	syl5eqel 2553	. . . . . 6 |- ( ph -> M e. NN0 )
22	21	nn0zd 11061	. . . . 5 |- ( ph -> M e. ZZ )
23		eqid 2471	. . . . . 6 |- ( ZZ>= ` M ) = ( ZZ>= ` M )
24	23	uzsup 12123	. . . . 5 |- ( M e. ZZ -> sup ( ( ZZ>= ` M ) , RR* , < ) = +oo )
25	22, 24	syl 17	. . . 4 |- ( ph -> sup ( ( ZZ>= ` M ) , RR* , < ) = +oo )
26		ioodvbdlimc2lem.f	. . . . . . 7 |- ( ph -> F : ( A (,) B ) --> RR )
27	26	adantr 472	. . . . . 6 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> F : ( A (,) B ) --> RR )
28	7	rexrd 9708	. . . . . . . 8 |- ( ph -> A e. RR* )
29	28	adantr 472	. . . . . . 7 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> A e. RR* )
30	6	rexrd 9708	. . . . . . . 8 |- ( ph -> B e. RR* )
31	30	adantr 472	. . . . . . 7 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> B e. RR* )
32	6	adantr 472	. . . . . . . 8 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> B e. RR )
33		eluzelre 11193	. . . . . . . . . 10 |- ( j e. ( ZZ>= ` M ) -> j e. RR )
34	33	adantl 473	. . . . . . . . 9 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> j e. RR )
35		0red 9662	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> 0 e. RR )
36		0red 9662	. . . . . . . . . . . . 13 |- ( j e. ( ZZ>= ` M ) -> 0 e. RR )
37		1red 9676	. . . . . . . . . . . . 13 |- ( j e. ( ZZ>= ` M ) -> 1 e. RR )
38	36, 37	readdcld 9688	. . . . . . . . . . . 12 |- ( j e. ( ZZ>= ` M ) -> ( 0 + 1 ) e. RR )
39	38	adantl 473	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( 0 + 1 ) e. RR )
40	36	ltp1d 10559	. . . . . . . . . . . 12 |- ( j e. ( ZZ>= ` M ) -> 0 < ( 0 + 1 ) )
41	40	adantl 473	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> 0 < ( 0 + 1 ) )
42		eluzel2 11187	. . . . . . . . . . . . . 14 |- ( j e. ( ZZ>= ` M ) -> M e. ZZ )
43	42	zred 11063	. . . . . . . . . . . . 13 |- ( j e. ( ZZ>= ` M ) -> M e. RR )
44	43	adantl 473	. . . . . . . . . . . 12 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> M e. RR )
45	13	flcld 12067	. . . . . . . . . . . . . . . 16 |- ( ph -> ( |_ ` ( 1 / ( B - A ) ) ) e. ZZ )
46	45	zred 11063	. . . . . . . . . . . . . . 15 |- ( ph -> ( |_ ` ( 1 / ( B - A ) ) ) e. RR )
47		1red 9676	. . . . . . . . . . . . . . 15 |- ( ph -> 1 e. RR )
48	18	nn0ge0d 10952	. . . . . . . . . . . . . . 15 |- ( ph -> 0 <_ ( |_ ` ( 1 / ( B - A ) ) ) )
49	14, 46, 47, 48	leadd1dd 10248	. . . . . . . . . . . . . 14 |- ( ph -> ( 0 + 1 ) <_ ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) )
50	49, 5	syl6breqr 4436	. . . . . . . . . . . . 13 |- ( ph -> ( 0 + 1 ) <_ M )
51	50	adantr 472	. . . . . . . . . . . 12 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( 0 + 1 ) <_ M )
52		eluzle 11195	. . . . . . . . . . . . 13 |- ( j e. ( ZZ>= ` M ) -> M <_ j )
53	52	adantl 473	. . . . . . . . . . . 12 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> M <_ j )
54	39, 44, 34, 51, 53	letrd 9809	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( 0 + 1 ) <_ j )
55	35, 39, 34, 41, 54	ltletrd 9812	. . . . . . . . . 10 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> 0 < j )
56	55	gt0ne0d 10199	. . . . . . . . 9 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> j =/= 0 )
57	34, 56	rereccld 10456	. . . . . . . 8 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( 1 / j ) e. RR )
58	32, 57	resubcld 10068	. . . . . . 7 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( B - ( 1 / j ) ) e. RR )
59	7	adantr 472	. . . . . . . 8 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> A e. RR )
60	21	nn0red 10950	. . . . . . . . . . 11 |- ( ph -> M e. RR )
61	14, 47	readdcld 9688	. . . . . . . . . . . . . 14 |- ( ph -> ( 0 + 1 ) e. RR )
62	46, 47	readdcld 9688	. . . . . . . . . . . . . 14 |- ( ph -> ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) e. RR )
63	14	ltp1d 10559	. . . . . . . . . . . . . 14 |- ( ph -> 0 < ( 0 + 1 ) )
64	14, 61, 62, 63, 49	ltletrd 9812	. . . . . . . . . . . . 13 |- ( ph -> 0 < ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) )
65	64, 5	syl6breqr 4436	. . . . . . . . . . . 12 |- ( ph -> 0 < M )
66	65	gt0ne0d 10199	. . . . . . . . . . 11 |- ( ph -> M =/= 0 )
67	60, 66	rereccld 10456	. . . . . . . . . 10 |- ( ph -> ( 1 / M ) e. RR )
68	67	adantr 472	. . . . . . . . 9 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( 1 / M ) e. RR )
69	32, 68	resubcld 10068	. . . . . . . 8 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( B - ( 1 / M ) ) e. RR )
70	5	eqcomi 2480	. . . . . . . . . . . . 13 |- ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) = M
71	70	oveq2i 6319	. . . . . . . . . . . 12 |- ( 1 / ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) = ( 1 / M )
72	71, 67	syl5eqel 2553	. . . . . . . . . . 11 |- ( ph -> ( 1 / ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) e. RR )
73	13, 15	elrpd 11361	. . . . . . . . . . . . 13 |- ( ph -> ( 1 / ( B - A ) ) e. RR+ )
74	62, 64	elrpd 11361	. . . . . . . . . . . . 13 |- ( ph -> ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) e. RR+ )
75		1rp 11329	. . . . . . . . . . . . . 14 |- 1 e. RR+
76	75	a1i 11	. . . . . . . . . . . . 13 |- ( ph -> 1 e. RR+ )
77		fllelt 12066	. . . . . . . . . . . . . . 15 |- ( ( 1 / ( B - A ) ) e. RR -> ( ( |_ ` ( 1 / ( B - A ) ) ) <_ ( 1 / ( B - A ) ) /\ ( 1 / ( B - A ) ) < ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) )
78	13, 77	syl 17	. . . . . . . . . . . . . 14 |- ( ph -> ( ( |_ ` ( 1 / ( B - A ) ) ) <_ ( 1 / ( B - A ) ) /\ ( 1 / ( B - A ) ) < ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) )
79	78	simprd 470	. . . . . . . . . . . . 13 |- ( ph -> ( 1 / ( B - A ) ) < ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) )
80	73, 74, 76, 79	ltdiv2dd 37597	. . . . . . . . . . . 12 |- ( ph -> ( 1 / ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) < ( 1 / ( 1 / ( B - A ) ) ) )
81	8	recnd 9687	. . . . . . . . . . . . 13 |- ( ph -> ( B - A ) e. CC )
82	81, 12	recrecd 10402	. . . . . . . . . . . 12 |- ( ph -> ( 1 / ( 1 / ( B - A ) ) ) = ( B - A ) )
83	80, 82	breqtrd 4420	. . . . . . . . . . 11 |- ( ph -> ( 1 / ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) < ( B - A ) )
84	72, 8, 6, 83	ltsub2dd 10247	. . . . . . . . . 10 |- ( ph -> ( B - ( B - A ) ) < ( B - ( 1 / ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) ) )
85	6	recnd 9687	. . . . . . . . . . 11 |- ( ph -> B e. CC )
86	7	recnd 9687	. . . . . . . . . . 11 |- ( ph -> A e. CC )
87	85, 86	nncand 10010	. . . . . . . . . 10 |- ( ph -> ( B - ( B - A ) ) = A )
88	71	oveq2i 6319	. . . . . . . . . . 11 |- ( B - ( 1 / ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) ) = ( B - ( 1 / M ) )
89	88	a1i 11	. . . . . . . . . 10 |- ( ph -> ( B - ( 1 / ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) ) ) = ( B - ( 1 / M ) ) )
90	84, 87, 89	3brtr3d 4425	. . . . . . . . 9 |- ( ph -> A < ( B - ( 1 / M ) ) )
91	90	adantr 472	. . . . . . . 8 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> A < ( B - ( 1 / M ) ) )
92	60, 65	elrpd 11361	. . . . . . . . . . 11 |- ( ph -> M e. RR+ )
93	92	adantr 472	. . . . . . . . . 10 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> M e. RR+ )
94	34, 55	elrpd 11361	. . . . . . . . . 10 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> j e. RR+ )
95		1red 9676	. . . . . . . . . 10 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> 1 e. RR )
96		0le1 10158	. . . . . . . . . . 11 |- 0 <_ 1
97	96	a1i 11	. . . . . . . . . 10 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> 0 <_ 1 )
98	93, 94, 95, 97, 53	lediv2ad 11386	. . . . . . . . 9 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( 1 / j ) <_ ( 1 / M ) )
99	57, 68, 32, 98	lesub2dd 10251	. . . . . . . 8 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( B - ( 1 / M ) ) <_ ( B - ( 1 / j ) ) )
100	59, 69, 58, 91, 99	ltletrd 9812	. . . . . . 7 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> A < ( B - ( 1 / j ) ) )
101	94	rpreccld 11374	. . . . . . . 8 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( 1 / j ) e. RR+ )
102	32, 101	ltsubrpd 11393	. . . . . . 7 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( B - ( 1 / j ) ) < B )
103	29, 31, 58, 100, 102	eliood 37691	. . . . . 6 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( B - ( 1 / j ) ) e. ( A (,) B ) )
104	27, 103	ffvelrnd 6038	. . . . 5 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( F ` ( B - ( 1 / j ) ) ) e. RR )
105		ioodvbdlimc2lem.s	. . . . 5 |- S = ( j e. ( ZZ>= ` M ) |-> ( F ` ( B - ( 1 / j ) ) ) )
106	104, 105	fmptd 6061	. . . 4 |- ( ph -> S : ( ZZ>= ` M ) --> RR )
107		ioodvbdlimc2lem.dmdv	. . . . . 6 |- ( ph -> dom ( RR _D F ) = ( A (,) B ) )
108		ioodvbdlimc2lem.dvbd	. . . . . 6 |- ( ph -> E. y e. RR A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ y )
109	7, 6, 9, 26, 107, 108	dvbdfbdioo 37899	. . . . 5 |- ( ph -> E. b e. RR A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b )
110	60	adantr 472	. . . . . . . 8 |- ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) -> M e. RR )
111		simpr 468	. . . . . . . . . . . . . 14 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> j e. ( ZZ>= ` M ) )
112	105	fvmpt2 5972	. . . . . . . . . . . . . 14 |- ( ( j e. ( ZZ>= ` M ) /\ ( F ` ( B - ( 1 / j ) ) ) e. RR ) -> ( S ` j ) = ( F ` ( B - ( 1 / j ) ) ) )
113	111, 104, 112	syl2anc 673	. . . . . . . . . . . . 13 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( S ` j ) = ( F ` ( B - ( 1 / j ) ) ) )
114	113	fveq2d 5883	. . . . . . . . . . . 12 |- ( ( ph /\ j e. ( ZZ>= ` M ) ) -> ( abs ` ( S ` j ) ) = ( abs ` ( F ` ( B - ( 1 / j ) ) ) ) )
115	114	adantlr 729	. . . . . . . . . . 11 |- ( ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) /\ j e. ( ZZ>= ` M ) ) -> ( abs ` ( S ` j ) ) = ( abs ` ( F ` ( B - ( 1 / j ) ) ) ) )
116		simplr 770	. . . . . . . . . . . 12 |- ( ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) /\ j e. ( ZZ>= ` M ) ) -> A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b )
117	103	adantlr 729	. . . . . . . . . . . 12 |- ( ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) /\ j e. ( ZZ>= ` M ) ) -> ( B - ( 1 / j ) ) e. ( A (,) B ) )
118		fveq2 5879	. . . . . . . . . . . . . . 15 |- ( x = ( B - ( 1 / j ) ) -> ( F ` x ) = ( F ` ( B - ( 1 / j ) ) ) )
119	118	fveq2d 5883	. . . . . . . . . . . . . 14 |- ( x = ( B - ( 1 / j ) ) -> ( abs ` ( F ` x ) ) = ( abs ` ( F ` ( B - ( 1 / j ) ) ) ) )
120	119	breq1d 4405	. . . . . . . . . . . . 13 |- ( x = ( B - ( 1 / j ) ) -> ( ( abs ` ( F ` x ) ) <_ b <-> ( abs ` ( F ` ( B - ( 1 / j ) ) ) ) <_ b ) )
121	120	rspccva 3135	. . . . . . . . . . . 12 |- ( ( A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b /\ ( B - ( 1 / j ) ) e. ( A (,) B ) ) -> ( abs ` ( F ` ( B - ( 1 / j ) ) ) ) <_ b )
122	116, 117, 121	syl2anc 673	. . . . . . . . . . 11 |- ( ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) /\ j e. ( ZZ>= ` M ) ) -> ( abs ` ( F ` ( B - ( 1 / j ) ) ) ) <_ b )
123	115, 122	eqbrtrd 4416	. . . . . . . . . 10 |- ( ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) /\ j e. ( ZZ>= ` M ) ) -> ( abs ` ( S ` j ) ) <_ b )
124	123	a1d 25	. . . . . . . . 9 |- ( ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) /\ j e. ( ZZ>= ` M ) ) -> ( M <_ j -> ( abs ` ( S ` j ) ) <_ b ) )
125	124	ralrimiva 2809	. . . . . . . 8 |- ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) -> A. j e. ( ZZ>= ` M ) ( M <_ j -> ( abs ` ( S ` j ) ) <_ b ) )
126		breq1 4398	. . . . . . . . . . 11 |- ( k = M -> ( k <_ j <-> M <_ j ) )
127	126	imbi1d 324	. . . . . . . . . 10 |- ( k = M -> ( ( k <_ j -> ( abs ` ( S ` j ) ) <_ b ) <-> ( M <_ j -> ( abs ` ( S ` j ) ) <_ b ) ) )
128	127	ralbidv 2829	. . . . . . . . 9 |- ( k = M -> ( A. j e. ( ZZ>= ` M ) ( k <_ j -> ( abs ` ( S ` j ) ) <_ b ) <-> A. j e. ( ZZ>= ` M ) ( M <_ j -> ( abs ` ( S ` j ) ) <_ b ) ) )
129	128	rspcev 3136	. . . . . . . 8 |- ( ( M e. RR /\ A. j e. ( ZZ>= ` M ) ( M <_ j -> ( abs ` ( S ` j ) ) <_ b ) ) -> E. k e. RR A. j e. ( ZZ>= ` M ) ( k <_ j -> ( abs ` ( S ` j ) ) <_ b ) )
130	110, 125, 129	syl2anc 673	. . . . . . 7 |- ( ( ph /\ A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b ) -> E. k e. RR A. j e. ( ZZ>= ` M ) ( k <_ j -> ( abs ` ( S ` j ) ) <_ b ) )
131	130	ex 441	. . . . . 6 |- ( ph -> ( A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b -> E. k e. RR A. j e. ( ZZ>= ` M ) ( k <_ j -> ( abs ` ( S ` j ) ) <_ b ) ) )
132	131	reximdv 2857	. . . . 5 |- ( ph -> ( E. b e. RR A. x e. ( A (,) B ) ( abs ` ( F ` x ) ) <_ b -> E. b e. RR E. k e. RR A. j e. ( ZZ>= ` M ) ( k <_ j -> ( abs ` ( S ` j ) ) <_ b ) ) )
133	109, 132	mpd 15	. . . 4 |- ( ph -> E. b e. RR E. k e. RR A. j e. ( ZZ>= ` M ) ( k <_ j -> ( abs ` ( S ` j ) ) <_ b ) )
134	4, 25, 106, 133	limsupre 37818	. . 3 |- ( ph -> ( limsup ` S ) e. RR )
135	134	recnd 9687	. 2 |- ( ph -> ( limsup ` S ) e. CC )
136		eluzelre 11193	. . . . . . . . 9 |- ( j e. ( ZZ>= ` N ) -> j e. RR )
137	136	adantl 473	. . . . . . . 8 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> j e. RR )
138		0red 9662	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> 0 e. RR )
139	45	peano2zd 11066	. . . . . . . . . . . . . 14 |- ( ph -> ( ( |_ ` ( 1 / ( B - A ) ) ) + 1 ) e. ZZ )
140	5, 139	syl5eqel 2553	. . . . . . . . . . . . 13 |- ( ph -> M e. ZZ )
141	140	adantr 472	. . . . . . . . . . . 12 |- ( ( ph /\ x e. RR+ ) -> M e. ZZ )
142	141	zred 11063	. . . . . . . . . . 11 |- ( ( ph /\ x e. RR+ ) -> M e. RR )
143	142	adantr 472	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> M e. RR )
144	65	ad2antrr 740	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> 0 < M )
145		ioodvbdlimc2lem.n	. . . . . . . . . . . . . 14 |- N = if ( M <_ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , M )
146		ioodvbdlimc2lem.y	. . . . . . . . . . . . . . . . . . . 20 |- Y = sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < )
147		ioomidp 37711	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( A e. RR /\ B e. RR /\ A < B ) -> ( ( A + B ) / 2 ) e. ( A (,) B ) )
148	7, 6, 9, 147	syl3anc 1292	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ph -> ( ( A + B ) / 2 ) e. ( A (,) B ) )
149		ne0i 3728	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( A + B ) / 2 ) e. ( A (,) B ) -> ( A (,) B ) =/= (/) )
150	148, 149	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ph -> ( A (,) B ) =/= (/) )
151		ioossre 11721	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( A (,) B ) C_ RR
152	151	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ph -> ( A (,) B ) C_ RR )
153		dvfre 22984	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( F : ( A (,) B ) --> RR /\ ( A (,) B ) C_ RR ) -> ( RR _D F ) : dom ( RR _D F ) --> RR )
154	26, 152, 153	syl2anc 673	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ph -> ( RR _D F ) : dom ( RR _D F ) --> RR )
155	107	feq2d 5725	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ph -> ( ( RR _D F ) : dom ( RR _D F ) --> RR <-> ( RR _D F ) : ( A (,) B ) --> RR ) )
156	154, 155	mpbid 215	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ph -> ( RR _D F ) : ( A (,) B ) --> RR )
157	156	ffvelrnda 6037	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ph /\ x e. ( A (,) B ) ) -> ( ( RR _D F ) ` x ) e. RR )
158	157	recnd 9687	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ph /\ x e. ( A (,) B ) ) -> ( ( RR _D F ) ` x ) e. CC )
159	158	abscld 13575	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ph /\ x e. ( A (,) B ) ) -> ( abs ` ( ( RR _D F ) ` x ) ) e. RR )
160		eqid 2471	. . . . . . . . . . . . . . . . . . . . . 22 |- ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) = ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) )
161		eqid 2471	. . . . . . . . . . . . . . . . . . . . . 22 |- sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) = sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < )
162	150, 159, 108, 160, 161	suprnmpt 37512	. . . . . . . . . . . . . . . . . . . . 21 |- ( ph -> ( sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) e. RR /\ A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) ) )
163	162	simpld 466	. . . . . . . . . . . . . . . . . . . 20 |- ( ph -> sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) e. RR )
164	146, 163	syl5eqel 2553	. . . . . . . . . . . . . . . . . . 19 |- ( ph -> Y e. RR )
165	164	adantr 472	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ x e. RR+ ) -> Y e. RR )
166		rpre 11331	. . . . . . . . . . . . . . . . . . . 20 |- ( x e. RR+ -> x e. RR )
167	166	rehalfcld 10882	. . . . . . . . . . . . . . . . . . 19 |- ( x e. RR+ -> ( x / 2 ) e. RR )
168	167	adantl 473	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ x e. RR+ ) -> ( x / 2 ) e. RR )
169	166	recnd 9687	. . . . . . . . . . . . . . . . . . . 20 |- ( x e. RR+ -> x e. CC )
170	169	adantl 473	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ x e. RR+ ) -> x e. CC )
171		2cnd 10704	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ x e. RR+ ) -> 2 e. CC )
172		rpne0 11340	. . . . . . . . . . . . . . . . . . . 20 |- ( x e. RR+ -> x =/= 0 )
173	172	adantl 473	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ x e. RR+ ) -> x =/= 0 )
174		2ne0 10724	. . . . . . . . . . . . . . . . . . . 20 |- 2 =/= 0
175	174	a1i 11	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ x e. RR+ ) -> 2 =/= 0 )
176	170, 171, 173, 175	divne0d 10421	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ x e. RR+ ) -> ( x / 2 ) =/= 0 )
177	165, 168, 176	redivcld 10457	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ x e. RR+ ) -> ( Y / ( x / 2 ) ) e. RR )
178	177	flcld 12067	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ x e. RR+ ) -> ( |_ ` ( Y / ( x / 2 ) ) ) e. ZZ )
179	178	peano2zd 11066	. . . . . . . . . . . . . . 15 |- ( ( ph /\ x e. RR+ ) -> ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) e. ZZ )
180	179, 141	ifcld 3915	. . . . . . . . . . . . . 14 |- ( ( ph /\ x e. RR+ ) -> if ( M <_ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , M ) e. ZZ )
181	145, 180	syl5eqel 2553	. . . . . . . . . . . . 13 |- ( ( ph /\ x e. RR+ ) -> N e. ZZ )
182	181	zred 11063	. . . . . . . . . . . 12 |- ( ( ph /\ x e. RR+ ) -> N e. RR )
183	182	adantr 472	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> N e. RR )
184	179	zred 11063	. . . . . . . . . . . . . 14 |- ( ( ph /\ x e. RR+ ) -> ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) e. RR )
185		max1 11503	. . . . . . . . . . . . . 14 |- ( ( M e. RR /\ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) e. RR ) -> M <_ if ( M <_ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , M ) )
186	142, 184, 185	syl2anc 673	. . . . . . . . . . . . 13 |- ( ( ph /\ x e. RR+ ) -> M <_ if ( M <_ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , M ) )
187	186, 145	syl6breqr 4436	. . . . . . . . . . . 12 |- ( ( ph /\ x e. RR+ ) -> M <_ N )
188	187	adantr 472	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> M <_ N )
189		eluzle 11195	. . . . . . . . . . . 12 |- ( j e. ( ZZ>= ` N ) -> N <_ j )
190	189	adantl 473	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> N <_ j )
191	143, 183, 137, 188, 190	letrd 9809	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> M <_ j )
192	138, 143, 137, 144, 191	ltletrd 9812	. . . . . . . . 9 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> 0 < j )
193	192	gt0ne0d 10199	. . . . . . . 8 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> j =/= 0 )
194	137, 193	rereccld 10456	. . . . . . 7 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> ( 1 / j ) e. RR )
195	137, 192	recgt0d 10563	. . . . . . 7 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> 0 < ( 1 / j ) )
196	194, 195	elrpd 11361	. . . . . 6 |- ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) -> ( 1 / j ) e. RR+ )
197	196	adantr 472	. . . . 5 |- ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) -> ( 1 / j ) e. RR+ )
198		ioodvbdlimc2lem.ch	. . . . . . . . 9 |- ( ch <-> ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) )
199	198	biimpi 199	. . . . . . . . . . . . . . . . 17 |- ( ch -> ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) )
200		simp-5l 786	. . . . . . . . . . . . . . . . 17 |- ( ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> ph )
201	199, 200	syl 17	. . . . . . . . . . . . . . . 16 |- ( ch -> ph )
202	201, 26	syl 17	. . . . . . . . . . . . . . 15 |- ( ch -> F : ( A (,) B ) --> RR )
203	199	simplrd 771	. . . . . . . . . . . . . . 15 |- ( ch -> z e. ( A (,) B ) )
204	202, 203	ffvelrnd 6038	. . . . . . . . . . . . . 14 |- ( ch -> ( F ` z ) e. RR )
205	204	recnd 9687	. . . . . . . . . . . . 13 |- ( ch -> ( F ` z ) e. CC )
206	201, 106	syl 17	. . . . . . . . . . . . . . 15 |- ( ch -> S : ( ZZ>= ` M ) --> RR )
207		simp-5r 787	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> x e. RR+ )
208	199, 207	syl 17	. . . . . . . . . . . . . . . . . 18 |- ( ch -> x e. RR+ )
209		eluz2 11188	. . . . . . . . . . . . . . . . . . 19 |- ( N e. ( ZZ>= ` M ) <-> ( M e. ZZ /\ N e. ZZ /\ M <_ N ) )
210	141, 181, 187, 209	syl3anbrc 1214	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ x e. RR+ ) -> N e. ( ZZ>= ` M ) )
211	201, 208, 210	syl2anc 673	. . . . . . . . . . . . . . . . 17 |- ( ch -> N e. ( ZZ>= ` M ) )
212		uzss 11203	. . . . . . . . . . . . . . . . 17 |- ( N e. ( ZZ>= ` M ) -> ( ZZ>= ` N ) C_ ( ZZ>= ` M ) )
213	211, 212	syl 17	. . . . . . . . . . . . . . . 16 |- ( ch -> ( ZZ>= ` N ) C_ ( ZZ>= ` M ) )
214		simp-4r 785	. . . . . . . . . . . . . . . . 17 |- ( ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> j e. ( ZZ>= ` N ) )
215	199, 214	syl 17	. . . . . . . . . . . . . . . 16 |- ( ch -> j e. ( ZZ>= ` N ) )
216	213, 215	sseldd 3419	. . . . . . . . . . . . . . 15 |- ( ch -> j e. ( ZZ>= ` M ) )
217	206, 216	ffvelrnd 6038	. . . . . . . . . . . . . 14 |- ( ch -> ( S ` j ) e. RR )
218	217	recnd 9687	. . . . . . . . . . . . 13 |- ( ch -> ( S ` j ) e. CC )
219	201, 135	syl 17	. . . . . . . . . . . . 13 |- ( ch -> ( limsup ` S ) e. CC )
220	205, 218, 219	npncand 10029	. . . . . . . . . . . 12 |- ( ch -> ( ( ( F ` z ) - ( S ` j ) ) + ( ( S ` j ) - ( limsup ` S ) ) ) = ( ( F ` z ) - ( limsup ` S ) ) )
221	220	eqcomd 2477	. . . . . . . . . . 11 |- ( ch -> ( ( F ` z ) - ( limsup ` S ) ) = ( ( ( F ` z ) - ( S ` j ) ) + ( ( S ` j ) - ( limsup ` S ) ) ) )
222	221	fveq2d 5883	. . . . . . . . . 10 |- ( ch -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) = ( abs ` ( ( ( F ` z ) - ( S ` j ) ) + ( ( S ` j ) - ( limsup ` S ) ) ) ) )
223	204, 217	resubcld 10068	. . . . . . . . . . . . . 14 |- ( ch -> ( ( F ` z ) - ( S ` j ) ) e. RR )
224	201, 134	syl 17	. . . . . . . . . . . . . . 15 |- ( ch -> ( limsup ` S ) e. RR )
225	217, 224	resubcld 10068	. . . . . . . . . . . . . 14 |- ( ch -> ( ( S ` j ) - ( limsup ` S ) ) e. RR )
226	223, 225	readdcld 9688	. . . . . . . . . . . . 13 |- ( ch -> ( ( ( F ` z ) - ( S ` j ) ) + ( ( S ` j ) - ( limsup ` S ) ) ) e. RR )
227	226	recnd 9687	. . . . . . . . . . . 12 |- ( ch -> ( ( ( F ` z ) - ( S ` j ) ) + ( ( S ` j ) - ( limsup ` S ) ) ) e. CC )
228	227	abscld 13575	. . . . . . . . . . 11 |- ( ch -> ( abs ` ( ( ( F ` z ) - ( S ` j ) ) + ( ( S ` j ) - ( limsup ` S ) ) ) ) e. RR )
229	223	recnd 9687	. . . . . . . . . . . . 13 |- ( ch -> ( ( F ` z ) - ( S ` j ) ) e. CC )
230	229	abscld 13575	. . . . . . . . . . . 12 |- ( ch -> ( abs ` ( ( F ` z ) - ( S ` j ) ) ) e. RR )
231	225	recnd 9687	. . . . . . . . . . . . 13 |- ( ch -> ( ( S ` j ) - ( limsup ` S ) ) e. CC )
232	231	abscld 13575	. . . . . . . . . . . 12 |- ( ch -> ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) e. RR )
233	230, 232	readdcld 9688	. . . . . . . . . . 11 |- ( ch -> ( ( abs ` ( ( F ` z ) - ( S ` j ) ) ) + ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) ) e. RR )
234	208	rpred 11364	. . . . . . . . . . 11 |- ( ch -> x e. RR )
235	229, 231	abstrid 13595	. . . . . . . . . . 11 |- ( ch -> ( abs ` ( ( ( F ` z ) - ( S ` j ) ) + ( ( S ` j ) - ( limsup ` S ) ) ) ) <_ ( ( abs ` ( ( F ` z ) - ( S ` j ) ) ) + ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) ) )
236	234	rehalfcld 10882	. . . . . . . . . . . . 13 |- ( ch -> ( x / 2 ) e. RR )
237	201, 216, 113	syl2anc 673	. . . . . . . . . . . . . . . 16 |- ( ch -> ( S ` j ) = ( F ` ( B - ( 1 / j ) ) ) )
238	237	oveq2d 6324	. . . . . . . . . . . . . . 15 |- ( ch -> ( ( F ` z ) - ( S ` j ) ) = ( ( F ` z ) - ( F ` ( B - ( 1 / j ) ) ) ) )
239	238	fveq2d 5883	. . . . . . . . . . . . . 14 |- ( ch -> ( abs ` ( ( F ` z ) - ( S ` j ) ) ) = ( abs ` ( ( F ` z ) - ( F ` ( B - ( 1 / j ) ) ) ) ) )
240	239, 230	eqeltrrd 2550	. . . . . . . . . . . . . . 15 |- ( ch -> ( abs ` ( ( F ` z ) - ( F ` ( B - ( 1 / j ) ) ) ) ) e. RR )
241	201, 164	syl 17	. . . . . . . . . . . . . . . 16 |- ( ch -> Y e. RR )
242	151, 203	sseldi 3416	. . . . . . . . . . . . . . . . 17 |- ( ch -> z e. RR )
243	201, 216, 58	syl2anc 673	. . . . . . . . . . . . . . . . 17 |- ( ch -> ( B - ( 1 / j ) ) e. RR )
244	242, 243	resubcld 10068	. . . . . . . . . . . . . . . 16 |- ( ch -> ( z - ( B - ( 1 / j ) ) ) e. RR )
245	241, 244	remulcld 9689	. . . . . . . . . . . . . . 15 |- ( ch -> ( Y x. ( z - ( B - ( 1 / j ) ) ) ) e. RR )
246	201, 7	syl 17	. . . . . . . . . . . . . . . . 17 |- ( ch -> A e. RR )
247	201, 6	syl 17	. . . . . . . . . . . . . . . . 17 |- ( ch -> B e. RR )
248	201, 107	syl 17	. . . . . . . . . . . . . . . . 17 |- ( ch -> dom ( RR _D F ) = ( A (,) B ) )
249	162	simprd 470	. . . . . . . . . . . . . . . . . . . 20 |- ( ph -> A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) )
250	146	breq2i 4403	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( abs ` ( ( RR _D F ) ` x ) ) <_ Y <-> ( abs ` ( ( RR _D F ) ` x ) ) <_ sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) )
251	250	ralbii 2823	. . . . . . . . . . . . . . . . . . . 20 |- ( A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ Y <-> A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) )
252	249, 251	sylibr 217	. . . . . . . . . . . . . . . . . . 19 |- ( ph -> A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ Y )
253	201, 252	syl 17	. . . . . . . . . . . . . . . . . 18 |- ( ch -> A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ Y )
254		fveq2 5879	. . . . . . . . . . . . . . . . . . . . 21 |- ( w = x -> ( ( RR _D F ) ` w ) = ( ( RR _D F ) ` x ) )
255	254	fveq2d 5883	. . . . . . . . . . . . . . . . . . . 20 |- ( w = x -> ( abs ` ( ( RR _D F ) ` w ) ) = ( abs ` ( ( RR _D F ) ` x ) ) )
256	255	breq1d 4405	. . . . . . . . . . . . . . . . . . 19 |- ( w = x -> ( ( abs ` ( ( RR _D F ) ` w ) ) <_ Y <-> ( abs ` ( ( RR _D F ) ` x ) ) <_ Y ) )
257	256	cbvralv 3005	. . . . . . . . . . . . . . . . . 18 |- ( A. w e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` w ) ) <_ Y <-> A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ Y )
258	253, 257	sylibr 217	. . . . . . . . . . . . . . . . 17 |- ( ch -> A. w e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` w ) ) <_ Y )
259	201, 216, 103	syl2anc 673	. . . . . . . . . . . . . . . . 17 |- ( ch -> ( B - ( 1 / j ) ) e. ( A (,) B ) )
260	243	rexrd 9708	. . . . . . . . . . . . . . . . . 18 |- ( ch -> ( B - ( 1 / j ) ) e. RR* )
261	201, 30	syl 17	. . . . . . . . . . . . . . . . . 18 |- ( ch -> B e. RR* )
262	3, 216	sseldi 3416	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> j e. RR )
263	201, 216, 56	syl2anc 673	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> j =/= 0 )
264	262, 263	rereccld 10456	. . . . . . . . . . . . . . . . . . 19 |- ( ch -> ( 1 / j ) e. RR )
265	247, 242	resubcld 10068	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> ( B - z ) e. RR )
266	242, 247	resubcld 10068	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> ( z - B ) e. RR )
267	266	recnd 9687	. . . . . . . . . . . . . . . . . . . . 21 |- ( ch -> ( z - B ) e. CC )
268	267	abscld 13575	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> ( abs ` ( z - B ) ) e. RR )
269	265	leabsd 13553	. . . . . . . . . . . . . . . . . . . . 21 |- ( ch -> ( B - z ) <_ ( abs ` ( B - z ) ) )
270	201, 85	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> B e. CC )
271	242	recnd 9687	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> z e. CC )
272	270, 271	abssubd 13592	. . . . . . . . . . . . . . . . . . . . 21 |- ( ch -> ( abs ` ( B - z ) ) = ( abs ` ( z - B ) ) )
273	269, 272	breqtrd 4420	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> ( B - z ) <_ ( abs ` ( z - B ) ) )
274	199	simprd 470	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> ( abs ` ( z - B ) ) < ( 1 / j ) )
275	265, 268, 264, 273, 274	lelttrd 9810	. . . . . . . . . . . . . . . . . . 19 |- ( ch -> ( B - z ) < ( 1 / j ) )
276	247, 242, 264, 275	ltsub23d 10239	. . . . . . . . . . . . . . . . . 18 |- ( ch -> ( B - ( 1 / j ) ) < z )
277	201, 28	syl 17	. . . . . . . . . . . . . . . . . . 19 |- ( ch -> A e. RR* )
278		iooltub 37706	. . . . . . . . . . . . . . . . . . 19 |- ( ( A e. RR* /\ B e. RR* /\ z e. ( A (,) B ) ) -> z < B )
279	277, 261, 203, 278	syl3anc 1292	. . . . . . . . . . . . . . . . . 18 |- ( ch -> z < B )
280	260, 261, 242, 276, 279	eliood 37691	. . . . . . . . . . . . . . . . 17 |- ( ch -> z e. ( ( B - ( 1 / j ) ) (,) B ) )
281	246, 247, 202, 248, 241, 258, 259, 280	dvbdfbdioolem1 37897	. . . . . . . . . . . . . . . 16 |- ( ch -> ( ( abs ` ( ( F ` z ) - ( F ` ( B - ( 1 / j ) ) ) ) ) <_ ( Y x. ( z - ( B - ( 1 / j ) ) ) ) /\ ( abs ` ( ( F ` z ) - ( F ` ( B - ( 1 / j ) ) ) ) ) <_ ( Y x. ( B - A ) ) ) )
282	281	simpld 466	. . . . . . . . . . . . . . 15 |- ( ch -> ( abs ` ( ( F ` z ) - ( F ` ( B - ( 1 / j ) ) ) ) ) <_ ( Y x. ( z - ( B - ( 1 / j ) ) ) ) )
283	201, 216, 57	syl2anc 673	. . . . . . . . . . . . . . . . 17 |- ( ch -> ( 1 / j ) e. RR )
284	241, 283	remulcld 9689	. . . . . . . . . . . . . . . 16 |- ( ch -> ( Y x. ( 1 / j ) ) e. RR )
285	156, 148	ffvelrnd 6038	. . . . . . . . . . . . . . . . . . . . 21 |- ( ph -> ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) e. RR )
286	285	recnd 9687	. . . . . . . . . . . . . . . . . . . 20 |- ( ph -> ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) e. CC )
287	286	abscld 13575	. . . . . . . . . . . . . . . . . . 19 |- ( ph -> ( abs ` ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) ) e. RR )
288	286	absge0d 13583	. . . . . . . . . . . . . . . . . . 19 |- ( ph -> 0 <_ ( abs ` ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) ) )
289		fveq2 5879	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( x = ( ( A + B ) / 2 ) -> ( ( RR _D F ) ` x ) = ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) )
290	289	fveq2d 5883	. . . . . . . . . . . . . . . . . . . . . 22 |- ( x = ( ( A + B ) / 2 ) -> ( abs ` ( ( RR _D F ) ` x ) ) = ( abs ` ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) ) )
291	146	eqcomi 2480	. . . . . . . . . . . . . . . . . . . . . . 23 |- sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) = Y
292	291	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 |- ( x = ( ( A + B ) / 2 ) -> sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) = Y )
293	290, 292	breq12d 4408	. . . . . . . . . . . . . . . . . . . . 21 |- ( x = ( ( A + B ) / 2 ) -> ( ( abs ` ( ( RR _D F ) ` x ) ) <_ sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) <-> ( abs ` ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) ) <_ Y ) )
294	293	rspcva 3134	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ( A + B ) / 2 ) e. ( A (,) B ) /\ A. x e. ( A (,) B ) ( abs ` ( ( RR _D F ) ` x ) ) <_ sup ( ran ( x e. ( A (,) B ) |-> ( abs ` ( ( RR _D F ) ` x ) ) ) , RR , < ) ) -> ( abs ` ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) ) <_ Y )
295	148, 249, 294	syl2anc 673	. . . . . . . . . . . . . . . . . . 19 |- ( ph -> ( abs ` ( ( RR _D F ) ` ( ( A + B ) / 2 ) ) ) <_ Y )
296	14, 287, 164, 288, 295	letrd 9809	. . . . . . . . . . . . . . . . . 18 |- ( ph -> 0 <_ Y )
297	201, 296	syl 17	. . . . . . . . . . . . . . . . 17 |- ( ch -> 0 <_ Y )
298	283	recnd 9687	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> ( 1 / j ) e. CC )
299		sub31 37593	. . . . . . . . . . . . . . . . . . . 20 |- ( ( z e. CC /\ B e. CC /\ ( 1 / j ) e. CC ) -> ( z - ( B - ( 1 / j ) ) ) = ( ( 1 / j ) - ( B - z ) ) )
300	271, 270, 298, 299	syl3anc 1292	. . . . . . . . . . . . . . . . . . 19 |- ( ch -> ( z - ( B - ( 1 / j ) ) ) = ( ( 1 / j ) - ( B - z ) ) )
301	242, 247	posdifd 10221	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> ( z < B <-> 0 < ( B - z ) ) )
302	279, 301	mpbid 215	. . . . . . . . . . . . . . . . . . . . 21 |- ( ch -> 0 < ( B - z ) )
303	265, 302	elrpd 11361	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> ( B - z ) e. RR+ )
304	283, 303	ltsubrpd 11393	. . . . . . . . . . . . . . . . . . 19 |- ( ch -> ( ( 1 / j ) - ( B - z ) ) < ( 1 / j ) )
305	300, 304	eqbrtrd 4416	. . . . . . . . . . . . . . . . . 18 |- ( ch -> ( z - ( B - ( 1 / j ) ) ) < ( 1 / j ) )
306	244, 283, 305	ltled 9800	. . . . . . . . . . . . . . . . 17 |- ( ch -> ( z - ( B - ( 1 / j ) ) ) <_ ( 1 / j ) )
307	244, 283, 241, 297, 306	lemul2ad 10569	. . . . . . . . . . . . . . . 16 |- ( ch -> ( Y x. ( z - ( B - ( 1 / j ) ) ) ) <_ ( Y x. ( 1 / j ) ) )
308	284	adantr 472	. . . . . . . . . . . . . . . . . 18 |- ( ( ch /\ Y = 0 ) -> ( Y x. ( 1 / j ) ) e. RR )
309	236	adantr 472	. . . . . . . . . . . . . . . . . 18 |- ( ( ch /\ Y = 0 ) -> ( x / 2 ) e. RR )
310		oveq1 6315	. . . . . . . . . . . . . . . . . . . 20 |- ( Y = 0 -> ( Y x. ( 1 / j ) ) = ( 0 x. ( 1 / j ) ) )
311	298	mul02d 9849	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> ( 0 x. ( 1 / j ) ) = 0 )
312	310, 311	sylan9eqr 2527	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ Y = 0 ) -> ( Y x. ( 1 / j ) ) = 0 )
313	208	rphalfcld 11376	. . . . . . . . . . . . . . . . . . . . 21 |- ( ch -> ( x / 2 ) e. RR+ )
314	313	rpgt0d 11367	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> 0 < ( x / 2 ) )
315	314	adantr 472	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ Y = 0 ) -> 0 < ( x / 2 ) )
316	312, 315	eqbrtrd 4416	. . . . . . . . . . . . . . . . . 18 |- ( ( ch /\ Y = 0 ) -> ( Y x. ( 1 / j ) ) < ( x / 2 ) )
317	308, 309, 316	ltled 9800	. . . . . . . . . . . . . . . . 17 |- ( ( ch /\ Y = 0 ) -> ( Y x. ( 1 / j ) ) <_ ( x / 2 ) )
318	241	adantr 472	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ -. Y = 0 ) -> Y e. RR )
319	297	adantr 472	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ -. Y = 0 ) -> 0 <_ Y )
320		neqne 2651	. . . . . . . . . . . . . . . . . . . 20 |- ( -. Y = 0 -> Y =/= 0 )
321	320	adantl 473	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ -. Y = 0 ) -> Y =/= 0 )
322	318, 319, 321	ne0gt0d 9789	. . . . . . . . . . . . . . . . . 18 |- ( ( ch /\ -. Y = 0 ) -> 0 < Y )
323	284	adantr 472	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ 0 < Y ) -> ( Y x. ( 1 / j ) ) e. RR )
324	3, 211	sseldi 3416	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> N e. RR )
325		0red 9662	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ch -> 0 e. RR )
326	201, 208, 142	syl2anc 673	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ch -> M e. RR )
327	201, 65	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ch -> 0 < M )
328	201, 208, 187	syl2anc 673	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ch -> M <_ N )
329	325, 326, 324, 327, 328	ltletrd 9812	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ch -> 0 < N )
330	329	gt0ne0d 10199	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> N =/= 0 )
331	324, 330	rereccld 10456	. . . . . . . . . . . . . . . . . . . . 21 |- ( ch -> ( 1 / N ) e. RR )
332	241, 331	remulcld 9689	. . . . . . . . . . . . . . . . . . . 20 |- ( ch -> ( Y x. ( 1 / N ) ) e. RR )
333	332	adantr 472	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ 0 < Y ) -> ( Y x. ( 1 / N ) ) e. RR )
334	236	adantr 472	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ 0 < Y ) -> ( x / 2 ) e. RR )
335	283	adantr 472	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ch /\ 0 < Y ) -> ( 1 / j ) e. RR )
336	331	adantr 472	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ch /\ 0 < Y ) -> ( 1 / N ) e. RR )
337	241	adantr 472	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ch /\ 0 < Y ) -> Y e. RR )
338	297	adantr 472	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ch /\ 0 < Y ) -> 0 <_ Y )
339	324, 329	elrpd 11361	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> N e. RR+ )
340	201, 216, 94	syl2anc 673	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> j e. RR+ )
341		1red 9676	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> 1 e. RR )
342	96	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> 0 <_ 1 )
343	215, 189	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ch -> N <_ j )
344	339, 340, 341, 342, 343	lediv2ad 11386	. . . . . . . . . . . . . . . . . . . . 21 |- ( ch -> ( 1 / j ) <_ ( 1 / N ) )
345	344	adantr 472	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ch /\ 0 < Y ) -> ( 1 / j ) <_ ( 1 / N ) )
346	335, 336, 337, 338, 345	lemul2ad 10569	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ 0 < Y ) -> ( Y x. ( 1 / j ) ) <_ ( Y x. ( 1 / N ) ) )
347	234	recnd 9687	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ch -> x e. CC )
348		2cnd 10704	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ch -> 2 e. CC )
349	208	rpne0d 11369	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ch -> x =/= 0 )
350	174	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ch -> 2 =/= 0 )
351	347, 348, 349, 350	divne0d 10421	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ch -> ( x / 2 ) =/= 0 )
352	241, 236, 351	redivcld 10457	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ch -> ( Y / ( x / 2 ) ) e. RR )
353	352	adantr 472	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ch /\ 0 < Y ) -> ( Y / ( x / 2 ) ) e. RR )
354		simpr 468	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ch /\ 0 < Y ) -> 0 < Y )
355	314	adantr 472	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ch /\ 0 < Y ) -> 0 < ( x / 2 ) )
356	337, 334, 354, 355	divgt0d 10564	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ch /\ 0 < Y ) -> 0 < ( Y / ( x / 2 ) ) )
357	353, 356	elrpd 11361	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> ( Y / ( x / 2 ) ) e. RR+ )
358	357	rprecred 11375	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ch /\ 0 < Y ) -> ( 1 / ( Y / ( x / 2 ) ) ) e. RR )
359	339	adantr 472	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> N e. RR+ )
360		1red 9676	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> 1 e. RR )
361	96	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> 0 <_ 1 )
362	352	flcld 12067	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ch -> ( |_ ` ( Y / ( x / 2 ) ) ) e. ZZ )
363	362	peano2zd 11066	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ch -> ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) e. ZZ )
364	363	zred 11063	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ch -> ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) e. RR )
365	201, 140	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ch -> M e. ZZ )
366	363, 365	ifcld 3915	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ch -> if ( M <_ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , M ) e. ZZ )
367	145, 366	syl5eqel 2553	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ch -> N e. ZZ )
368	367	zred 11063	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ch -> N e. RR )
369		flltp1 12069	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( Y / ( x / 2 ) ) e. RR -> ( Y / ( x / 2 ) ) < ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) )
370	352, 369	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ch -> ( Y / ( x / 2 ) ) < ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) )
371	201, 60	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ch -> M e. RR )
372		max2 11505	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( M e. RR /\ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) e. RR ) -> ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) <_ if ( M <_ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , M ) )
373	371, 364, 372	syl2anc 673	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ch -> ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) <_ if ( M <_ ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) , M ) )
374	373, 145	syl6breqr 4436	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ch -> ( ( |_ ` ( Y / ( x / 2 ) ) ) + 1 ) <_ N )
375	352, 364, 368, 370, 374	ltletrd 9812	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ch -> ( Y / ( x / 2 ) ) < N )
376	352, 324, 375	ltled 9800	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ch -> ( Y / ( x / 2 ) ) <_ N )
377	376	adantr 472	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> ( Y / ( x / 2 ) ) <_ N )
378	357, 359, 360, 361, 377	lediv2ad 11386	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ch /\ 0 < Y ) -> ( 1 / N ) <_ ( 1 / ( Y / ( x / 2 ) ) ) )
379	336, 358, 337, 338, 378	lemul2ad 10569	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ch /\ 0 < Y ) -> ( Y x. ( 1 / N ) ) <_ ( Y x. ( 1 / ( Y / ( x / 2 ) ) ) ) )
380	337	recnd 9687	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> Y e. CC )
381	353	recnd 9687	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> ( Y / ( x / 2 ) ) e. CC )
382	356	gt0ne0d 10199	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> ( Y / ( x / 2 ) ) =/= 0 )
383	380, 381, 382	divrecd 10408	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ch /\ 0 < Y ) -> ( Y / ( Y / ( x / 2 ) ) ) = ( Y x. ( 1 / ( Y / ( x / 2 ) ) ) ) )
384	334	recnd 9687	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> ( x / 2 ) e. CC )
385	354	gt0ne0d 10199	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> Y =/= 0 )
386	351	adantr 472	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ch /\ 0 < Y ) -> ( x / 2 ) =/= 0 )
387	380, 384, 385, 386	ddcand 10425	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ch /\ 0 < Y ) -> ( Y / ( Y / ( x / 2 ) ) ) = ( x / 2 ) )
388	383, 387	eqtr3d 2507	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ch /\ 0 < Y ) -> ( Y x. ( 1 / ( Y / ( x / 2 ) ) ) ) = ( x / 2 ) )
389	379, 388	breqtrd 4420	. . . . . . . . . . . . . . . . . . 19 |- ( ( ch /\ 0 < Y ) -> ( Y x. ( 1 / N ) ) <_ ( x / 2 ) )
390	323, 333, 334, 346, 389	letrd 9809	. . . . . . . . . . . . . . . . . 18 |- ( ( ch /\ 0 < Y ) -> ( Y x. ( 1 / j ) ) <_ ( x / 2 ) )
391	322, 390	syldan 478	. . . . . . . . . . . . . . . . 17 |- ( ( ch /\ -. Y = 0 ) -> ( Y x. ( 1 / j ) ) <_ ( x / 2 ) )
392	317, 391	pm2.61dan 808	. . . . . . . . . . . . . . . 16 |- ( ch -> ( Y x. ( 1 / j ) ) <_ ( x / 2 ) )
393	245, 284, 236, 307, 392	letrd 9809	. . . . . . . . . . . . . . 15 |- ( ch -> ( Y x. ( z - ( B - ( 1 / j ) ) ) ) <_ ( x / 2 ) )
394	240, 245, 236, 282, 393	letrd 9809	. . . . . . . . . . . . . 14 |- ( ch -> ( abs ` ( ( F ` z ) - ( F ` ( B - ( 1 / j ) ) ) ) ) <_ ( x / 2 ) )
395	239, 394	eqbrtrd 4416	. . . . . . . . . . . . 13 |- ( ch -> ( abs ` ( ( F ` z ) - ( S ` j ) ) ) <_ ( x / 2 ) )
396		simpllr 777	. . . . . . . . . . . . . 14 |- ( ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) )
397	199, 396	syl 17	. . . . . . . . . . . . 13 |- ( ch -> ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) )
398	230, 232, 236, 236, 395, 397	leltaddd 10256	. . . . . . . . . . . 12 |- ( ch -> ( ( abs ` ( ( F ` z ) - ( S ` j ) ) ) + ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) ) < ( ( x / 2 ) + ( x / 2 ) ) )
399	347	2halvesd 10881	. . . . . . . . . . . 12 |- ( ch -> ( ( x / 2 ) + ( x / 2 ) ) = x )
400	398, 399	breqtrd 4420	. . . . . . . . . . 11 |- ( ch -> ( ( abs ` ( ( F ` z ) - ( S ` j ) ) ) + ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) ) < x )
401	228, 233, 234, 235, 400	lelttrd 9810	. . . . . . . . . 10 |- ( ch -> ( abs ` ( ( ( F ` z ) - ( S ` j ) ) + ( ( S ` j ) - ( limsup ` S ) ) ) ) < x )
402	222, 401	eqbrtrd 4416	. . . . . . . . 9 |- ( ch -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x )
403	198, 402	sylbir 218	. . . . . . . 8 |- ( ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x )
404	403	adantrl 730	. . . . . . 7 |- ( ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) /\ ( z =/= B /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x )
405	404	ex 441	. . . . . 6 |- ( ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ z e. ( A (,) B ) ) -> ( ( z =/= B /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) )
406	405	ralrimiva 2809	. . . . 5 |- ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) -> A. z e. ( A (,) B ) ( ( z =/= B /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) )
407		breq2 4399	. . . . . . . . 9 |- ( y = ( 1 / j ) -> ( ( abs ` ( z - B ) ) < y <-> ( abs ` ( z - B ) ) < ( 1 / j ) ) )
408	407	anbi2d 718	. . . . . . . 8 |- ( y = ( 1 / j ) -> ( ( z =/= B /\ ( abs ` ( z - B ) ) < y ) <-> ( z =/= B /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) ) )
409	408	imbi1d 324	. . . . . . 7 |- ( y = ( 1 / j ) -> ( ( ( z =/= B /\ ( abs ` ( z - B ) ) < y ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) <-> ( ( z =/= B /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) ) )
410	409	ralbidv 2829	. . . . . 6 |- ( y = ( 1 / j ) -> ( A. z e. ( A (,) B ) ( ( z =/= B /\ ( abs ` ( z - B ) ) < y ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) <-> A. z e. ( A (,) B ) ( ( z =/= B /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) ) )
411	410	rspcev 3136	. . . . 5 |- ( ( ( 1 / j ) e. RR+ /\ A. z e. ( A (,) B ) ( ( z =/= B /\ ( abs ` ( z - B ) ) < ( 1 / j ) ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) ) -> E. y e. RR+ A. z e. ( A (,) B ) ( ( z =/= B /\ ( abs ` ( z - B ) ) < y ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) )
412	197, 406, 411	syl2anc 673	. . . 4 |- ( ( ( ( ph /\ x e. RR+ ) /\ j e. ( ZZ>= ` N ) ) /\ ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) ) -> E. y e. RR+ A. z e. ( A (,) B ) ( ( z =/= B /\ ( abs ` ( z - B ) ) < y ) -> ( abs ` ( ( F ` z ) - ( limsup ` S ) ) ) < x ) )
413		simpr 468	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ b <_ N ) -> b <_ N )
414	413	iftrued 3880	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ b <_ N ) -> if ( b <_ N , N , b ) = N )
415		uzid 11197	. . . . . . . . . . . 12 |- ( N e. ZZ -> N e. ( ZZ>= ` N ) )
416	181, 415	syl 17	. . . . . . . . . . 11 |- ( ( ph /\ x e. RR+ ) -> N e. ( ZZ>= ` N ) )
417	416	adantr 472	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ b <_ N ) -> N e. ( ZZ>= ` N ) )
418	414, 417	eqeltrd 2549	. . . . . . . . 9 |- ( ( ( ph /\ x e. RR+ ) /\ b <_ N ) -> if ( b <_ N , N , b ) e. ( ZZ>= ` N ) )
419	418	adantlr 729	. . . . . . . 8 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ b <_ N ) -> if ( b <_ N , N , b ) e. ( ZZ>= ` N ) )
420		iffalse 3881	. . . . . . . . . 10 |- ( -. b <_ N -> if ( b <_ N , N , b ) = b )
421	420	adantl 473	. . . . . . . . 9 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> if ( b <_ N , N , b ) = b )
422	181	ad2antrr 740	. . . . . . . . . 10 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> N e. ZZ )
423		simplr 770	. . . . . . . . . 10 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> b e. ZZ )
424	422	zred 11063	. . . . . . . . . . 11 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> N e. RR )
425	423	zred 11063	. . . . . . . . . . 11 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> b e. RR )
426		simpr 468	. . . . . . . . . . . 12 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> -. b <_ N )
427	424, 425	ltnled 9799	. . . . . . . . . . . 12 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> ( N < b <-> -. b <_ N ) )
428	426, 427	mpbird 240	. . . . . . . . . . 11 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> N < b )
429	424, 425, 428	ltled 9800	. . . . . . . . . 10 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> N <_ b )
430		eluz2 11188	. . . . . . . . . 10 |- ( b e. ( ZZ>= ` N ) <-> ( N e. ZZ /\ b e. ZZ /\ N <_ b ) )
431	422, 423, 429, 430	syl3anbrc 1214	. . . . . . . . 9 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> b e. ( ZZ>= ` N ) )
432	421, 431	eqeltrd 2549	. . . . . . . 8 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ -. b <_ N ) -> if ( b <_ N , N , b ) e. ( ZZ>= ` N ) )
433	419, 432	pm2.61dan 808	. . . . . . 7 |- ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) -> if ( b <_ N , N , b ) e. ( ZZ>= ` N ) )
434	433	adantr 472	. . . . . 6 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ A. c e. ( ZZ>= ` b ) ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) ) -> if ( b <_ N , N , b ) e. ( ZZ>= ` N ) )
435		simpr 468	. . . . . . . 8 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ A. c e. ( ZZ>= ` b ) ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) ) -> A. c e. ( ZZ>= ` b ) ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) )
436		simpr 468	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) -> b e. ZZ )
437	181	adantr 472	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) -> N e. ZZ )
438	437, 436	ifcld 3915	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) -> if ( b <_ N , N , b ) e. ZZ )
439	436	zred 11063	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) -> b e. RR )
440	437	zred 11063	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) -> N e. RR )
441		max1 11503	. . . . . . . . . . 11 |- ( ( b e. RR /\ N e. RR ) -> b <_ if ( b <_ N , N , b ) )
442	439, 440, 441	syl2anc 673	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) -> b <_ if ( b <_ N , N , b ) )
443		eluz2 11188	. . . . . . . . . 10 |- ( if ( b <_ N , N , b ) e. ( ZZ>= ` b ) <-> ( b e. ZZ /\ if ( b <_ N , N , b ) e. ZZ /\ b <_ if ( b <_ N , N , b ) ) )
444	436, 438, 442, 443	syl3anbrc 1214	. . . . . . . . 9 |- ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) -> if ( b <_ N , N , b ) e. ( ZZ>= ` b ) )
445	444	adantr 472	. . . . . . . 8 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ A. c e. ( ZZ>= ` b ) ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) ) -> if ( b <_ N , N , b ) e. ( ZZ>= ` b ) )
446		fveq2 5879	. . . . . . . . . . 11 |- ( c = if ( b <_ N , N , b ) -> ( S ` c ) = ( S ` if ( b <_ N , N , b ) ) )
447	446	eleq1d 2533	. . . . . . . . . 10 |- ( c = if ( b <_ N , N , b ) -> ( ( S ` c ) e. CC <-> ( S ` if ( b <_ N , N , b ) ) e. CC ) )
448	446	oveq1d 6323	. . . . . . . . . . . 12 |- ( c = if ( b <_ N , N , b ) -> ( ( S ` c ) - ( limsup ` S ) ) = ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) )
449	448	fveq2d 5883	. . . . . . . . . . 11 |- ( c = if ( b <_ N , N , b ) -> ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) = ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) )
450	449	breq1d 4405	. . . . . . . . . 10 |- ( c = if ( b <_ N , N , b ) -> ( ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) <-> ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) < ( x / 2 ) ) )
451	447, 450	anbi12d 725	. . . . . . . . 9 |- ( c = if ( b <_ N , N , b ) -> ( ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) <-> ( ( S ` if ( b <_ N , N , b ) ) e. CC /\ ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) < ( x / 2 ) ) ) )
452	451	rspccva 3135	. . . . . . . 8 |- ( ( A. c e. ( ZZ>= ` b ) ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) /\ if ( b <_ N , N , b ) e. ( ZZ>= ` b ) ) -> ( ( S ` if ( b <_ N , N , b ) ) e. CC /\ ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) < ( x / 2 ) ) )
453	435, 445, 452	syl2anc 673	. . . . . . 7 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ A. c e. ( ZZ>= ` b ) ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) ) -> ( ( S ` if ( b <_ N , N , b ) ) e. CC /\ ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) < ( x / 2 ) ) )
454	453	simprd 470	. . . . . 6 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ A. c e. ( ZZ>= ` b ) ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) ) -> ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) < ( x / 2 ) )
455		fveq2 5879	. . . . . . . . . 10 |- ( j = if ( b <_ N , N , b ) -> ( S ` j ) = ( S ` if ( b <_ N , N , b ) ) )
456	455	oveq1d 6323	. . . . . . . . 9 |- ( j = if ( b <_ N , N , b ) -> ( ( S ` j ) - ( limsup ` S ) ) = ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) )
457	456	fveq2d 5883	. . . . . . . 8 |- ( j = if ( b <_ N , N , b ) -> ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) = ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) )
458	457	breq1d 4405	. . . . . . 7 |- ( j = if ( b <_ N , N , b ) -> ( ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) <-> ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) < ( x / 2 ) ) )
459	458	rspcev 3136	. . . . . 6 |- ( ( if ( b <_ N , N , b ) e. ( ZZ>= ` N ) /\ ( abs ` ( ( S ` if ( b <_ N , N , b ) ) - ( limsup ` S ) ) ) < ( x / 2 ) ) -> E. j e. ( ZZ>= ` N ) ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) )
460	434, 454, 459	syl2anc 673	. . . . 5 |- ( ( ( ( ph /\ x e. RR+ ) /\ b e. ZZ ) /\ A. c e. ( ZZ>= ` b ) ( ( S ` c ) e. CC /\ ( abs ` ( ( S ` c ) - ( limsup ` S ) ) ) < ( x / 2 ) ) ) -> E. j e. ( ZZ>= ` N ) ( abs ` ( ( S ` j ) - ( limsup ` S ) ) ) < ( x / 2 ) )
461		ax-resscn 9614	. . . . . . . . . . . . . 14 |- RR C_ CC
462	461	a1i 11	. . . . . . . . . . . . 13 |- ( ph -> RR C_ CC )
463	26, 462	fssd 5750	. . . . . . . . . . . . . 14 |- ( ph -> F : ( A (,) B ) --> CC )
464		dvcn 22954	. . . . . . . . . . . . . 14 |- ( ( ( RR C_ CC /\ F : ( A (,) B ) --> CC /\ ( A (,) B ) C_ RR ) /\ dom ( RR _D F ) = ( A (,) B ) ) -> F e. ( ( A (,) B ) -cn-> CC ) )
465	462, 463, 152, 107, 464	syl31anc 1295	. . . . . . . . . . . . 13 |- ( ph -> F e. ( ( A (,) B ) -cn-> CC ) )
466		cncffvrn 22008	. . . . . . . . . . . . 13 |- ( ( RR C_ CC /\ F e. ( ( A (,) B ) -cn-> CC ) ) -> ( F e. ( ( A (,) B ) -cn-> RR ) <-> F : ( A (,) B ) --> RR ) )
467	462, 465, 466	syl2anc 673	. . . . . . . . . . . 12 |- ( ph -> ( F e. ( ( A (,) B ) -cn-> RR ) <-> F : ( A (,) B ) --> RR ) )
468	26, 467	mpbird 240	. . . . . . . . . . 11 |- ( ph -> F e. ( ( A (,) B ) -cn-> RR ) )
469		ioodvbdlimc2lem.r	. . . . . . . . . . . 12 |- R = ( j e. ( ZZ>= ` M ) |-> ( B - ( 1 / j ) ) )
470	103, 469	fmptd 6061	. . . . . . . . . . 11 |- ( ph -> R : ( ZZ>= ` M ) --> ( A (,) B ) )
471		eqid 2471	. . . . . . . . . . 11 |- ( j e. ( ZZ>= ` M ) |-> ( F ` ( R ` j ) ) ) = ( j e. ( ZZ>= ` M ) |-> ( F ` ( R ` j ) ) )
472		climrel 13633	. . . . . . . . . . . . 13 |- Rel ~~>
473	472	a1i 11	. . . . . . . . . . . 12 |- ( ph -> Rel ~~> )
474		fvex 5889	. . . . . . . . . . . . . . . . 17 |- ( ZZ>= ` M ) e. _V
475	474	mptex 6152	. . . . . . . . . . . . . . . 16 |- ( j e. ( ZZ>= ` M ) |-> B ) e. _V
476	475	a1i 11	. . . . . . . . . . . . . . 15 |- ( ph -> ( j e. ( ZZ>= ` M ) |-> B ) e. _V )
477		eqidd 2472	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ m e. ( ZZ>= ` M ) ) -> ( j e. ( ZZ>= ` M ) |-> B ) = ( j e. ( ZZ>= ` M ) |-> B ) )
478		eqidd 2472	. . . . . . . . . . . . . . . 16 |- ( ( ( ph /\ m e. ( ZZ>= ` M ) ) /\ j = m ) -> B = B )
479		simpr 468	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ m e. ( ZZ>= ` M ) ) -> m e. ( ZZ>= ` M ) )
480	6	adantr 472	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ m e. ( ZZ>= ` M ) ) -> B e. RR )
481	477, 478, 479, 480	fvmptd 5969	. . . . . . . . . . . . . . 15 |- ( ( ph /\ m e. ( ZZ>= ` M ) ) -> ( ( j e. ( ZZ>= ` M ) |-> B ) ` m ) = B )
482	23, 22, 476, 85, 481	climconst 13684	. . . . . . . . . . . . . 14 |- ( ph -> ( j e. ( ZZ>= ` M ) |-> B ) ~~> B )
483	474	mptex 6152	. . . . . . . . . . . . . . . 16 |- ( j e. ( ZZ>= ` M ) |-> ( B - ( 1 / j ) ) ) e. _V
484	469, 483	eqeltri 2545	. . . . . . . . . . . . . . 15 |- R e. _V
485	484	a1i 11	. . . . . . . . . . . . . 14 |- ( ph -> R e. _V )
486		1cnd 9677	. . . . . . . . . . . . . . 15 |- ( ph -> 1 e. CC )
487		elnnnn0b 10938	. . . . . . . . . . . . . . . 16 |- ( M e. NN <-> ( M e. NN0 /\ 0 < M ) )
488	21, 65, 487	sylanbrc 677	. . . . . . . . . . . . . . 15 |- ( ph -> M e. NN )
489		divcnvg 37804	. . . . . . . . . . . . . . 15 |- ( ( 1 e. CC /\ M e. NN ) -> ( j e. ( ZZ>= ` M ) |-> ( 1 / j ) ) ~~> 0 )
490	486, 488, 489	syl2anc 673	. . . . . . . . . . . . . 14 |- ( ph -> ( j e. ( ZZ>= ` M ) |-> ( 1 / j ) ) ~~> 0 )
491		eqidd 2472	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( j e. ( ZZ>= ` M ) |-> B ) = ( j e. ( ZZ>= ` M ) |-> B ) )
492		eqidd 2472	. . . . . . . . . . . . . . . . 17 |- ( ( ( ph /\ i e. ( ZZ>= ` M ) ) /\ j = i ) -> B = B )
493		simpr 468	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> i e. ( ZZ>= ` M ) )
494	6	adantr 472	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> B e. RR )
495	491, 492, 493, 494	fvmptd 5969	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( ( j e. ( ZZ>= ` M ) |-> B ) ` i ) = B )
496	495, 494	eqeltrd 2549	. . . . . . . . . . . . . . 15 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( ( j e. ( ZZ>= ` M ) |-> B ) ` i ) e. RR )
497	496	recnd 9687	. . . . . . . . . . . . . 14 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( ( j e. ( ZZ>= ` M ) |-> B ) ` i ) e. CC )
498		eqidd 2472	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( j e. ( ZZ>= ` M ) |-> ( 1 / j ) ) = ( j e. ( ZZ>= ` M ) |-> ( 1 / j ) ) )
499		oveq2 6316	. . . . . . . . . . . . . . . . 17 |- ( j = i -> ( 1 / j ) = ( 1 / i ) )
500	499	adantl 473	. . . . . . . . . . . . . . . 16 |- ( ( ( ph /\ i e. ( ZZ>= ` M ) ) /\ j = i ) -> ( 1 / j ) = ( 1 / i ) )
501	3, 493	sseldi 3416	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> i e. RR )
502		0red 9662	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> 0 e. RR )
503	60	adantr 472	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> M e. RR )
504	65	adantr 472	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> 0 < M )
505		eluzle 11195	. . . . . . . . . . . . . . . . . . . 20 |- ( i e. ( ZZ>= ` M ) -> M <_ i )
506	505	adantl 473	. . . . . . . . . . . . . . . . . . 19 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> M <_ i )
507	502, 503, 501, 504, 506	ltletrd 9812	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> 0 < i )
508	507	gt0ne0d 10199	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> i =/= 0 )
509	501, 508	rereccld 10456	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( 1 / i ) e. RR )
510	498, 500, 493, 509	fvmptd 5969	. . . . . . . . . . . . . . 15 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( ( j e. ( ZZ>= ` M ) |-> ( 1 / j ) ) ` i ) = ( 1 / i ) )
511	501	recnd 9687	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> i e. CC )
512	511, 508	reccld 10398	. . . . . . . . . . . . . . 15 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( 1 / i ) e. CC )
513	510, 512	eqeltrd 2549	. . . . . . . . . . . . . 14 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( ( j e. ( ZZ>= ` M ) |-> ( 1 / j ) ) ` i ) e. CC )
514	499	oveq2d 6324	. . . . . . . . . . . . . . . . 17 |- ( j = i -> ( B - ( 1 / j ) ) = ( B - ( 1 / i ) ) )
515		ovex 6336	. . . . . . . . . . . . . . . . 17 |- ( B - ( 1 / i ) ) e. _V
516	514, 469, 515	fvmpt 5963	. . . . . . . . . . . . . . . 16 |- ( i e. ( ZZ>= ` M ) -> ( R ` i ) = ( B - ( 1 / i ) ) )
517	516	adantl 473	. . . . . . . . . . . . . . 15 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( R ` i ) = ( B - ( 1 / i ) ) )
518	495, 510	oveq12d 6326	. . . . . . . . . . . . . . 15 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( ( ( j e. ( ZZ>= ` M ) |-> B ) ` i ) - ( ( j e. ( ZZ>= ` M ) |-> ( 1 / j ) ) ` i ) ) = ( B - ( 1 / i ) ) )
519	517, 518	eqtr4d 2508	. . . . . . . . . . . . . 14 |- ( ( ph /\ i e. ( ZZ>= ` M ) ) -> ( R ` i ) = ( ( ( j e. ( ZZ>= ` M ) |-> B ) ` i ) - ( ( j e. ( ZZ>= ` M ) |-> ( 1 / j ) ) ` i ) ) )
520	23, 22, 482, 485, 490, 497, 513, 519	climsub 13774	. . . . . . . . . . . . 13 |- ( ph -> R ~~> ( B - 0 ) )
521	85	subid1d 9994	. . . . . . . . . . . . 13 |- ( ph -> ( B - 0 ) = B )
522	520, 521