Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  fourierdlem73 Structured version   Visualization version   Unicode version

Theorem fourierdlem73 40396
Description: A version of the Riemann Lebesgue lemma: as  r increases, the integral in  S goes to zero. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem73.a  |-  ( ph  ->  A  e.  RR )
fourierdlem73.b  |-  ( ph  ->  B  e.  RR )
fourierdlem73.f  |-  ( ph  ->  F : ( A [,] B ) --> CC )
fourierdlem73.m  |-  ( ph  ->  M  e.  NN )
fourierdlem73.qf  |-  ( ph  ->  Q : ( 0 ... M ) --> ( A [,] B ) )
fourierdlem73.q0  |-  ( ph  ->  ( Q `  0
)  =  A )
fourierdlem73.qm  |-  ( ph  ->  ( Q `  M
)  =  B )
fourierdlem73.qilt  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  <  ( Q `  ( i  +  1 ) ) )
fourierdlem73.fcn  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
fourierdlem73.l  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) lim CC  ( Q `
 ( i  +  1 ) ) ) )
fourierdlem73.r  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) lim CC  ( Q `
 i ) ) )
fourierdlem73.g  |-  G  =  ( RR  _D  F
)
fourierdlem73.gcn  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
fourierdlem73.gbd  |-  ( ph  ->  E. y  e.  RR  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )
fourierdlem73.s  |-  S  =  ( r  e.  RR+  |->  S. ( A (,) B
) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )
fourierdlem73.d  |-  D  =  ( x  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( Q `  i
) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) ) )
Assertion
Ref Expression
fourierdlem73  |-  ( ph  ->  A. e  e.  RR+  E. n  e.  NN  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  e )
Distinct variable groups:    x, A    x, B    D, r, x, y   
i, F, n, x   
x, G, y    x, L    e, M, i, n, r, x    y, M, i    Q, i, n, r, x    y, Q    x, R    ph, e, i, n, r, x    ph, y
Allowed substitution hints:    A( y, e, i, n, r)    B( y, e, i, n, r)    D( e, i, n)    Q( e)    R( y, e, i, n, r)    S( x, y, e, i, n, r)    F( y, e, r)    G( e, i, n, r)    L( y, e, i, n, r)

Proof of Theorem fourierdlem73
Dummy variables  m  z  j are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fourierdlem73.gcn . . . . . . . . . . . . . 14  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
2 cncff 22696 . . . . . . . . . . . . . 14  |-  ( ( G  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC )  ->  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) : ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) --> CC )
31, 2syl 17 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) : ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) --> CC )
4 ax-resscn 9993 . . . . . . . . . . . . . . . . 17  |-  RR  C_  CC
54a1i 11 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  RR  C_  CC )
6 fourierdlem73.qf . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  Q : ( 0 ... M ) --> ( A [,] B ) )
7 fourierdlem73.a . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  A  e.  RR )
8 fourierdlem73.b . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  B  e.  RR )
97, 8iccssred 39727 . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  ( A [,] B
)  C_  RR )
106, 9fssd 6057 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  Q : ( 0 ... M ) --> RR )
1110adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  Q : ( 0 ... M ) --> RR )
12 elfzofz 12485 . . . . . . . . . . . . . . . . . . 19  |-  ( i  e.  ( 0..^ M )  ->  i  e.  ( 0 ... M
) )
1312adantl 482 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  i  e.  ( 0 ... M ) )
1411, 13ffvelrnd 6360 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  RR )
15 fzofzp1 12565 . . . . . . . . . . . . . . . . . . 19  |-  ( i  e.  ( 0..^ M )  ->  ( i  +  1 )  e.  ( 0 ... M
) )
1615adantl 482 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( i  +  1 )  e.  ( 0 ... M ) )
1711, 16ffvelrnd 6360 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
1814, 17iccssred 39727 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  C_  RR )
19 limccl 23639 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) lim CC  ( Q `  i ) )  C_  CC
20 fourierdlem73.r . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) lim CC  ( Q `
 i ) ) )
2119, 20sseldi 3601 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  CC )
2221adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  R  e.  CC )
23 limccl 23639 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) lim CC  ( Q `  ( i  +  1 ) ) )  C_  CC
24 fourierdlem73.l . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) lim CC  ( Q `
 ( i  +  1 ) ) ) )
2523, 24sseldi 3601 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  CC )
2625adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  L  e.  CC )
27 fourierdlem73.f . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  F : ( A [,] B ) --> CC )
2827ad2antrr 762 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  F : ( A [,] B ) --> CC )
297ad2antrr 762 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  A  e.  RR )
308ad2antrr 762 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  B  e.  RR )
3114adantr 481 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR )
3217adantr 481 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
33 simpr 477 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
34 eliccre 39728 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( Q `  i
)  e.  RR  /\  ( Q `  ( i  +  1 ) )  e.  RR  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
3531, 32, 33, 34syl3anc 1326 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
367rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ph  ->  A  e.  RR* )
3736adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  A  e.  RR* )
388rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ph  ->  B  e.  RR* )
3938adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  B  e.  RR* )
406adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  Q : ( 0 ... M ) --> ( A [,] B
) )
4140, 13ffvelrnd 6360 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  ( A [,] B ) )
42 iccgelb 12230 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  ( Q `
 i )  e.  ( A [,] B
) )  ->  A  <_  ( Q `  i
) )
4337, 39, 41, 42syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  A  <_  ( Q `  i )
)
4443adantr 481 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  A  <_  ( Q `  i
) )
4531rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR* )
4632rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR* )
47 iccgelb 12230 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  <_  x )
4845, 46, 33, 47syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  <_  x )
4929, 31, 35, 44, 48letrd 10194 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  A  <_  x )
50 iccleub 12229 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  <_  ( Q `  (
i  +  1 ) ) )
5145, 46, 33, 50syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  <_  ( Q `  (
i  +  1 ) ) )
5236ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  A  e.  RR* )
5338ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  B  e.  RR* )
5440, 16ffvelrnd 6360 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  ( A [,] B ) )
5554adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  ( A [,] B ) )
56 iccleub 12229 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( A  e.  RR*  /\  B  e.  RR*  /\  ( Q `
 ( i  +  1 ) )  e.  ( A [,] B
) )  ->  ( Q `  ( i  +  1 ) )  <_  B )
5752, 53, 55, 56syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  <_  B )
5835, 32, 30, 51, 57letrd 10194 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  <_  B )
5929, 30, 35, 49, 58eliccd 39726 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  ( A [,] B
) )
6028, 59ffvelrnd 6360 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( F `  x )  e.  CC )
6126, 60ifcld 4131 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  e.  CC )
6222, 61ifcld 4131 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  e.  CC )
63 fourierdlem73.d . . . . . . . . . . . . . . . . 17  |-  D  =  ( x  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( Q `  i
) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) ) )
6462, 63fmptd 6385 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  D : ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) --> CC )
65 eqid 2622 . . . . . . . . . . . . . . . . 17  |-  ( TopOpen ` fld )  =  ( TopOpen ` fld )
6665tgioo2 22606 . . . . . . . . . . . . . . . 16  |-  ( topGen ` 
ran  (,) )  =  ( ( TopOpen ` fld )t  RR )
67 iccntr 22624 . . . . . . . . . . . . . . . . 17  |-  ( ( ( Q `  i
)  e.  RR  /\  ( Q `  ( i  +  1 ) )  e.  RR )  -> 
( ( int `  ( topGen `
 ran  (,) )
) `  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
6814, 17, 67syl2anc 693 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( int `  ( topGen `  ran  (,) )
) `  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
695, 18, 64, 66, 65, 68dvresntr 40132 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  D )  =  ( RR  _D  ( D  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) ) )
70 ioossicc 12259 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )
7170sseli 3599 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
7271adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
73 fvres 6207 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  ->  (
( F  |`  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ) `  x )  =  ( F `  x ) )
7472, 73syl 17 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( F  |`  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ) `  x )  =  ( F `  x ) )
7572, 62syldan 487 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  e.  CC )
7663fvmpt2 6291 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  /\  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) )  e.  CC )  ->  ( D `  x )  =  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) ) )
7772, 75, 76syl2anc 693 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( D `  x )  =  if ( x  =  ( Q `  i
) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) ) )
7814adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR )
7972, 45syldan 487 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR* )
8072, 46syldan 487 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR* )
81 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
82 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  <  x )
8379, 80, 81, 82syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  <  x )
8478, 83gtned 10172 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  =/=  ( Q `  i
) )
8584neneqd 2799 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  -.  x  =  ( Q `  i ) )
8685iffalsed 4097 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  =  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )
87 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  x  e.  RR )
8887adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
89 iooltub 39735 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  <  ( Q `  (
i  +  1 ) ) )
9079, 80, 81, 89syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  <  ( Q `  (
i  +  1 ) ) )
9188, 90ltned 10173 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  =/=  ( Q `  (
i  +  1 ) ) )
9291neneqd 2799 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  -.  x  =  ( Q `  ( i  +  1 ) ) )
9392iffalsed 4097 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  =  ( F `
 x ) )
9477, 86, 933eqtrrd 2661 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( F `  x )  =  ( D `  x ) )
9574, 94eqtr2d 2657 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( D `  x )  =  ( ( F  |`  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ) `  x
) )
9695ralrimiva 2966 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  A. x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( D `  x
)  =  ( ( F  |`  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) ) `  x ) )
97 ffn 6045 . . . . . . . . . . . . . . . . . . . 20  |-  ( D : ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) --> CC  ->  D  Fn  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) )
9864, 97syl 17 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  D  Fn  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
99 ffn 6045 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( F : ( A [,] B ) --> CC  ->  F  Fn  ( A [,] B ) )
10027, 99syl 17 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  F  Fn  ( A [,] B ) )
101100adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  F  Fn  ( A [,] B ) )
102 simpr 477 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  i  e.  ( 0..^ M ) )
10337, 39, 40, 102fourierdlem8 40332 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  C_  ( A [,] B ) )
104 fnssres 6004 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( F  Fn  ( A [,] B )  /\  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  C_  ( A [,] B ) )  -> 
( F  |`  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )  Fn  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
105101, 103, 104syl2anc 693 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  Fn  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
10670a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  C_  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
107 fvreseq 6319 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( D  Fn  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) )  /\  ( F  |`  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  Fn  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )  /\  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  (
( D  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  =  ( ( F  |`  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  <->  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( D `  x )  =  ( ( F  |`  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ) `  x ) ) )
10898, 105, 106, 107syl21anc 1325 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( D  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( ( F  |`  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  <->  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( D `  x )  =  ( ( F  |`  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ) `  x ) ) )
10996, 108mpbird 247 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( D  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( ( F  |`  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) )
110106resabs1d 5428 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( F  |`  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  =  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )
111109, 110eqtrd 2656 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( D  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) )
112111oveq2d 6666 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  ( D  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  =  ( RR 
_D  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) ) )
11327adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  F : ( A [,] B ) --> CC )
1149adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( A [,] B )  C_  RR )
115106, 18sstrd 3613 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  C_  RR )
11665, 66dvres 23675 . . . . . . . . . . . . . . . . 17  |-  ( ( ( RR  C_  CC  /\  F : ( A [,] B ) --> CC )  /\  ( ( A [,] B ) 
C_  RR  /\  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
C_  RR ) )  ->  ( RR  _D  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  =  ( ( RR  _D  F )  |`  ( ( int `  ( topGen `
 ran  (,) )
) `  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) ) )
1175, 113, 114, 115, 116syl22anc 1327 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  =  ( ( RR  _D  F )  |`  ( ( int `  ( topGen `
 ran  (,) )
) `  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) ) )
118 fourierdlem73.g . . . . . . . . . . . . . . . . . . 19  |-  G  =  ( RR  _D  F
)
119118eqcomi 2631 . . . . . . . . . . . . . . . . . 18  |-  ( RR 
_D  F )  =  G
120119a1i 11 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  F )  =  G )
121 iooretop 22569 . . . . . . . . . . . . . . . . . 18  |-  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  e.  ( topGen `  ran  (,) )
122 retop 22565 . . . . . . . . . . . . . . . . . . 19  |-  ( topGen ` 
ran  (,) )  e.  Top
123 uniretop 22566 . . . . . . . . . . . . . . . . . . . 20  |-  RR  =  U. ( topGen `  ran  (,) )
124123isopn3 20870 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( topGen `  ran  (,) )  e.  Top  /\  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  RR )  ->  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )  e.  ( topGen `  ran  (,) )  <->  ( ( int `  ( topGen `  ran  (,) )
) `  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )
125122, 115, 124sylancr 695 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  e.  ( topGen `  ran  (,) )  <->  ( ( int `  ( topGen `
 ran  (,) )
) `  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )
126121, 125mpbii 223 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( int `  ( topGen `  ran  (,) )
) `  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
127120, 126reseq12d 5397 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( RR 
_D  F )  |`  ( ( int `  ( topGen `
 ran  (,) )
) `  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) )  =  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )
128117, 127eqtrd 2656 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  =  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )
12969, 112, 1283eqtrd 2660 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  D )  =  ( G  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) )
130129feq1d 6030 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( RR 
_D  D ) : ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) --> CC  <->  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) : ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) --> CC ) )
1313, 130mpbird 247 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  D ) : ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) --> CC )
132131feqmptd 6249 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  D )  =  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( RR  _D  D
) `  x )
) )
133132, 129eqtr3d 2658 . . . . . . . . . 10  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( RR 
_D  D ) `  x ) )  =  ( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) )
134 ioombl 23333 . . . . . . . . . . . 12  |-  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  e. 
dom  vol
135134a1i 11 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  e.  dom  vol )
136 fourierdlem73.qilt . . . . . . . . . . . . . 14  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  <  ( Q `  ( i  +  1 ) ) )
13714, 17, 136ltled 10185 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  <_  ( Q `  ( i  +  1 ) ) )
138 volioo 23337 . . . . . . . . . . . . 13  |-  ( ( ( Q `  i
)  e.  RR  /\  ( Q `  ( i  +  1 ) )  e.  RR  /\  ( Q `  i )  <_  ( Q `  (
i  +  1 ) ) )  ->  ( vol `  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) )  =  ( ( Q `  ( i  +  1 ) )  -  ( Q `  i )
) )
13914, 17, 137, 138syl3anc 1326 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( vol `  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  =  ( ( Q `  ( i  +  1 ) )  -  ( Q `  i ) ) )
14017, 14resubcld 10458 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 ( i  +  1 ) )  -  ( Q `  i ) )  e.  RR )
141139, 140eqeltrd 2701 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( vol `  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  e.  RR )
142 fourierdlem73.gbd . . . . . . . . . . . . 13  |-  ( ph  ->  E. y  e.  RR  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )
143142adantr 481 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  E. y  e.  RR  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )
144 nfv 1843 . . . . . . . . . . . . . . . 16  |-  F/ x
( ( ph  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )
145 nfra1 2941 . . . . . . . . . . . . . . . 16  |-  F/ x A. x  e.  dom  G ( abs `  ( G `  x )
)  <_  y
146144, 145nfan 1828 . . . . . . . . . . . . . . 15  |-  F/ x
( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )  /\  A. x  e.  dom  G ( abs `  ( G `  x )
)  <_  y )
147 simpr 477 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e. 
dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )
148 fdm 6051 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( G  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) : ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) --> CC  ->  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) )
1493, 148syl 17 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )
150149adantr 481 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e. 
dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  dom  ( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
151147, 150eleqtrd 2703 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e. 
dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )
152 fvres 6207 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  (
( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x )  =  ( G `  x ) )
153151, 152syl 17 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e. 
dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  -> 
( ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
)  =  ( G `
 x ) )
154153fveq2d 6195 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e. 
dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  -> 
( abs `  (
( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( abs `  ( G `  x
) ) )
155154ad4ant14 1293 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )  /\  A. x  e.  dom  G ( abs `  ( G `  x )
)  <_  y )  /\  x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  ( abs `  ( ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
) )  =  ( abs `  ( G `
 x ) ) )
156 simplr 792 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )  /\  x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  A. x  e.  dom  G ( abs `  ( G `  x
) )  <_  y
)
157 ssdmres 5420 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
C_  dom  G  <->  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )
158149, 157sylibr 224 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  C_  dom  G )
159158sselda 3603 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  dom  G )
160151, 159syldan 487 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e. 
dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  x  e.  dom  G )
161160adantlr 751 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )  /\  x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  x  e.  dom  G )
162 rsp 2929 . . . . . . . . . . . . . . . . . . 19  |-  ( A. x  e.  dom  G ( abs `  ( G `
 x ) )  <_  y  ->  (
x  e.  dom  G  ->  ( abs `  ( G `  x )
)  <_  y )
)
163156, 161, 162sylc 65 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )  /\  x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  ( abs `  ( G `  x
) )  <_  y
)
164163adantllr 755 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )  /\  A. x  e.  dom  G ( abs `  ( G `  x )
)  <_  y )  /\  x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  ( abs `  ( G `  x
) )  <_  y
)
165155, 164eqbrtrd 4675 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )  /\  A. x  e.  dom  G ( abs `  ( G `  x )
)  <_  y )  /\  x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )  ->  ( abs `  ( ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
) )  <_  y
)
166165ex 450 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )  /\  A. x  e.  dom  G ( abs `  ( G `  x )
)  <_  y )  ->  ( x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( abs `  (
( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  <_  y )
)
167146, 166ralrimi 2957 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )  /\  A. x  e.  dom  G ( abs `  ( G `  x )
)  <_  y )  ->  A. x  e.  dom  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) ( abs `  (
( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  <_  y )
168167ex 450 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )  ->  ( A. x  e.  dom  G ( abs `  ( G `  x )
)  <_  y  ->  A. x  e.  dom  ( G  |`  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) ) ( abs `  ( ( G  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) )  <_ 
y ) )
169168reximdva 3017 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( E. y  e.  RR  A. x  e. 
dom  G ( abs `  ( G `  x
) )  <_  y  ->  E. y  e.  RR  A. x  e.  dom  ( G  |`  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) ) ( abs `  ( ( G  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) )  <_ 
y ) )
170143, 169mpd 15 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  E. y  e.  RR  A. x  e.  dom  ( G  |`  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) ) ( abs `  ( ( G  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) )  <_ 
y )
171135, 141, 1, 170cnbdibl 40178 . . . . . . . . . 10  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( G  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  e.  L^1 )
172133, 171eqeltrd 2701 . . . . . . . . 9  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( RR 
_D  D ) `  x ) )  e.  L^1 )
173172adantr 481 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  ->  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  |->  ( ( RR  _D  D ) `
 x ) )  e.  L^1 )
174134a1i 11 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )  e.  dom  vol )
175141adantr 481 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  ( vol `  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) )  e.  RR )
176133, 1eqeltrd 2701 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( RR 
_D  D ) `  x ) )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
177176adantr 481 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( RR  _D  D
) `  x )
)  e.  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )
-cn-> CC ) )
178 coscn 24199 . . . . . . . . . . . . . 14  |-  cos  e.  ( CC -cn-> CC )
179178a1i 11 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  cos  e.  ( CC -cn-> CC ) )
180 ioosscn 39716 . . . . . . . . . . . . . . . 16  |-  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  CC
181180a1i 11 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
C_  CC )
182 simpr 477 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  r  e.  RR )
183182recnd 10068 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  r  e.  CC )
184 ssid 3624 . . . . . . . . . . . . . . . 16  |-  CC  C_  CC
185184a1i 11 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  CC  C_  CC )
186181, 183, 185constcncfg 40084 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  r )  e.  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )
-cn-> CC ) )
187180a1i 11 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  CC )
188184a1i 11 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  CC  C_  CC )
189187, 188idcncfg 40085 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  x )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
190189ad2antrr 762 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  x )  e.  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )
-cn-> CC ) )
191186, 190mulcncf 23215 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( r  x.  x ) )  e.  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )
-cn-> CC ) )
192179, 191cncfmpt1f 22716 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( cos `  ( r  x.  x ) ) )  e.  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )
-cn-> CC ) )
193192negcncfg 40094 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  -u ( cos `  ( r  x.  x ) ) )  e.  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )
-cn-> CC ) )
194177, 193mulcncf 23215 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `  x
)  x.  -u ( cos `  ( r  x.  x ) ) ) )  e.  ( ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )
-cn-> CC ) )
195 nfv 1843 . . . . . . . . . . . . . . . . 17  |-  F/ x
( ph  /\  i  e.  ( 0..^ M ) )
196195, 145nfan 1828 . . . . . . . . . . . . . . . 16  |-  F/ x
( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )
197129fveq1d 6193 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( RR 
_D  D ) `  x )  =  ( ( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )
198197, 152sylan9eq 2676 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( RR  _D  D
) `  x )  =  ( G `  x ) )
199198fveq2d 6195 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( abs `  ( ( RR 
_D  D ) `  x ) )  =  ( abs `  ( G `  x )
) )
200199adantlr 751 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )  /\  x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( RR  _D  D ) `  x
) )  =  ( abs `  ( G `
 x ) ) )
201 simplr 792 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )  /\  x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  A. x  e.  dom  G ( abs `  ( G `  x
) )  <_  y
)
202159adantlr 751 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )  /\  x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  x  e.  dom  G )
203201, 202, 162sylc 65 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )  /\  x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( G `  x
) )  <_  y
)
204200, 203eqbrtrd 4675 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G
( abs `  ( G `  x )
)  <_  y )  /\  x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( RR  _D  D ) `  x
) )  <_  y
)
205204ex 450 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G ( abs `  ( G `  x
) )  <_  y
)  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  ->  ( abs `  ( ( RR  _D  D ) `  x
) )  <_  y
) )
206196, 205ralrimi 2957 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  dom  G ( abs `  ( G `  x
) )  <_  y
)  ->  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )
207206ex 450 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( A. x  e.  dom  G ( abs `  ( G `  x
) )  <_  y  ->  A. x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )
)
208207reximdv 3016 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( E. y  e.  RR  A. x  e. 
dom  G ( abs `  ( G `  x
) )  <_  y  ->  E. y  e.  RR  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  ( ( RR  _D  D ) `
 x ) )  <_  y ) )
209143, 208mpd 15 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  E. y  e.  RR  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  ( ( RR  _D  D ) `
 x ) )  <_  y )
210209adantr 481 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  E. y  e.  RR  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )
211 eqidd 2623 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) )  =  ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) ) ) )
212 fveq2 6191 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  z  ->  (
( RR  _D  D
) `  x )  =  ( ( RR 
_D  D ) `  z ) )
213 eleq1 2689 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( x  =  z  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  <->  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) )
214213anbi2d 740 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  z  ->  (
( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  <->  ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) ) )
215 fveq2 6191 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( x  =  z  ->  ( G `  x )  =  ( G `  z ) )
216212, 215eqeq12d 2637 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  z  ->  (
( ( RR  _D  D ) `  x
)  =  ( G `
 x )  <->  ( ( RR  _D  D ) `  z )  =  ( G `  z ) ) )
217214, 216imbi12d 334 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  z  ->  (
( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( ( RR  _D  D ) `  x
)  =  ( G `
 x ) )  <-> 
( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( ( RR  _D  D ) `  z
)  =  ( G `
 z ) ) ) )
218217, 198chvarv 2263 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( RR  _D  D
) `  z )  =  ( G `  z ) )
219212, 218sylan9eqr 2678 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  x  =  z )  ->  ( ( RR  _D  D ) `  x
)  =  ( G `
 z ) )
220 oveq2 6658 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  z  ->  (
r  x.  x )  =  ( r  x.  z ) )
221220fveq2d 6195 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  z  ->  ( cos `  ( r  x.  x ) )  =  ( cos `  (
r  x.  z ) ) )
222221negeqd 10275 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  z  ->  -u ( cos `  ( r  x.  x ) )  = 
-u ( cos `  (
r  x.  z ) ) )
223222adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  x  =  z )  -> 
-u ( cos `  (
r  x.  x ) )  =  -u ( cos `  ( r  x.  z ) ) )
224219, 223oveq12d 6668 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  x  =  z )  ->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) )  =  ( ( G `
 z )  x.  -u ( cos `  (
r  x.  z ) ) ) )
225224adantllr 755 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  /\  x  =  z )  ->  (
( ( RR  _D  D ) `  x
)  x.  -u ( cos `  ( r  x.  x ) ) )  =  ( ( G `
 z )  x.  -u ( cos `  (
r  x.  z ) ) ) )
226 simpr 477 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
227 fvres 6207 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( z  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  (
( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  z )  =  ( G `  z ) )
228227adantl 482 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  z )  =  ( G `  z ) )
2293ffvelrnda 6359 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( G  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  z )  e.  CC )
230228, 229eqeltrrd 2702 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( G `  z )  e.  CC )
231230adantlr 751 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( G `  z )  e.  CC )
232 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
r  e.  RR )
233 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( z  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  z  e.  RR )
234233adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
z  e.  RR )
235232, 234remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( r  x.  z
)  e.  RR )
236235recnd 10068 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( r  x.  z
)  e.  CC )
237236coscld 14861 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( cos `  (
r  x.  z ) )  e.  CC )
238237negcld 10379 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  ->  -u ( cos `  (
r  x.  z ) )  e.  CC )
239238adantll 750 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  -u ( cos `  ( r  x.  z
) )  e.  CC )
240231, 239mulcld 10060 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( ( G `  z )  x.  -u ( cos `  (
r  x.  z ) ) )  e.  CC )
241211, 225, 226, 240fvmptd 6288 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `  x
)  x.  -u ( cos `  ( r  x.  x ) ) ) ) `  z )  =  ( ( G `
 z )  x.  -u ( cos `  (
r  x.  z ) ) ) )
242241fveq2d 6195 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) ) `  z ) )  =  ( abs `  (
( G `  z
)  x.  -u ( cos `  ( r  x.  z ) ) ) ) )
243242ad4ant14 1293 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) ) `  z ) )  =  ( abs `  (
( G `  z
)  x.  -u ( cos `  ( r  x.  z ) ) ) ) )
244240abscld 14175 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( G `  z )  x.  -u ( cos `  ( r  x.  z ) ) ) )  e.  RR )
245244ad4ant14 1293 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( G `  z )  x.  -u ( cos `  ( r  x.  z ) ) ) )  e.  RR )
246231abscld 14175 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( G `  z
) )  e.  RR )
247246ad4ant14 1293 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( G `  z
) )  e.  RR )
248 simpllr 799 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  y  e.  RR )
249239abscld 14175 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  -u ( cos `  (
r  x.  z ) ) )  e.  RR )
250 1red 10055 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  1  e.  RR )
251231absge0d 14183 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  0  <_  ( abs `  ( G `
 z ) ) )
252237absnegd 14188 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( abs `  -u ( cos `  ( r  x.  z ) ) )  =  ( abs `  ( cos `  ( r  x.  z ) ) ) )
253 abscosbd 39490 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( r  x.  z )  e.  RR  ->  ( abs `  ( cos `  (
r  x.  z ) ) )  <_  1
)
254235, 253syl 17 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( abs `  ( cos `  ( r  x.  z ) ) )  <_  1 )
255252, 254eqbrtrd 4675 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( r  e.  RR  /\  z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( abs `  -u ( cos `  ( r  x.  z ) ) )  <_  1 )
256255adantll 750 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  -u ( cos `  (
r  x.  z ) ) )  <_  1
)
257249, 250, 246, 251, 256lemul2ad 10964 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( ( abs `  ( G `  z ) )  x.  ( abs `  -u ( cos `  ( r  x.  z ) ) ) )  <_  ( ( abs `  ( G `  z ) )  x.  1 ) )
258231, 239absmuld 14193 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( G `  z )  x.  -u ( cos `  ( r  x.  z ) ) ) )  =  ( ( abs `  ( G `
 z ) )  x.  ( abs `  -u ( cos `  ( r  x.  z ) ) ) ) )
259246recnd 10068 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( G `  z
) )  e.  CC )
260259mulid1d 10057 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( ( abs `  ( G `  z ) )  x.  1 )  =  ( abs `  ( G `
 z ) ) )
261260eqcomd 2628 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( G `  z
) )  =  ( ( abs `  ( G `  z )
)  x.  1 ) )
262257, 258, 2613brtr4d 4685 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( G `  z )  x.  -u ( cos `  ( r  x.  z ) ) ) )  <_  ( abs `  ( G `  z
) ) )
263262ad4ant14 1293 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( G `  z )  x.  -u ( cos `  ( r  x.  z ) ) ) )  <_  ( abs `  ( G `  z
) ) )
264 simpr 477 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  A. x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )
265 nfra1 2941 . . . . . . . . . . . . . . . . . . . . . . 23  |-  F/ x A. x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y
266195, 265nfan 1828 . . . . . . . . . . . . . . . . . . . . . 22  |-  F/ x
( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  ( ( RR  _D  D ) `
 x ) )  <_  y )
267199eqcomd 2628 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( abs `  ( G `  x ) )  =  ( abs `  (
( RR  _D  D
) `  x )
) )
268267adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  ( abs `  ( ( RR  _D  D ) `
 x ) )  <_  y )  -> 
( abs `  ( G `  x )
)  =  ( abs `  ( ( RR  _D  D ) `  x
) ) )
269 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  ( abs `  ( ( RR  _D  D ) `
 x ) )  <_  y )  -> 
( abs `  (
( RR  _D  D
) `  x )
)  <_  y )
270268, 269eqbrtrd 4675 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  ( abs `  ( ( RR  _D  D ) `
 x ) )  <_  y )  -> 
( abs `  ( G `  x )
)  <_  y )
271270ex 450 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( abs `  (
( RR  _D  D
) `  x )
)  <_  y  ->  ( abs `  ( G `
 x ) )  <_  y ) )
272271adantlr 751 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  ( ( RR  _D  D ) `
 x ) )  <_  y )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( ( abs `  (
( RR  _D  D
) `  x )
)  <_  y  ->  ( abs `  ( G `
 x ) )  <_  y ) )
273266, 272ralimdaa 2958 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  ( A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y  ->  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  ( G `
 x ) )  <_  y ) )
274264, 273mpd 15 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  A. x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  ( G `  x )
)  <_  y )
275215fveq2d 6195 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  z  ->  ( abs `  ( G `  x ) )  =  ( abs `  ( G `  z )
) )
276275breq1d 4663 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  =  z  ->  (
( abs `  ( G `  x )
)  <_  y  <->  ( abs `  ( G `  z
) )  <_  y
) )
277276cbvralv 3171 . . . . . . . . . . . . . . . . . . . 20  |-  ( A. x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ( abs `  ( G `  x
) )  <_  y  <->  A. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  ( G `
 z ) )  <_  y )
278274, 277sylib 208 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  A. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  ( G `  z )
)  <_  y )
279278ad4ant14 1293 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  A. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  ( G `  z )
)  <_  y )
280279r19.21bi 2932 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( G `  z
) )  <_  y
)
281245, 247, 248, 263, 280letrd 10194 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( G `  z )  x.  -u ( cos `  ( r  x.  z ) ) ) )  <_  y )
282243, 281eqbrtrd 4675 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  /\  z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( abs `  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) ) `  z ) )  <_ 
y )
283282ralrimiva 2966 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  A. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) ) ) `  z ) )  <_  y )
284131ffvelrnda 6359 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( RR  _D  D
) `  x )  e.  CC )
285284adantlr 751 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( ( RR  _D  D ) `  x )  e.  CC )
286 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( r  e.  RR  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
r  e.  RR )
28787adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( r  e.  RR  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  ->  x  e.  RR )
288286, 287remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( r  e.  RR  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( r  x.  x
)  e.  RR )
289288recnd 10068 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( r  e.  RR  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( r  x.  x
)  e.  CC )
290289coscld 14861 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( r  e.  RR  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( cos `  (
r  x.  x ) )  e.  CC )
291290negcld 10379 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( r  e.  RR  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  ->  -u ( cos `  (
r  x.  x ) )  e.  CC )
292291adantll 750 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  -u ( cos `  ( r  x.  x
) )  e.  CC )
293285, 292mulcld 10060 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  ->  ( (
( RR  _D  D
) `  x )  x.  -u ( cos `  (
r  x.  x ) ) )  e.  CC )
294293ralrimiva 2966 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) )  e.  CC )
295 dmmptg 5632 . . . . . . . . . . . . . . . . 17  |-  ( A. x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ( ( ( RR  _D  D
) `  x )  x.  -u ( cos `  (
r  x.  x ) ) )  e.  CC  ->  dom  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
296294, 295syl 17 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  dom  ( x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
297296ad2antrr 762 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  dom  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) )  =  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
298297raleqdv 3144 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  ( A. z  e. 
dom  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) ) ( abs `  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `  x
)  x.  -u ( cos `  ( r  x.  x ) ) ) ) `  z ) )  <_  y  <->  A. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) ) ) `  z ) )  <_  y )
)
299283, 298mpbird 247 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  /\  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )  ->  A. z  e.  dom  ( x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) ) ) ( abs `  (
( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) ) ) `  z ) )  <_  y )
300299ex 450 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  /\  y  e.  RR )  ->  ( A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y  ->  A. z  e.  dom  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `  x
)  x.  -u ( cos `  ( r  x.  x ) ) ) ) ( abs `  (
( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) ) ) `  z ) )  <_  y )
)
301300reximdva 3017 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  ( E. y  e.  RR  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  ( ( RR  _D  D ) `
 x ) )  <_  y  ->  E. y  e.  RR  A. z  e. 
dom  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) ) ( abs `  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `  x
)  x.  -u ( cos `  ( r  x.  x ) ) ) ) `  z ) )  <_  y )
)
302210, 301mpd 15 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  E. y  e.  RR  A. z  e. 
dom  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `
 x )  x.  -u ( cos `  (
r  x.  x ) ) ) ) ( abs `  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `  x
)  x.  -u ( cos `  ( r  x.  x ) ) ) ) `  z ) )  <_  y )
303174, 175, 194, 302cnbdibl 40178 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( ( RR  _D  D ) `  x
)  x.  -u ( cos `  ( r  x.  x ) ) ) )  e.  L^1 )
304303adantlr 751 . . . . . . . 8  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  RR )  ->  ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( ( RR 
_D  D ) `  x )  x.  -u ( cos `  ( r  x.  x ) ) ) )  e.  L^1 )
305284adantlr 751 . . . . . . . 8  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( ( RR  _D  D ) `  x
)  e.  CC )
306 simpr 477 . . . . . . . . . 10  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  r  e.  CC )  ->  r  e.  CC )
307180sseli 3599 . . . . . . . . . . 11  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  x  e.  CC )
308307ad2antlr 763 . . . . . . . . . 10  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  r  e.  CC )  ->  x  e.  CC )
309306, 308mulcld 10060 . . . . . . . . 9  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  r  e.  CC )  ->  ( r  x.  x
)  e.  CC )
310309coscld 14861 . . . . . . . 8  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  r  e.  CC )  ->  ( cos `  (
r  x.  x ) )  e.  CC )
311288ancoms 469 . . . . . . . . . 10  |-  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  r  e.  RR )  ->  ( r  x.  x
)  e.  RR )
312 abscosbd 39490 . . . . . . . . . 10  |-  ( ( r  x.  x )  e.  RR  ->  ( abs `  ( cos `  (
r  x.  x ) ) )  <_  1
)
313311, 312syl 17 . . . . . . . . 9  |-  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  r  e.  RR )  ->  ( abs `  ( cos `  ( r  x.  x ) ) )  <_  1 )
314313adantll 750 . . . . . . . 8  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  /\  r  e.  RR )  ->  ( abs `  ( cos `  ( r  x.  x ) ) )  <_  1 )
31563a1i 11 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  D  =  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) ) ) )
31614adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  ( Q `  i )  e.  RR )
317136adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  ( Q `  i )  <  ( Q `  (
i  +  1 ) ) )
318 eqcom 2629 . . . . . . . . . . . . . . . . . 18  |-  ( ( Q `  ( i  +  1 ) )  =  x  <->  x  =  ( Q `  ( i  +  1 ) ) )
319318biimpri 218 . . . . . . . . . . . . . . . . 17  |-  ( x  =  ( Q `  ( i  +  1 ) )  ->  ( Q `  ( i  +  1 ) )  =  x )
320319adantl 482 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  ( Q `  ( i  +  1 ) )  =  x )
321317, 320breqtrd 4679 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  ( Q `  i )  <  x )
322316, 321gtned 10172 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  x  =/=  ( Q `  i
) )
323322neneqd 2799 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  -.  x  =  ( Q `  i ) )
324323iffalsed 4097 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  =  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )
325 iftrue 4092 . . . . . . . . . . . . 13  |-  ( x  =  ( Q `  ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  =  L )
326325adantl 482 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  =  L )
327324, 326eqtrd 2656 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  (
i  +  1 ) ) )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  =  L )
32817leidd 10594 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  <_  ( Q `  ( i  +  1 ) ) )
32914, 17, 17, 137, 328eliccd 39726 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
330315, 327, 329, 24fvmptd 6288 . . . . . . . . . 10  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( D `  ( Q `  ( i  +  1 ) ) )  =  L )
331330, 25eqeltrd 2701 . . . . . . . . 9  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( D `  ( Q `  ( i  +  1 ) ) )  e.  CC )
332331adantr 481 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  ->  ( D `
 ( Q `  ( i  +  1 ) ) )  e.  CC )
333 eqid 2622 . . . . . . . 8  |-  ( abs `  ( D `  ( Q `  ( i  +  1 ) ) ) )  =  ( abs `  ( D `
 ( Q `  ( i  +  1 ) ) ) )
334 iftrue 4092 . . . . . . . . . . . 12  |-  ( x  =  ( Q `  i )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  =  R )
335334adantl 482 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( Q `  i
) )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  =  R )
33614rexrd 10089 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  RR* )
33717rexrd 10089 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR* )
338 lbicc2 12288 . . . . . . . . . . . 12  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  ( Q `  i )  <_  ( Q `  (
i  +  1 ) ) )  ->  ( Q `  i )  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
339336, 337, 137, 338syl3anc 1326 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
340315, 335, 339, 20fvmptd 6288 . . . . . . . . . 10  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( D `  ( Q `  i ) )  =  R )
341340, 21eqeltrd 2701 . . . . . . . . 9  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( D `  ( Q `  i ) )  e.  CC )
342341adantr 481 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  ->  ( D `
 ( Q `  i ) )  e.  CC )
343 eqid 2622 . . . . . . . 8  |-  ( abs `  ( D `  ( Q `  i )
) )  =  ( abs `  ( D `
 ( Q `  i ) ) )
344 eqid 2622 . . . . . . . 8  |-  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  _d x  =  S. ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) ( abs `  ( ( RR  _D  D ) `  x
) )  _d x
345 simpr 477 . . . . . . . . . 10  |-  ( (
ph  /\  e  e.  RR+ )  ->  e  e.  RR+ )
346 fourierdlem73.m . . . . . . . . . . . 12  |-  ( ph  ->  M  e.  NN )
347346nnrpd 11870 . . . . . . . . . . 11  |-  ( ph  ->  M  e.  RR+ )
348347adantr 481 . . . . . . . . . 10  |-  ( (
ph  /\  e  e.  RR+ )  ->  M  e.  RR+ )
349345, 348rpdivcld 11889 . . . . . . . . 9  |-  ( (
ph  /\  e  e.  RR+ )  ->  ( e  /  M )  e.  RR+ )
350349adantlr 751 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  ->  ( e  /  M )  e.  RR+ )
351 simpr 477 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  CC )  ->  r  e.  CC )
35217recnd 10068 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  CC )
353352ad2antrr 762 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  CC )  ->  ( Q `  (
i  +  1 ) )  e.  CC )
354351, 353mulcld 10060 . . . . . . . . 9  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  CC )  ->  ( r  x.  ( Q `  ( i  +  1 ) ) )  e.  CC )
355354coscld 14861 . . . . . . . 8  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  CC )  ->  ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  e.  CC )
35617adantr 481 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
357182, 356remulcld 10070 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
r  x.  ( Q `
 ( i  +  1 ) ) )  e.  RR )
358 abscosbd 39490 . . . . . . . . . 10  |-  ( ( r  x.  ( Q `
 ( i  +  1 ) ) )  e.  RR  ->  ( abs `  ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) ) )  <_  1
)
359357, 358syl 17 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  ( abs `  ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) ) )  <_  1
)
360359adantlr 751 . . . . . . . 8  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  RR )  ->  ( abs `  ( cos `  ( r  x.  ( Q `  (
i  +  1 ) ) ) ) )  <_  1 )
36114recnd 10068 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  CC )
362361ad2antrr 762 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  CC )  ->  ( Q `  i
)  e.  CC )
363351, 362mulcld 10060 . . . . . . . . 9  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  CC )  ->  ( r  x.  ( Q `  i )
)  e.  CC )
364363coscld 14861 . . . . . . . 8  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  CC )  ->  ( cos `  (
r  x.  ( Q `
 i ) ) )  e.  CC )
36514adantr 481 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  ( Q `  i )  e.  RR )
366182, 365remulcld 10070 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  (
r  x.  ( Q `
 i ) )  e.  RR )
367 abscosbd 39490 . . . . . . . . . 10  |-  ( ( r  x.  ( Q `
 i ) )  e.  RR  ->  ( abs `  ( cos `  (
r  x.  ( Q `
 i ) ) ) )  <_  1
)
368366, 367syl 17 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR )  ->  ( abs `  ( cos `  (
r  x.  ( Q `
 i ) ) ) )  <_  1
)
369368adantlr 751 . . . . . . . 8  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  /\  r  e.  RR )  ->  ( abs `  ( cos `  ( r  x.  ( Q `  i
) ) ) )  <_  1 )
370 fveq2 6191 . . . . . . . . . . . . . . 15  |-  ( z  =  x  ->  (
( RR  _D  D
) `  z )  =  ( ( RR 
_D  D ) `  x ) )
371370fveq2d 6195 . . . . . . . . . . . . . 14  |-  ( z  =  x  ->  ( abs `  ( ( RR 
_D  D ) `  z ) )  =  ( abs `  (
( RR  _D  D
) `  x )
) )
372371cbvitgv 23543 . . . . . . . . . . . . 13  |-  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  z )
)  _d z  =  S. ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) ( abs `  ( ( RR  _D  D ) `  x
) )  _d x
373372oveq2i 6661 . . . . . . . . . . . 12  |-  ( ( ( abs `  ( D `  ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `  ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  z )
)  _d z )  =  ( ( ( abs `  ( D `
 ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `  ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  _d x )
374373oveq1i 6660 . . . . . . . . . . 11  |-  ( ( ( ( abs `  ( D `  ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `  ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  z )
)  _d z )  /  ( e  /  M ) )  =  ( ( ( ( abs `  ( D `
 ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `  ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  _d x )  /  ( e  /  M ) )
375374oveq1i 6660 . . . . . . . . . 10  |-  ( ( ( ( ( abs `  ( D `  ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `
 ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  z )
)  _d z )  /  ( e  /  M ) )  +  1 )  =  ( ( ( ( ( abs `  ( D `
 ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `  ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  _d x )  /  ( e  /  M ) )  +  1 )
376375fveq2i 6194 . . . . . . . . 9  |-  ( |_
`  ( ( ( ( ( abs `  ( D `  ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `  ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  z )
)  _d z )  /  ( e  /  M ) )  +  1 ) )  =  ( |_ `  (
( ( ( ( abs `  ( D `
 ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `  ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  _d x )  /  ( e  /  M ) )  +  1 ) )
377376oveq1i 6660 . . . . . . . 8  |-  ( ( |_ `  ( ( ( ( ( abs `  ( D `  ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `
 ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  z )
)  _d z )  /  ( e  /  M ) )  +  1 ) )  +  1 )  =  ( ( |_ `  (
( ( ( ( abs `  ( D `
 ( Q `  ( i  +  1 ) ) ) )  +  ( abs `  ( D `  ( Q `  i ) ) ) )  +  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  _d x )  /  ( e  /  M ) )  +  1 ) )  +  1 )
378173, 304, 305, 310, 314, 332, 333, 342, 343, 344, 350, 355, 360, 364, 369, 377fourierdlem47 40370 . . . . . . 7  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  ->  E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  (
( ( ( D `
 ( Q `  ( i  +  1 ) ) )  x.  -u ( ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  /  r ) )  -  ( ( D `  ( Q `
 i ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  i )
) )  /  r
) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) )  <  ( e  /  M ) )
379 simplll 798 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  m  e.  NN )  /\  r  e.  (
m (,) +oo )
)  ->  ph )
380 simpllr 799 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  m  e.  NN )  /\  r  e.  (
m (,) +oo )
)  ->  i  e.  ( 0..^ M ) )
381 elioore 12205 . . . . . . . . . . . . . . . 16  |-  ( r  e.  ( m (,) +oo )  ->  r  e.  RR )
382381adantl 482 . . . . . . . . . . . . . . 15  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  -> 
r  e.  RR )
383 0red 10041 . . . . . . . . . . . . . . . 16  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  -> 
0  e.  RR )
384 nnre 11027 . . . . . . . . . . . . . . . . 17  |-  ( m  e.  NN  ->  m  e.  RR )
385384adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  ->  m  e.  RR )
386 nngt0 11049 . . . . . . . . . . . . . . . . 17  |-  ( m  e.  NN  ->  0  <  m )
387386adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  -> 
0  <  m )
388385rexrd 10089 . . . . . . . . . . . . . . . . 17  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  ->  m  e.  RR* )
389 pnfxr 10092 . . . . . . . . . . . . . . . . . 18  |- +oo  e.  RR*
390389a1i 11 . . . . . . . . . . . . . . . . 17  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  -> +oo  e.  RR* )
391 simpr 477 . . . . . . . . . . . . . . . . 17  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  -> 
r  e.  ( m (,) +oo ) )
392 ioogtlb 39717 . . . . . . . . . . . . . . . . 17  |-  ( ( m  e.  RR*  /\ +oo  e.  RR*  /\  r  e.  ( m (,) +oo ) )  ->  m  <  r )
393388, 390, 391, 392syl3anc 1326 . . . . . . . . . . . . . . . 16  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  ->  m  <  r )
394383, 385, 382, 387, 393lttrd 10198 . . . . . . . . . . . . . . 15  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  -> 
0  <  r )
395382, 394elrpd 11869 . . . . . . . . . . . . . 14  |-  ( ( m  e.  NN  /\  r  e.  ( m (,) +oo ) )  -> 
r  e.  RR+ )
396395adantll 750 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  m  e.  NN )  /\  r  e.  (
m (,) +oo )
)  ->  r  e.  RR+ )
39714adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  ( Q `
 i )  e.  RR )
39817adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  ( Q `
 ( i  +  1 ) )  e.  RR )
39964ffvelrnda 6359 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( D `  x )  e.  CC )
400399adantlr 751 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( D `  x
)  e.  CC )
401 rpcn 11841 . . . . . . . . . . . . . . . . . . 19  |-  ( r  e.  RR+  ->  r  e.  CC )
402401ad2antlr 763 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
r  e.  CC )
40335recnd 10068 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  CC )
404403adantlr 751 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  ->  x  e.  CC )
405402, 404mulcld 10060 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( r  x.  x
)  e.  CC )
406405sincld 14860 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( sin `  (
r  x.  x ) )  e.  CC )
407400, 406mulcld 10060 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( ( D `  x )  x.  ( sin `  ( r  x.  x ) ) )  e.  CC )
408397, 398, 407itgioo 23582 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( ( D `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )
409137adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  ( Q `
 i )  <_ 
( Q `  (
i  +  1 ) ) )
41064feqmptd 6249 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  D  =  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  ( D `  x ) ) )
411 iftrue 4092 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  ( Q `  ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  =  L )
412325, 411eqtr4d 2659 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( Q `  ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  =  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) )
413412adantl 482 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  x  =  ( Q `  ( i  +  1 ) ) )  ->  if (
x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) )  =  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
) ) )
414 iffalse 4095 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( -.  x  =  ( Q `
 ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) )
415414adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) )
41645ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( Q `  i
)  e.  RR* )
41746ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( Q `  (
i  +  1 ) )  e.  RR* )
41835ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  e.  RR )
41914ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  ( Q `  i )  e.  RR )
42035adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  x  e.  RR )
42148adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  ( Q `  i )  <_  x
)
422 neqne 2802 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( -.  x  =  ( Q `
 i )  ->  x  =/=  ( Q `  i ) )
423422adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  x  =/=  ( Q `  i ) )
424419, 420, 421, 423leneltd 10191 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  ( Q `  i )  <  x
)
425424adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( Q `  i
)  <  x )
42635adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  e.  RR )
42717ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
42851adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  <_  ( Q `  ( i  +  1 ) ) )
429318biimpi 206 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( Q `  ( i  +  1 ) )  =  x  ->  x  =  ( Q `  ( i  +  1 ) ) )
430429necon3bi 2820 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( -.  x  =  ( Q `
 ( i  +  1 ) )  -> 
( Q `  (
i  +  1 ) )  =/=  x )
431430adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  ( Q `  ( i  +  1 ) )  =/=  x
)
432426, 427, 428, 431leneltd 10191 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  <  ( Q `  ( i  +  1 ) ) )
433432adantlr 751 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  <  ( Q `  ( i  +  1 ) ) )
434416, 417, 418, 425, 433eliood 39720 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )
435 fvres 6207 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  (
( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x )  =  ( F `  x ) )
436434, 435syl 17 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
)  =  ( F `
 x ) )
437 iffalse 4095 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( -.  x  =  ( Q `
 ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  =  ( F `
 x ) )
438437eqcomd 2628 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( -.  x  =  ( Q `
 ( i  +  1 ) )  -> 
( F `  x
)  =  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )
439438adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( F `  x
)  =  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )
440415, 436, 4393eqtrrd 2661 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  =  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) )
441413, 440pm2.61dan 832 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  if (
x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) )  =  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
) ) )
442441ifeq2da 4117 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  =  if ( x  =  ( Q `
 i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) ) )
443442mpteq2dva 4744 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  (
i  +  1 ) ) ,  L , 
( F `  x
) ) ) )  =  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
) ) ) ) )
444315, 410, 4433eqtr3d 2664 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  ( D `  x ) )  =  ( x  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( Q `  i
) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) )
445 eqid 2622 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  |->  if ( x  =  ( Q `
 i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) ) )  =  ( x  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  |->  if ( x  =  ( Q `
 i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) ) )
446 fourierdlem73.fcn . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
447195, 445, 14, 17, 446, 24, 20cncfiooicc 40107 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
) ) ) )  e.  ( ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
448444, 447eqeltrd 2701 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  ( D `  x ) )  e.  ( ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
449410, 448eqeltrd 2701 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  D  e.  ( ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
450449adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  D  e.  ( ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
451 eqid 2622 . . . . . . . . . . . . . . 15  |-  ( RR 
_D  D )  =  ( RR  _D  D
)
452129, 1eqeltrd 2701 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( RR  _D  D )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
453452adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  ( RR 
_D  D )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
454209adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  E. y  e.  RR  A. x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( abs `  (
( RR  _D  D
) `  x )
)  <_  y )
455 simpr 477 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  r  e.  RR+ )
456397, 398, 409, 450, 451, 453, 454, 455fourierdlem39 40363 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( ( D `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  =  ( ( ( ( D `
 ( Q `  ( i  +  1 ) ) )  x.  -u ( ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  /  r ) )  -  ( ( D `  ( Q `
 i ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  i )
) )  /  r
) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) )
457408, 456eqtr3d 2658 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  RR+ )  ->  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( D `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  =  ( ( ( ( D `
 ( Q `  ( i  +  1 ) ) )  x.  -u ( ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  /  r ) )  -  ( ( D `  ( Q `
 i ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  i )
) )  /  r
) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) )
458379, 380, 396, 457syl21anc 1325 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  m  e.  NN )  /\  r  e.  (
m (,) +oo )
)  ->  S. (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( D `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  =  ( ( ( ( D `
 ( Q `  ( i  +  1 ) ) )  x.  -u ( ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  /  r ) )  -  ( ( D `  ( Q `
 i ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  i )
) )  /  r
) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) )
459458fveq2d 6195 . . . . . . . . . . 11  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  m  e.  NN )  /\  r  e.  (
m (,) +oo )
)  ->  ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( D `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  =  ( abs `  ( ( ( ( D `  ( Q `
 ( i  +  1 ) ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  ( i  +  1 ) ) ) )  /  r
) )  -  (
( D `  ( Q `  i )
)  x.  -u (
( cos `  (
r  x.  ( Q `
 i ) ) )  /  r ) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) ) )
460459breq1d 4663 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  m  e.  NN )  /\  r  e.  (
m (,) +oo )
)  ->  ( ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )  <  (
e  /  M )  <-> 
( abs `  (
( ( ( D `
 ( Q `  ( i  +  1 ) ) )  x.  -u ( ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  /  r ) )  -  ( ( D `  ( Q `
 i ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  i )
) )  /  r
) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) )  <  ( e  /  M ) ) )
461460ralbidva 2985 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  m  e.  NN )  ->  ( A. r  e.  (
m (,) +oo )
( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  A. r  e.  ( m (,) +oo ) ( abs `  (
( ( ( D `
 ( Q `  ( i  +  1 ) ) )  x.  -u ( ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  /  r ) )  -  ( ( D `  ( Q `
 i ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  i )
) )  /  r
) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) )  <  ( e  /  M ) ) )
462461rexbidva 3049 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  (
( ( ( D `
 ( Q `  ( i  +  1 ) ) )  x.  -u ( ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  /  r ) )  -  ( ( D `  ( Q `
 i ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  i )
) )  /  r
) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) )  <  ( e  /  M ) ) )
463462adantr 481 . . . . . . 7  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  ->  ( E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( D `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  (
( ( ( D `
 ( Q `  ( i  +  1 ) ) )  x.  -u ( ( cos `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) )  /  r ) )  -  ( ( D `  ( Q `
 i ) )  x.  -u ( ( cos `  ( r  x.  ( Q `  i )
) )  /  r
) ) )  -  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( ( RR  _D  D ) `
 x )  x.  -u ( ( cos `  (
r  x.  x ) )  /  r ) )  _d x ) )  <  ( e  /  M ) ) )
464378, 463mpbird 247 . . . . . 6  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  e  e.  RR+ )  ->  E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
465464an32s 846 . . . . 5  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
46694oveq1d 6665 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  =  ( ( D `  x )  x.  ( sin `  ( r  x.  x ) ) ) )
467466itgeq2dv 23548 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  =  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( ( D `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )
468467eqcomd 2628 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( D `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  =  S. ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )
469468adantr 481 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  ->  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x  =  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )
47014adantr 481 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  ->  ( Q `  i )  e.  RR )
47117adantr 481 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
472399adantlr 751 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( D `  x
)  e.  CC )
473381recnd 10068 . . . . . . . . . . . . . . . 16  |-  ( r  e.  ( m (,) +oo )  ->  r  e.  CC )
474473ad2antlr 763 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
r  e.  CC )
475403adantlr 751 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  ->  x  e.  CC )
476474, 475mulcld 10060 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( r  x.  x
)  e.  CC )
477476sincld 14860 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( sin `  (
r  x.  x ) )  e.  CC )
478472, 477mulcld 10060 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( ( D `  x )  x.  ( sin `  ( r  x.  x ) ) )  e.  CC )
479470, 471, 478itgioo 23582 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  ->  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )
48060adantlr 751 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( F `  x
)  e.  CC )
481480, 477mulcld 10060 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  e.  CC )
482470, 471, 481itgioo 23582 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  ->  S. ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )
483469, 479, 4823eqtr3d 2664 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  ->  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )
484483fveq2d 6195 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  ->  ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )  =  ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x ) )
485484breq1d 4663 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  r  e.  ( m (,) +oo ) )  ->  (
( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) ) )
486485ralbidva 2985 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) ) )
487486adantlr 751 . . . . . 6  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( D `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) ) )
488487rexbidv 3052 . . . . 5  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( D `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) ) )
489465, 488mpbid 222 . . . 4  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
490489ralrimiva 2966 . . 3  |-  ( (
ph  /\  e  e.  RR+ )  ->  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )
491490ralrimiva 2966 . 2  |-  ( ph  ->  A. e  e.  RR+  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
492 nfv 1843 . . . . . . 7  |-  F/ i ( ph  /\  e  e.  RR+ )
493 nfra1 2941 . . . . . . 7  |-  F/ i A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )
494492, 493nfan 1828 . . . . . 6  |-  F/ i ( ( ph  /\  e  e.  RR+ )  /\  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
495 nfv 1843 . . . . . . 7  |-  F/ r ( ph  /\  e  e.  RR+ )
496 nfcv 2764 . . . . . . . 8  |-  F/_ r
( 0..^ M )
497 nfcv 2764 . . . . . . . . 9  |-  F/_ r NN
498 nfra1 2941 . . . . . . . . 9  |-  F/ r A. r  e.  ( m (,) +oo )
( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )
499497, 498nfrex 3007 . . . . . . . 8  |-  F/ r E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
)
500496, 499nfral 2945 . . . . . . 7  |-  F/ r A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )
501495, 500nfan 1828 . . . . . 6  |-  F/ r ( ( ph  /\  e  e.  RR+ )  /\  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
502 nfmpt1 4747 . . . . . 6  |-  F/_ i
( i  e.  ( 0..^ M )  |-> inf ( { m  e.  NN  |  A. r  e.  ( m (,) +oo )
( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) } ,  RR ,  <  ) )
503 fzofi 12773 . . . . . . 7  |-  ( 0..^ M )  e.  Fin
504503a1i 11 . . . . . 6  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  ->  ( 0..^ M )  e.  Fin )
505 simpr 477 . . . . . 6  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  ->  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
506 eqid 2622 . . . . . 6  |-  { m  e.  NN  |  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) }  =  { m  e.  NN  |  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) }
507 eqid 2622 . . . . . 6  |-  ( i  e.  ( 0..^ M )  |-> inf ( { m  e.  NN  |  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) } ,  RR ,  <  ) )  =  ( i  e.  ( 0..^ M )  |-> inf ( { m  e.  NN  |  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) } ,  RR ,  <  ) )
508 eqid 2622 . . . . . 6  |-  sup ( ran  ( i  e.  ( 0..^ M )  |-> inf ( { m  e.  NN  |  A. r  e.  ( m (,) +oo )
( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) } ,  RR ,  <  ) ) ,  RR ,  <  )  =  sup ( ran  ( i  e.  ( 0..^ M )  |-> inf ( { m  e.  NN  |  A. r  e.  ( m (,) +oo )
( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) } ,  RR ,  <  ) ) ,  RR ,  <  )
509494, 501, 502, 504, 505, 506, 507, 508fourierdlem31 40355 . . . . 5  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  ->  E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
510 simpr 477 . . . . . 6  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  ->  E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )
511 nfv 1843 . . . . . . . 8  |-  F/ n
( ph  /\  e  e.  RR+ )
512 nfre1 3005 . . . . . . . 8  |-  F/ n E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )
513511, 512nfan 1828 . . . . . . 7  |-  F/ n
( ( ph  /\  e  e.  RR+ )  /\  E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
514 nfv 1843 . . . . . . . . . . 11  |-  F/ r  n  e.  NN
515 nfra1 2941 . . . . . . . . . . 11  |-  F/ r A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
)
516495, 514, 515nf3an 1831 . . . . . . . . . 10  |-  F/ r ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
517 simpll 790 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  ph )
518 elioore 12205 . . . . . . . . . . . . . . . . . . . 20  |-  ( r  e.  ( n (,) +oo )  ->  r  e.  RR )
519518adantl 482 . . . . . . . . . . . . . . . . . . 19  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  -> 
r  e.  RR )
520 0red 10041 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  -> 
0  e.  RR )
521 nnre 11027 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  e.  NN  ->  n  e.  RR )
522521adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  ->  n  e.  RR )
523 nngt0 11049 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  e.  NN  ->  0  <  n )
524523adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  -> 
0  <  n )
525522rexrd 10089 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  ->  n  e.  RR* )
526389a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  -> +oo  e.  RR* )
527 simpr 477 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  -> 
r  e.  ( n (,) +oo ) )
528 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  RR*  /\ +oo  e.  RR*  /\  r  e.  ( n (,) +oo ) )  ->  n  <  r )
529525, 526, 527, 528syl3anc 1326 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  ->  n  <  r )
530520, 522, 519, 524, 529lttrd 10198 . . . . . . . . . . . . . . . . . . 19  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  -> 
0  <  r )
531519, 530elrpd 11869 . . . . . . . . . . . . . . . . . 18  |-  ( ( n  e.  NN  /\  r  e.  ( n (,) +oo ) )  -> 
r  e.  RR+ )
532531adantll 750 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  r  e.  RR+ )
5337adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  r  e.  RR+ )  ->  A  e.  RR )
5348adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  r  e.  RR+ )  ->  B  e.  RR )
53527ffvelrnda 6359 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  x  e.  ( A [,] B ) )  ->  ( F `  x )  e.  CC )
536535adantlr 751 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( A [,] B
) )  ->  ( F `  x )  e.  CC )
537401ad2antlr 763 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( A [,] B
) )  ->  r  e.  CC )
5389sselda 3603 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  x  e.  ( A [,] B ) )  ->  x  e.  RR )
539538recnd 10068 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
ph  /\  x  e.  ( A [,] B ) )  ->  x  e.  CC )
540539adantlr 751 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( A [,] B
) )  ->  x  e.  CC )
541537, 540mulcld 10060 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( A [,] B
) )  ->  (
r  x.  x )  e.  CC )
542541sincld 14860 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( A [,] B
) )  ->  ( sin `  ( r  x.  x ) )  e.  CC )
543536, 542mulcld 10060 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( A [,] B
) )  ->  (
( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  e.  CC )
544533, 534, 543itgioo 23582 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  r  e.  RR+ )  ->  S. ( A (,) B ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  =  S. ( A [,] B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )
545 fourierdlem73.q0 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ph  ->  ( Q `  0
)  =  A )
546545eqcomd 2628 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  A  =  ( Q `
 0 ) )
547 fourierdlem73.qm . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ph  ->  ( Q `  M
)  =  B )
548547eqcomd 2628 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  B  =  ( Q `
 M ) )
549546, 548oveq12d 6668 . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  ( A [,] B
)  =  ( ( Q `  0 ) [,] ( Q `  M ) ) )
550549adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  r  e.  RR+ )  ->  ( A [,] B )  =  ( ( Q `  0
) [,] ( Q `
 M ) ) )
551550itgeq1d 40172 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  r  e.  RR+ )  ->  S. ( A [,] B ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  =  S. ( ( Q `  0
) [,] ( Q `
 M ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )
552 0zd 11389 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  r  e.  RR+ )  ->  0  e.  ZZ )
553 nnuz 11723 . . . . . . . . . . . . . . . . . . . . . 22  |-  NN  =  ( ZZ>= `  1 )
554 0p1e1 11132 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( 0  +  1 )  =  1
555554fveq2i 6194 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ZZ>= `  ( 0  +  1 ) )  =  (
ZZ>= `  1 )
556553, 555eqtr4i 2647 . . . . . . . . . . . . . . . . . . . . 21  |-  NN  =  ( ZZ>= `  ( 0  +  1 ) )
557346, 556syl6eleq 2711 . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  M  e.  ( ZZ>= `  ( 0  +  1 ) ) )
558557adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  r  e.  RR+ )  ->  M  e.  ( ZZ>= `  ( 0  +  1 ) ) )
55910adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  r  e.  RR+ )  ->  Q :
( 0 ... M
) --> RR )
560136adantlr 751 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  <  ( Q `  ( i  +  1 ) ) )
561 simpr 477 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( (
ph  /\  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )  ->  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )
562549eqcomd 2628 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ph  ->  ( ( Q ` 
0 ) [,] ( Q `  M )
)  =  ( A [,] B ) )
563562adantr 481 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( (
ph  /\  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )  ->  (
( Q `  0
) [,] ( Q `
 M ) )  =  ( A [,] B ) )
564561, 563eleqtrd 2703 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )  ->  x  e.  ( A [,] B
) )
565564adantlr 751 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )  ->  x  e.  ( A [,] B
) )
566565, 543syldan 487 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )  ->  (
( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  e.  CC )
56714adantlr 751 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  RR )
56817adantlr 751 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
569106, 103sstrd 3613 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  C_  ( A [,] B ) )
570113, 569feqresmpt 6250 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) ) )
571570, 446eqeltrrd 2702 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
572571adantlr 751 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
573 sincn 24198 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  sin  e.  ( CC -cn-> CC )
574573a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  sin  e.  ( CC -cn-> CC ) )
575180a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( (
ph  /\  r  e.  RR+ )  ->  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) )  C_  CC )
576401adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( (
ph  /\  r  e.  RR+ )  ->  r  e.  CC )
577184a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( (
ph  /\  r  e.  RR+ )  ->  CC  C_  CC )
578575, 576, 577constcncfg 40084 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
ph  /\  r  e.  RR+ )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  r )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
579189adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
ph  /\  r  e.  RR+ )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  x )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
580578, 579mulcncf 23215 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  r  e.  RR+ )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( r  x.  x ) )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
581580adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( r  x.  x ) )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
582574, 581cncfmpt1f 22716 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( sin `  (
r  x.  x ) ) )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
583572, 582mulcncf 23215 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) ) )  e.  ( ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) -cn-> CC ) )
584 eqid 2622 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  |->  ( F `
 x ) )  =  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) )
585 eqid 2622 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  |->  ( sin `  ( r  x.  x
) ) )  =  ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( sin `  (
r  x.  x ) ) )
586 eqid 2622 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  |->  ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) ) )  =  ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) ) )
58727ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  F : ( A [,] B ) --> CC )
58836ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  A  e.  RR* )
58938ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  B  e.  RR* )
5906ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  Q : ( 0 ... M ) --> ( A [,] B ) )
591 simplr 792 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  i  e.  ( 0..^ M ) )
592588, 589, 590, 591, 72fourierdlem1 40325 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  ( A [,] B
) )
593587, 592ffvelrnd 6360 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( F `  x )  e.  CC )
594593adantllr 755 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( F `  x
)  e.  CC )
595576ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
r  e.  CC )
596307adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  ->  x  e.  CC )
597595, 596mulcld 10060 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( r  x.  x
)  e.  CC )
598597sincld 14860 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) )  -> 
( sin `  (
r  x.  x ) )  e.  CC )
599570oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) lim CC  ( Q `  ( i  +  1 ) ) )  =  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) ) lim CC  ( Q `
 ( i  +  1 ) ) ) )
60024, 599eleqtrd 2703 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( F `  x
) ) lim CC  ( Q `  ( i  +  1 ) ) ) )
601600adantlr 751 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  L  e.  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) ) lim CC  ( Q `  ( i  +  1 ) ) ) )
602 rpre 11839 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( r  e.  RR+  ->  r  e.  RR )
603602adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( r  e.  RR+  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  r  e.  RR )
60487adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( r  e.  RR+  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
605603, 604remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( r  e.  RR+  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
r  x.  x )  e.  RR )
606605adantll 750 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
r  x.  x )  e.  RR )
607606ad2ant2r 783 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  ( x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )  /\  ( r  x.  x )  =/=  (
r  x.  ( Q `
 ( i  +  1 ) ) ) ) )  ->  (
r  x.  x )  e.  RR )
608 recn 10026 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( y  e.  RR  ->  y  e.  CC )
609608sincld 14860 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( y  e.  RR  ->  ( sin `  y )  e.  CC )
610609adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  y  e.  RR )  ->  ( sin `  y
)  e.  CC )
611 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  |->  r )  =  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  r )
612 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  |->  x )  =  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  x )
613 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  |->  ( r  x.  x ) )  =  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( r  x.  x ) )
614180a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) )  C_  CC )
615576adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  r  e.  CC )
616568recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  CC )
617611, 614, 615, 616constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  r  e.  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  r ) lim CC  ( Q `  ( i  +  1 ) ) ) )
618614, 612, 616idlimc 39858 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  x ) lim CC  ( Q `  ( i  +  1 ) ) ) )
619611, 612, 613, 595, 596, 617, 618mullimc 39848 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( r  x.  ( Q `  (
i  +  1 ) ) )  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( r  x.  x
) ) lim CC  ( Q `  ( i  +  1 ) ) ) )
620 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( y  e.  CC  |->  ( sin `  y ) )  =  ( y  e.  CC  |->  ( sin `  y ) )
621 sinf 14854 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  sin : CC
--> CC
622621a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( T. 
->  sin : CC --> CC )
623622feqmptd 6249 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( T. 
->  sin  =  ( y  e.  CC  |->  ( sin `  y ) ) )
624623, 573syl6eqelr 2710 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( T. 
->  ( y  e.  CC  |->  ( sin `  y ) )  e.  ( CC
-cn-> CC ) )
6254a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( T. 
->  RR  C_  CC )
626 resincl 14870 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( y  e.  RR  ->  ( sin `  y )  e.  RR )
627626adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( T.  /\  y  e.  RR )  ->  ( sin `  y )  e.  RR )
628620, 624, 625, 625, 627cncfmptssg 40083 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  ( y  e.  RR  |->  ( sin `  y ) )  e.  ( RR
-cn-> RR ) )
629628trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( y  e.  RR  |->  ( sin `  y ) )  e.  ( RR -cn-> RR )
630629a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( y  e.  RR  |->  ( sin `  y
) )  e.  ( RR -cn-> RR ) )
631602ad2antlr 763 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  r  e.  RR )
632631, 568remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( r  x.  ( Q `  (
i  +  1 ) ) )  e.  RR )
633 fveq2 6191 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( y  =  ( r  x.  ( Q `  (
i  +  1 ) ) )  ->  ( sin `  y )  =  ( sin `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) ) )
634630, 632, 633cnmptlimc 23654 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( sin `  ( r  x.  ( Q `  ( i  +  1 ) ) ) )  e.  ( ( y  e.  RR  |->  ( sin `  y ) ) lim CC  ( r  x.  ( Q `  ( i  +  1 ) ) ) ) )
635 fveq2 6191 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( y  =  ( r  x.  x )  ->  ( sin `  y )  =  ( sin `  (
r  x.  x ) ) )
636 fveq2 6191 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( r  x.  x )  =  ( r  x.  ( Q `  (
i  +  1 ) ) )  ->  ( sin `  ( r  x.  x ) )  =  ( sin `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) ) )
637636ad2antll 765 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  ( x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )  /\  ( r  x.  x )  =  ( r  x.  ( Q `
 ( i  +  1 ) ) ) ) )  ->  ( sin `  ( r  x.  x ) )  =  ( sin `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) ) )
638607, 610, 619, 634, 635, 637limcco 23657 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( sin `  ( r  x.  ( Q `  ( i  +  1 ) ) ) )  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( sin `  (
r  x.  x ) ) ) lim CC  ( Q `  ( i  +  1 ) ) ) )
639584, 585, 586, 594, 598, 601, 638mullimc 39848 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( L  x.  ( sin `  (
r  x.  ( Q `
 ( i  +  1 ) ) ) ) )  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) ) ) lim CC  ( Q `
 ( i  +  1 ) ) ) )
640570oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) lim CC  ( Q `  i )
)  =  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) ) lim CC  ( Q `
 i ) ) )
64120, 640eleqtrd 2703 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( F `  x
) ) lim CC  ( Q `  i )
) )
642641adantlr 751 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  R  e.  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) ) lim CC  ( Q `  i ) ) )
643606ad2ant2r 783 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  ( x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )  /\  ( r  x.  x )  =/=  (
r  x.  ( Q `
 i ) ) ) )  ->  (
r  x.  x )  e.  RR )
644567recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  CC )
645611, 614, 615, 644constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  r  e.  ( ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  r ) lim CC  ( Q `  i ) ) )
646614, 612, 644idlimc 39858 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  x ) lim CC  ( Q `  i )
) )
647611, 612, 613, 595, 596, 645, 646mullimc 39848 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( r  x.  ( Q `  i
) )  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( r  x.  x
) ) lim CC  ( Q `  i )
) )
648631, 567remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( r  x.  ( Q `  i
) )  e.  RR )
649 fveq2 6191 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( y  =  ( r  x.  ( Q `  i
) )  ->  ( sin `  y )  =  ( sin `  (
r  x.  ( Q `
 i ) ) ) )
650630, 648, 649cnmptlimc 23654 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( sin `  ( r  x.  ( Q `  i )
) )  e.  ( ( y  e.  RR  |->  ( sin `  y ) ) lim CC  ( r  x.  ( Q `  i ) ) ) )
651 fveq2 6191 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( r  x.  x )  =  ( r  x.  ( Q `  i
) )  ->  ( sin `  ( r  x.  x ) )  =  ( sin `  (
r  x.  ( Q `
 i ) ) ) )
652651ad2antll 765 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  ( x  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) )  /\  ( r  x.  x )  =  ( r  x.  ( Q `
 i ) ) ) )  ->  ( sin `  ( r  x.  x ) )  =  ( sin `  (
r  x.  ( Q `
 i ) ) ) )
653643, 610, 647, 650, 635, 652limcco 23657 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( sin `  ( r  x.  ( Q `  i )
) )  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( sin `  (
r  x.  x ) ) ) lim CC  ( Q `  i )
) )
654584, 585, 586, 594, 598, 642, 653mullimc 39848 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( R  x.  ( sin `  (
r  x.  ( Q `
 i ) ) ) )  e.  ( ( x  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) 
|->  ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) ) ) lim CC  ( Q `
 i ) ) )
655567, 568, 583, 639, 654iblcncfioo 40194 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) ) )  e.  L^1 )
656 simpll 790 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( ph  /\  r  e.  RR+ ) )
65759adantllr 755 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  ->  x  e.  ( A [,] B ) )
658656, 657, 543syl2anc 693 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  e.  CC )
659567, 568, 655, 658ibliooicc 40187 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  r  e.  RR+ )  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) ) )  e.  L^1 )
660552, 558, 559, 560, 566, 659itgspltprt 40195 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  r  e.  RR+ )  ->  S. (
( Q `  0
) [,] ( Q `
 M ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  =  sum_ i  e.  ( 0..^ M ) S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )
661544, 551, 6603eqtrd 2660 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  r  e.  RR+ )  ->  S. ( A (,) B ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  =  sum_ i  e.  ( 0..^ M ) S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )
662517, 532, 661syl2anc 693 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  =  sum_ i  e.  ( 0..^ M ) S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )
663503a1i 11 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  (
0..^ M )  e. 
Fin )
66460adantllr 755 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  r  e.  ( n (,) +oo ) )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( F `  x
)  e.  CC )
665518recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( r  e.  ( n (,) +oo )  ->  r  e.  CC )
666665adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
ph  /\  r  e.  ( n (,) +oo ) )  ->  r  e.  CC )
667666ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  r  e.  ( n (,) +oo ) )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
r  e.  CC )
668403adantllr 755 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  r  e.  ( n (,) +oo ) )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  ->  x  e.  CC )
669667, 668mulcld 10060 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  r  e.  ( n (,) +oo ) )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( r  x.  x
)  e.  CC )
670669sincld 14860 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  r  e.  ( n (,) +oo ) )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( sin `  (
r  x.  x ) )  e.  CC )
671664, 670mulcld 10060 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  r  e.  ( n (,) +oo ) )  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  -> 
( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  e.  CC )
672671adantlllr 39199 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo )
)  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )  ->  ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  e.  CC )
673 simplll 798 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  /\  i  e.  ( 0..^ M ) )  ->  ph )
674532adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  /\  i  e.  ( 0..^ M ) )  ->  r  e.  RR+ )
675 simpr 477 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  /\  i  e.  ( 0..^ M ) )  ->  i  e.  ( 0..^ M ) )
676673, 674, 675, 659syl21anc 1325 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) ) )  e.  L^1 )
677672, 676itgcl 23550 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  e.  CC )
678663, 677fsumcl 14464 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  sum_ i  e.  ( 0..^ M ) S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x  e.  CC )
679662, 678eqeltrd 2701 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  e.  CC )
680679adantllr 755 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  ->  S. ( A (,) B ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  e.  CC )
6816803adantl3 1219 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  S. ( A (,) B ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  e.  CC )
682681abscld 14175 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  e.  RR )
683677abscld 14175 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  /\  i  e.  ( 0..^ M ) )  ->  ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  e.  RR )
684663, 683fsumrecl 14465 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  e.  RR )
685684adantllr 755 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  ->  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  e.  RR )
6866853adantl3 1219 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  e.  RR )
687 rpre 11839 . . . . . . . . . . . . . 14  |-  ( e  e.  RR+  ->  e  e.  RR )
688687ad2antlr 763 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  r  e.  ( n (,) +oo ) )  ->  e  e.  RR )
6896883ad2antl1 1223 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  e  e.  RR )
690662fveq2d 6195 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  ( abs `  S. ( A (,) B ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )  =  ( abs `  sum_ i  e.  ( 0..^ M ) S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x ) )
691663, 677fsumabs 14533 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  ( abs `  sum_ i  e.  ( 0..^ M ) S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <_  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x ) )
692690, 691eqbrtrd 4675 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  ->  ( abs `  S. ( A (,) B ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )  <_  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x ) )
693692adantllr 755 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  ->  ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <_  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x ) )
6946933adantl3 1219 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <_  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x ) )
695503a1i 11 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  ( 0..^ M )  e.  Fin )
696 0zd 11389 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  0  e.  ZZ )
697346nnzd 11481 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  M  e.  ZZ )
698346nngt0d 11064 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  0  <  M )
699 fzolb 12476 . . . . . . . . . . . . . . . . . 18  |-  ( 0  e.  ( 0..^ M )  <->  ( 0  e.  ZZ  /\  M  e.  ZZ  /\  0  < 
M ) )
700696, 697, 698, 699syl3anbrc 1246 . . . . . . . . . . . . . . . . 17  |-  ( ph  ->  0  e.  ( 0..^ M ) )
701 ne0i 3921 . . . . . . . . . . . . . . . . 17  |-  ( 0  e.  ( 0..^ M )  ->  ( 0..^ M )  =/=  (/) )
702700, 701syl 17 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( 0..^ M )  =/=  (/) )
703702ad2antrr 762 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  r  e.  ( n (,) +oo ) )  ->  (
0..^ M )  =/=  (/) )
7047033ad2antl1 1223 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  ( 0..^ M )  =/=  (/) )
705 simp1l 1085 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  ->  ph )
706705ad2antrr 762 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  ph )
707 simpll2 1101 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  n  e.  NN )
708706, 707jca 554 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  ( ph  /\  n  e.  NN ) )
709 simplr 792 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  r  e.  ( n (,) +oo ) )
710 simpr 477 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  j  e.  ( 0..^ M ) )
711 eleq1 2689 . . . . . . . . . . . . . . . . . . 19  |-  ( i  =  j  ->  (
i  e.  ( 0..^ M )  <->  j  e.  ( 0..^ M ) ) )
712711anbi2d 740 . . . . . . . . . . . . . . . . . 18  |-  ( i  =  j  ->  (
( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo )
)  /\  i  e.  ( 0..^ M ) )  <-> 
( ( ( ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo )
)  /\  j  e.  ( 0..^ M ) ) ) )
713 fveq2 6191 . . . . . . . . . . . . . . . . . . . . 21  |-  ( i  =  j  ->  ( Q `  i )  =  ( Q `  j ) )
714 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( i  =  j  ->  (
i  +  1 )  =  ( j  +  1 ) )
715714fveq2d 6195 . . . . . . . . . . . . . . . . . . . . 21  |-  ( i  =  j  ->  ( Q `  ( i  +  1 ) )  =  ( Q `  ( j  +  1 ) ) )
716713, 715oveq12d 6668 . . . . . . . . . . . . . . . . . . . 20  |-  ( i  =  j  ->  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) )  =  ( ( Q `
 j ) [,] ( Q `  (
j  +  1 ) ) ) )
717716itgeq1d 40172 . . . . . . . . . . . . . . . . . . 19  |-  ( i  =  j  ->  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x  =  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )
718717eleq1d 2686 . . . . . . . . . . . . . . . . . 18  |-  ( i  =  j  ->  ( S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x  e.  CC  <->  S. (
( Q `  j
) [,] ( Q `
 ( j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  e.  CC ) )
719712, 718imbi12d 334 . . . . . . . . . . . . . . . . 17  |-  ( i  =  j  ->  (
( ( ( (
ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  /\  i  e.  ( 0..^ M ) )  ->  S. (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  e.  CC ) 
<->  ( ( ( (
ph  /\  n  e.  NN )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  S. (
( Q `  j
) [,] ( Q `
 ( j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  e.  CC ) ) )
720719, 677chvarv 2263 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ph  /\  n  e.  NN )  /\  r  e.  (
n (,) +oo )
)  /\  j  e.  ( 0..^ M ) )  ->  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x  e.  CC )
721708, 709, 710, 720syl21anc 1325 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  S. (
( Q `  j
) [,] ( Q `
 ( j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x  e.  CC )
722721abscld 14175 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  ( abs `  S. ( ( Q `
 j ) [,] ( Q `  (
j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  e.  RR )
723349rpred 11872 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  e  e.  RR+ )  ->  ( e  /  M )  e.  RR )
7247233ad2ant1 1082 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  ->  (
e  /  M )  e.  RR )
725724ad2antrr 762 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  ( e  /  M )  e.  RR )
726 simpll3 1102 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )
727 rspa 2930 . . . . . . . . . . . . . . . . . 18  |-  ( ( A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
)  /\  r  e.  ( n (,) +oo ) )  ->  A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
728727adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( ( ( A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
)  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
729717fveq2d 6195 . . . . . . . . . . . . . . . . . . 19  |-  ( i  =  j  ->  ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )  =  ( abs `  S. ( ( Q `  j
) [,] ( Q `
 ( j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x ) )
730729breq1d 4663 . . . . . . . . . . . . . . . . . 18  |-  ( i  =  j  ->  (
( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  ( abs `  S. ( ( Q `
 j ) [,] ( Q `  (
j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) ) )
731730cbvralv 3171 . . . . . . . . . . . . . . . . 17  |-  ( A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  <->  A. j  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
732728, 731sylib 208 . . . . . . . . . . . . . . . 16  |-  ( ( ( A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
)  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  A. j  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
733 rspa 2930 . . . . . . . . . . . . . . . 16  |-  ( ( A. j  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  j
) [,] ( Q `
 ( j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
)  /\  j  e.  ( 0..^ M ) )  ->  ( abs `  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
734732, 733sylancom 701 . . . . . . . . . . . . . . 15  |-  ( ( ( A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
)  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  ( abs `  S. ( ( Q `
 j ) [,] ( Q `  (
j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
735726, 709, 710, 734syl21anc 1325 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\ 
A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  /\  r  e.  ( n (,) +oo ) )  /\  j  e.  ( 0..^ M ) )  ->  ( abs `  S. ( ( Q `
 j ) [,] ( Q `  (
j  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )
736695, 704, 722, 725, 735fsumlt 14532 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  sum_ j  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  sum_ j  e.  ( 0..^ M ) ( e  /  M
) )
737 fveq2 6191 . . . . . . . . . . . . . . . . . 18  |-  ( j  =  i  ->  ( Q `  j )  =  ( Q `  i ) )
738 oveq1 6657 . . . . . . . . . . . . . . . . . . 19  |-  ( j  =  i  ->  (
j  +  1 )  =  ( i  +  1 ) )
739738fveq2d 6195 . . . . . . . . . . . . . . . . . 18  |-  ( j  =  i  ->  ( Q `  ( j  +  1 ) )  =  ( Q `  ( i  +  1 ) ) )
740737, 739oveq12d 6668 . . . . . . . . . . . . . . . . 17  |-  ( j  =  i  ->  (
( Q `  j
) [,] ( Q `
 ( j  +  1 ) ) )  =  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) )
741740itgeq1d 40172 . . . . . . . . . . . . . . . 16  |-  ( j  =  i  ->  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )
742741fveq2d 6195 . . . . . . . . . . . . . . 15  |-  ( j  =  i  ->  ( abs `  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `  x
)  x.  ( sin `  ( r  x.  x
) ) )  _d x )  =  ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x ) )
743742cbvsumv 14426 . . . . . . . . . . . . . 14  |-  sum_ j  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  =  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )
744743a1i 11 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  sum_ j  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  j ) [,] ( Q `  ( j  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  =  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x ) )
745349rpcnd 11874 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  e  e.  RR+ )  ->  ( e  /  M )  e.  CC )
746 fsumconst 14522 . . . . . . . . . . . . . . . . 17  |-  ( ( ( 0..^ M )  e.  Fin  /\  (
e  /  M )  e.  CC )  ->  sum_ j  e.  ( 0..^ M ) ( e  /  M )  =  ( ( # `  (
0..^ M ) )  x.  ( e  /  M ) ) )
747503, 745, 746sylancr 695 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  e  e.  RR+ )  ->  sum_ j  e.  ( 0..^ M ) ( e  /  M
)  =  ( (
# `  ( 0..^ M ) )  x.  ( e  /  M
) ) )
748346nnnn0d 11351 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  M  e.  NN0 )
749 hashfzo0 13217 . . . . . . . . . . . . . . . . . . 19  |-  ( M  e.  NN0  ->  ( # `  ( 0..^ M ) )  =  M )
750748, 749syl 17 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  ( # `  (
0..^ M ) )  =  M )
751750oveq1d 6665 . . . . . . . . . . . . . . . . 17  |-  ( ph  ->  ( ( # `  (
0..^ M ) )  x.  ( e  /  M ) )  =  ( M  x.  (
e  /  M ) ) )
752751adantr 481 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  e  e.  RR+ )  ->  ( ( # `
 ( 0..^ M ) )  x.  (
e  /  M ) )  =  ( M  x.  ( e  /  M ) ) )
753345rpcnd 11874 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  e  e.  RR+ )  ->  e  e.  CC )
754348rpcnd 11874 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  e  e.  RR+ )  ->  M  e.  CC )
755348rpne0d 11877 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  e  e.  RR+ )  ->  M  =/=  0 )
756753, 754, 755divcan2d 10803 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  e  e.  RR+ )  ->  ( M  x.  ( e  /  M
) )  =  e )
757747, 752, 7563eqtrd 2660 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  e  e.  RR+ )  ->  sum_ j  e.  ( 0..^ M ) ( e  /  M
)  =  e )
758757adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  r  e.  ( n (,) +oo ) )  ->  sum_ j  e.  ( 0..^ M ) ( e  /  M
)  =  e )
7597583ad2antl1 1223 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  sum_ j  e.  ( 0..^ M ) ( e  /  M
)  =  e )
760736, 744, 7593brtr3d 4684 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  sum_ i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  e )
761682, 686, 689, 694, 760lelttrd 10195 . . . . . . . . . . 11  |-  ( ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  /\  r  e.  ( n (,) +oo )
)  ->  ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  e )
762761ex 450 . . . . . . . . . 10  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  ->  (
r  e.  ( n (,) +oo )  -> 
( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e ) )
763516, 762ralrimi 2957 . . . . . . . . 9  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  n  e.  NN  /\  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  ->  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e )
7647633exp 1264 . . . . . . . 8  |-  ( (
ph  /\  e  e.  RR+ )  ->  ( n  e.  NN  ->  ( A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  ->  A. r  e.  (
n (,) +oo )
( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e ) ) )
765764adantr 481 . . . . . . 7  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  ->  (
n  e.  NN  ->  ( A. r  e.  ( n (,) +oo ) A. i  e.  (
0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
)  ->  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e ) ) )
766513, 765reximdai 3012 . . . . . 6  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  ->  ( E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  ->  E. n  e.  NN  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e ) )
767510, 766mpd 15 . . . . 5  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  E. n  e.  NN  A. r  e.  ( n (,) +oo ) A. i  e.  ( 0..^ M ) ( abs `  S. ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
( e  /  M
) )  ->  E. n  e.  NN  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e )
768509, 767syldan 487 . . . 4  |-  ( ( ( ph  /\  e  e.  RR+ )  /\  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M ) )  ->  E. n  e.  NN  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e )
769768ex 450 . . 3  |-  ( (
ph  /\  e  e.  RR+ )  ->  ( A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( ( F `
 x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  ->  E. n  e.  NN  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e ) )
770769ralimdva 2962 . 2  |-  ( ph  ->  ( A. e  e.  RR+  A. i  e.  ( 0..^ M ) E. m  e.  NN  A. r  e.  ( m (,) +oo ) ( abs `  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  ( e  /  M )  ->  A. e  e.  RR+  E. n  e.  NN  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  ( r  x.  x ) ) )  _d x )  < 
e ) )
771491, 770mpd 15 1  |-  ( ph  ->  A. e  e.  RR+  E. n  e.  NN  A. r  e.  ( n (,) +oo ) ( abs `  S. ( A (,) B ) ( ( F `  x )  x.  ( sin `  (
r  x.  x ) ) )  _d x )  <  e )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 196    /\ wa 384    /\ w3a 1037    = wceq 1483   T. wtru 1484    e. wcel 1990    =/= wne 2794   A.wral 2912   E.wrex 2913   {crab 2916    C_ wss 3574   (/)c0 3915   ifcif 4086   class class class wbr 4653    |-> cmpt 4729   dom cdm 5114   ran crn 5115    |` cres 5116    Fn wfn 5883   -->wf 5884   ` cfv 5888  (class class class)co 6650   Fincfn 7955   supcsup 8346  infcinf 8347   CCcc 9934   RRcr 9935   0cc0 9936   1c1 9937    + caddc 9939    x. cmul 9941   +oocpnf 10071   RR*cxr 10073    < clt 10074    <_ cle 10075    - cmin 10266   -ucneg 10267    / cdiv 10684   NNcn 11020   NN0cn0 11292   ZZcz 11377   ZZ>=cuz 11687   RR+crp 11832   (,)cioo 12175   [,]cicc 12178   ...cfz 12326  ..^cfzo 12465   |_cfl 12591   #chash 13117   abscabs 13974   sum_csu 14416   sincsin 14794   cosccos 14795   TopOpenctopn 16082   topGenctg 16098  ℂfldccnfld 19746   Topctop 20698   intcnt 20821   -cn->ccncf 22679   volcvol 23232   L^1cibl 23386   S.citg 23387   lim CC climc 23626    _D cdv 23627
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-inf2 8538  ax-cc 9257  ax-cnex 9992  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013  ax-pre-sup 10014  ax-addf 10015  ax-mulf 10016
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-iin 4523  df-disj 4621  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-of 6897  df-ofr 6898  df-om 7066  df-1st 7168  df-2nd 7169  df-supp 7296  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-2o 7561  df-oadd 7564  df-omul 7565  df-er 7742  df-map 7859  df-pm 7860  df-ixp 7909  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-fsupp 8276  df-fi 8317  df-sup 8348  df-inf 8349  df-oi 8415  df-card 8765  df-acn 8768  df-cda 8990  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-4 11081  df-5 11082  df-6 11083  df-7 11084  df-8 11085  df-9 11086  df-n0 11293  df-z 11378  df-dec 11494  df-uz 11688  df-q 11789  df-rp 11833  df-xneg 11946  df-xadd 11947  df-xmul 11948  df-ioo 12179  df-ioc 12180  df-ico 12181  df-icc 12182  df-fz 12327  df-fzo 12466  df-fl 12593  df-mod 12669  df-seq 12802  df-exp 12861  df-fac 13061  df-bc 13090  df-hash 13118  df-shft 13807  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-limsup 14202  df-clim 14219  df-rlim 14220  df-sum 14417  df-ef 14798  df-sin 14800  df-cos 14801  df-struct 15859  df-ndx 15860  df-slot 15861  df-base 15863  df-sets 15864  df-ress 15865  df-plusg 15954  df-mulr 15955  df-starv 15956  df-sca 15957  df-vsca 15958  df-ip 15959  df-tset 15960  df-ple 15961  df-ds 15964  df-unif 15965  df-hom 15966  df-cco 15967  df-rest 16083  df-topn 16084  df-0g 16102  df-gsum 16103  df-topgen 16104  df-pt 16105  df-prds 16108  df-xrs 16162  df-qtop 16167  df-imas 16168  df-xps 16170  df-mre 16246  df-mrc 16247  df-acs 16249  df-mgm 17242  df-sgrp 17284  df-mnd 17295  df-submnd 17336  df-mulg 17541  df-cntz 17750  df-cmn 18195  df-psmet 19738  df-xmet 19739  df-met 19740  df-bl 19741  df-mopn 19742  df-fbas 19743  df-fg 19744  df-cnfld 19747  df-top 20699  df-topon 20716  df-topsp 20737  df-bases 20750  df-cld 20823  df-ntr 20824  df-cls 20825  df-nei 20902  df-lp 20940  df-perf 20941  df-cn 21031  df-cnp 21032  df-haus 21119  df-cmp 21190  df-tx 21365  df-hmeo 21558  df-fil 21650  df-fm 21742  df-flim 21743  df-flf 21744  df-xms 22125  df-ms 22126  df-tms 22127  df-cncf 22681  df-ovol 23233  df-vol 23234  df-mbf 23388  df-itg1 23389  df-itg2 23390  df-ibl 23391  df-itg 23392  df-0p 23437  df-limc 23630  df-dv 23631
This theorem is referenced by:  fourierdlem103  40426  fourierdlem104  40427
  Copyright terms: Public domain W3C validator