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

Theorem fourierdlem81 40404
Description: The integral of a piecewise continuous periodic function  F is unchanged if the domain is shifted by its period  T. In this lemma,  T is assumed to be strictly positive. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem81.a  |-  ( ph  ->  A  e.  RR )
fourierdlem81.b  |-  ( ph  ->  B  e.  RR )
fourierdlem81.p  |-  P  =  ( m  e.  NN  |->  { p  e.  ( RR  ^m  ( 0 ... m ) )  |  ( ( ( p `
 0 )  =  A  /\  ( p `
 m )  =  B )  /\  A. i  e.  ( 0..^ m ) ( p `
 i )  < 
( p `  (
i  +  1 ) ) ) } )
fourierdlem81.m  |-  ( ph  ->  M  e.  NN )
fourierdlem81.t  |-  ( ph  ->  T  e.  RR+ )
fourierdlem81.q  |-  ( ph  ->  Q  e.  ( P `
 M ) )
fourierdlem81.fper  |-  ( (
ph  /\  x  e.  ( A [,] B ) )  ->  ( F `  ( x  +  T
) )  =  ( F `  x ) )
fourierdlem81.s  |-  S  =  ( i  e.  ( 0 ... M ) 
|->  ( ( Q `  i )  +  T
) )
fourierdlem81.f  |-  ( ph  ->  F : RR --> CC )
fourierdlem81.cncf  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
fourierdlem81.r  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) lim CC  ( Q `
 i ) ) )
fourierdlem81.l  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) lim CC  ( Q `
 ( i  +  1 ) ) ) )
fourierdlem81.g  |-  G  =  ( x  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( Q `  i
) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) ) )
fourierdlem81.h  |-  H  =  ( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  ( G `  (
x  -  T ) ) )
Assertion
Ref Expression
fourierdlem81  |-  ( ph  ->  S. ( ( A  +  T ) [,] ( B  +  T
) ) ( F `
 x )  _d x  =  S. ( A [,] B ) ( F `  x
)  _d x )
Distinct variable groups:    A, i, m, p    x, A, i    B, i, m, p    x, B    i, F, x    x, G    x, L    i, M, m, p    x, M    Q, i, p    x, Q    x, R    S, i, x    T, i, x    ph, i, x
Allowed substitution hints:    ph( m, p)    P( x, i, m, p)    Q( m)    R( i, m, p)    S( m, p)    T( m, p)    F( m, p)    G( i, m, p)    H( x, i, m, p)    L( i, m, p)

Proof of Theorem fourierdlem81
Dummy variables  y  w  z  j are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fourierdlem81.q . . . . . . . . 9  |-  ( ph  ->  Q  e.  ( P `
 M ) )
2 fourierdlem81.m . . . . . . . . . 10  |-  ( ph  ->  M  e.  NN )
3 fourierdlem81.p . . . . . . . . . . 11  |-  P  =  ( m  e.  NN  |->  { p  e.  ( RR  ^m  ( 0 ... m ) )  |  ( ( ( p `
 0 )  =  A  /\  ( p `
 m )  =  B )  /\  A. i  e.  ( 0..^ m ) ( p `
 i )  < 
( p `  (
i  +  1 ) ) ) } )
43fourierdlem2 40326 . . . . . . . . . 10  |-  ( M  e.  NN  ->  ( Q  e.  ( P `  M )  <->  ( Q  e.  ( RR  ^m  (
0 ... M ) )  /\  ( ( ( Q `  0 )  =  A  /\  ( Q `  M )  =  B )  /\  A. i  e.  ( 0..^ M ) ( Q `
 i )  < 
( Q `  (
i  +  1 ) ) ) ) ) )
52, 4syl 17 . . . . . . . . 9  |-  ( ph  ->  ( Q  e.  ( P `  M )  <-> 
( Q  e.  ( RR  ^m  ( 0 ... M ) )  /\  ( ( ( Q `  0 )  =  A  /\  ( Q `  M )  =  B )  /\  A. i  e.  ( 0..^ M ) ( Q `
 i )  < 
( Q `  (
i  +  1 ) ) ) ) ) )
61, 5mpbid 222 . . . . . . . 8  |-  ( ph  ->  ( Q  e.  ( RR  ^m  ( 0 ... M ) )  /\  ( ( ( Q `  0 )  =  A  /\  ( Q `  M )  =  B )  /\  A. i  e.  ( 0..^ M ) ( Q `
 i )  < 
( Q `  (
i  +  1 ) ) ) ) )
76simprd 479 . . . . . . 7  |-  ( ph  ->  ( ( ( Q `
 0 )  =  A  /\  ( Q `
 M )  =  B )  /\  A. i  e.  ( 0..^ M ) ( Q `
 i )  < 
( Q `  (
i  +  1 ) ) ) )
87simpld 475 . . . . . 6  |-  ( ph  ->  ( ( Q ` 
0 )  =  A  /\  ( Q `  M )  =  B ) )
98simpld 475 . . . . 5  |-  ( ph  ->  ( Q `  0
)  =  A )
109eqcomd 2628 . . . 4  |-  ( ph  ->  A  =  ( Q `
 0 ) )
118simprd 479 . . . . 5  |-  ( ph  ->  ( Q `  M
)  =  B )
1211eqcomd 2628 . . . 4  |-  ( ph  ->  B  =  ( Q `
 M ) )
1310, 12oveq12d 6668 . . 3  |-  ( ph  ->  ( A [,] B
)  =  ( ( Q `  0 ) [,] ( Q `  M ) ) )
1413itgeq1d 40172 . 2  |-  ( ph  ->  S. ( A [,] B ) ( F `
 x )  _d x  =  S. ( ( Q `  0
) [,] ( Q `
 M ) ) ( F `  x
)  _d x )
15 0zd 11389 . . 3  |-  ( ph  ->  0  e.  ZZ )
16 nnuz 11723 . . . . 5  |-  NN  =  ( ZZ>= `  1 )
17 0p1e1 11132 . . . . . 6  |-  ( 0  +  1 )  =  1
1817fveq2i 6194 . . . . 5  |-  ( ZZ>= `  ( 0  +  1 ) )  =  (
ZZ>= `  1 )
1916, 18eqtr4i 2647 . . . 4  |-  NN  =  ( ZZ>= `  ( 0  +  1 ) )
202, 19syl6eleq 2711 . . 3  |-  ( ph  ->  M  e.  ( ZZ>= `  ( 0  +  1 ) ) )
216simpld 475 . . . 4  |-  ( ph  ->  Q  e.  ( RR 
^m  ( 0 ... M ) ) )
22 reex 10027 . . . . . 6  |-  RR  e.  _V
2322a1i 11 . . . . 5  |-  ( ph  ->  RR  e.  _V )
24 ovex 6678 . . . . . 6  |-  ( 0 ... M )  e. 
_V
2524a1i 11 . . . . 5  |-  ( ph  ->  ( 0 ... M
)  e.  _V )
2623, 25elmapd 7871 . . . 4  |-  ( ph  ->  ( Q  e.  ( RR  ^m  ( 0 ... M ) )  <-> 
Q : ( 0 ... M ) --> RR ) )
2721, 26mpbid 222 . . 3  |-  ( ph  ->  Q : ( 0 ... M ) --> RR )
287simprd 479 . . . 4  |-  ( ph  ->  A. i  e.  ( 0..^ M ) ( Q `  i )  <  ( Q `  ( i  +  1 ) ) )
2928r19.21bi 2932 . . 3  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  <  ( Q `  ( i  +  1 ) ) )
30 fourierdlem81.f . . . . 5  |-  ( ph  ->  F : RR --> CC )
3130adantr 481 . . . 4  |-  ( (
ph  /\  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )  ->  F : RR --> CC )
32 fourierdlem81.a . . . . . . 7  |-  ( ph  ->  A  e.  RR )
339, 32eqeltrd 2701 . . . . . 6  |-  ( ph  ->  ( Q `  0
)  e.  RR )
34 fourierdlem81.b . . . . . . 7  |-  ( ph  ->  B  e.  RR )
3511, 34eqeltrd 2701 . . . . . 6  |-  ( ph  ->  ( Q `  M
)  e.  RR )
3633, 35iccssred 39727 . . . . 5  |-  ( ph  ->  ( ( Q ` 
0 ) [,] ( Q `  M )
)  C_  RR )
3736sselda 3603 . . . 4  |-  ( (
ph  /\  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )  ->  x  e.  RR )
3831, 37ffvelrnd 6360 . . 3  |-  ( (
ph  /\  x  e.  ( ( Q ` 
0 ) [,] ( Q `  M )
) )  ->  ( F `  x )  e.  CC )
3927adantr 481 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  Q : ( 0 ... M ) --> RR )
40 elfzofz 12485 . . . . . 6  |-  ( i  e.  ( 0..^ M )  ->  i  e.  ( 0 ... M
) )
4140adantl 482 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  i  e.  ( 0 ... M ) )
4239, 41ffvelrnd 6360 . . . 4  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  RR )
43 fzofzp1 12565 . . . . . 6  |-  ( i  e.  ( 0..^ M )  ->  ( i  +  1 )  e.  ( 0 ... M
) )
4443adantl 482 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( i  +  1 )  e.  ( 0 ... M ) )
4539, 44ffvelrnd 6360 . . . 4  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
4630feqmptd 6249 . . . . . . . 8  |-  ( ph  ->  F  =  ( x  e.  RR  |->  ( F `
 x ) ) )
4746reseq1d 5395 . . . . . . 7  |-  ( ph  ->  ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) )  =  ( ( x  e.  RR  |->  ( F `  x ) )  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) )
4847adantr 481 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( ( x  e.  RR  |->  ( F `  x ) )  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) )
49 ioossre 12235 . . . . . . . 8  |-  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  RR
5049a1i 11 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  C_  RR )
5150resmptd 5452 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( x  e.  RR  |->  ( F `
 x ) )  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  =  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) ) )
5248, 51eqtr2d 2657 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) )  =  ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) )
53 fourierdlem81.cncf . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  e.  ( ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
54 fourierdlem81.l . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) lim CC  ( Q `
 ( i  +  1 ) ) ) )
55 fourierdlem81.r . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) lim CC  ( Q `
 i ) ) )
5642, 45, 53, 54, 55iblcncfioo 40194 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  e.  L^1 )
5752, 56eqeltrd 2701 . . . 4  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) )  e.  L^1 )
5830ad2antrr 762 . . . . 5  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  F : RR --> CC )
5942, 45iccssred 39727 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  C_  RR )
6059sselda 3603 . . . . 5  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
6158, 60ffvelrnd 6360 . . . 4  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( F `  x )  e.  CC )
6242, 45, 57, 61ibliooicc 40187 . . 3  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  ( F `  x ) )  e.  L^1 )
6315, 20, 27, 29, 38, 62itgspltprt 40195 . 2  |-  ( ph  ->  S. ( ( Q `
 0 ) [,] ( Q `  M
) ) ( F `
 x )  _d x  =  sum_ i  e.  ( 0..^ M ) S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( F `
 x )  _d x )
64 fourierdlem81.s . . . . . . . 8  |-  S  =  ( i  e.  ( 0 ... M ) 
|->  ( ( Q `  i )  +  T
) )
6564a1i 11 . . . . . . 7  |-  ( ph  ->  S  =  ( i  e.  ( 0 ... M )  |->  ( ( Q `  i )  +  T ) ) )
66 fveq2 6191 . . . . . . . . 9  |-  ( i  =  0  ->  ( Q `  i )  =  ( Q ` 
0 ) )
6766oveq1d 6665 . . . . . . . 8  |-  ( i  =  0  ->  (
( Q `  i
)  +  T )  =  ( ( Q `
 0 )  +  T ) )
6867adantl 482 . . . . . . 7  |-  ( (
ph  /\  i  = 
0 )  ->  (
( Q `  i
)  +  T )  =  ( ( Q `
 0 )  +  T ) )
692nnnn0d 11351 . . . . . . . . 9  |-  ( ph  ->  M  e.  NN0 )
70 nn0uz 11722 . . . . . . . . 9  |-  NN0  =  ( ZZ>= `  0 )
7169, 70syl6eleq 2711 . . . . . . . 8  |-  ( ph  ->  M  e.  ( ZZ>= ` 
0 ) )
72 eluzfz1 12348 . . . . . . . 8  |-  ( M  e.  ( ZZ>= `  0
)  ->  0  e.  ( 0 ... M
) )
7371, 72syl 17 . . . . . . 7  |-  ( ph  ->  0  e.  ( 0 ... M ) )
74 fourierdlem81.t . . . . . . . . 9  |-  ( ph  ->  T  e.  RR+ )
7574rpred 11872 . . . . . . . 8  |-  ( ph  ->  T  e.  RR )
7633, 75readdcld 10069 . . . . . . 7  |-  ( ph  ->  ( ( Q ` 
0 )  +  T
)  e.  RR )
7765, 68, 73, 76fvmptd 6288 . . . . . 6  |-  ( ph  ->  ( S `  0
)  =  ( ( Q `  0 )  +  T ) )
789oveq1d 6665 . . . . . 6  |-  ( ph  ->  ( ( Q ` 
0 )  +  T
)  =  ( A  +  T ) )
7977, 78eqtr2d 2657 . . . . 5  |-  ( ph  ->  ( A  +  T
)  =  ( S `
 0 ) )
80 fveq2 6191 . . . . . . . . 9  |-  ( i  =  M  ->  ( Q `  i )  =  ( Q `  M ) )
8180oveq1d 6665 . . . . . . . 8  |-  ( i  =  M  ->  (
( Q `  i
)  +  T )  =  ( ( Q `
 M )  +  T ) )
8281adantl 482 . . . . . . 7  |-  ( (
ph  /\  i  =  M )  ->  (
( Q `  i
)  +  T )  =  ( ( Q `
 M )  +  T ) )
83 eluzfz2 12349 . . . . . . . 8  |-  ( M  e.  ( ZZ>= `  0
)  ->  M  e.  ( 0 ... M
) )
8471, 83syl 17 . . . . . . 7  |-  ( ph  ->  M  e.  ( 0 ... M ) )
8535, 75readdcld 10069 . . . . . . 7  |-  ( ph  ->  ( ( Q `  M )  +  T
)  e.  RR )
8665, 82, 84, 85fvmptd 6288 . . . . . 6  |-  ( ph  ->  ( S `  M
)  =  ( ( Q `  M )  +  T ) )
8711oveq1d 6665 . . . . . 6  |-  ( ph  ->  ( ( Q `  M )  +  T
)  =  ( B  +  T ) )
8886, 87eqtr2d 2657 . . . . 5  |-  ( ph  ->  ( B  +  T
)  =  ( S `
 M ) )
8979, 88oveq12d 6668 . . . 4  |-  ( ph  ->  ( ( A  +  T ) [,] ( B  +  T )
)  =  ( ( S `  0 ) [,] ( S `  M ) ) )
9089itgeq1d 40172 . . 3  |-  ( ph  ->  S. ( ( A  +  T ) [,] ( B  +  T
) ) ( F `
 x )  _d x  =  S. ( ( S `  0
) [,] ( S `
 M ) ) ( F `  x
)  _d x )
9127ffvelrnda 6359 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0 ... M
) )  ->  ( Q `  i )  e.  RR )
9275adantr 481 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0 ... M
) )  ->  T  e.  RR )
9391, 92readdcld 10069 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0 ... M
) )  ->  (
( Q `  i
)  +  T )  e.  RR )
9493, 64fmptd 6385 . . . 4  |-  ( ph  ->  S : ( 0 ... M ) --> RR )
9575adantr 481 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  T  e.  RR )
9642, 45, 95, 29ltadd1dd 10638 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i )  +  T )  <  (
( Q `  (
i  +  1 ) )  +  T ) )
9740, 93sylan2 491 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i )  +  T )  e.  RR )
9864fvmpt2 6291 . . . . . 6  |-  ( ( i  e.  ( 0 ... M )  /\  ( ( Q `  i )  +  T
)  e.  RR )  ->  ( S `  i )  =  ( ( Q `  i
)  +  T ) )
9941, 97, 98syl2anc 693 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( S `  i )  =  ( ( Q `  i
)  +  T ) )
100 fveq2 6191 . . . . . . . . . 10  |-  ( i  =  j  ->  ( Q `  i )  =  ( Q `  j ) )
101100oveq1d 6665 . . . . . . . . 9  |-  ( i  =  j  ->  (
( Q `  i
)  +  T )  =  ( ( Q `
 j )  +  T ) )
102101cbvmptv 4750 . . . . . . . 8  |-  ( i  e.  ( 0 ... M )  |->  ( ( Q `  i )  +  T ) )  =  ( j  e.  ( 0 ... M
)  |->  ( ( Q `
 j )  +  T ) )
10364, 102eqtri 2644 . . . . . . 7  |-  S  =  ( j  e.  ( 0 ... M ) 
|->  ( ( Q `  j )  +  T
) )
104103a1i 11 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S  =  ( j  e.  ( 0 ... M )  |->  ( ( Q `  j
)  +  T ) ) )
105 fveq2 6191 . . . . . . . 8  |-  ( j  =  ( i  +  1 )  ->  ( Q `  j )  =  ( Q `  ( i  +  1 ) ) )
106105oveq1d 6665 . . . . . . 7  |-  ( j  =  ( i  +  1 )  ->  (
( Q `  j
)  +  T )  =  ( ( Q `
 ( i  +  1 ) )  +  T ) )
107106adantl 482 . . . . . 6  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  j  =  ( i  +  1 ) )  ->  (
( Q `  j
)  +  T )  =  ( ( Q `
 ( i  +  1 ) )  +  T ) )
10845, 95readdcld 10069 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 ( i  +  1 ) )  +  T )  e.  RR )
109104, 107, 44, 108fvmptd 6288 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( S `  ( i  +  1 ) )  =  ( ( Q `  (
i  +  1 ) )  +  T ) )
11096, 99, 1093brtr4d 4685 . . . 4  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( S `  i )  <  ( S `  ( i  +  1 ) ) )
11130adantr 481 . . . . 5  |-  ( (
ph  /\  x  e.  ( ( S ` 
0 ) [,] ( S `  M )
) )  ->  F : RR --> CC )
11277, 76eqeltrd 2701 . . . . . . . 8  |-  ( ph  ->  ( S `  0
)  e.  RR )
113112adantr 481 . . . . . . 7  |-  ( (
ph  /\  x  e.  ( ( S ` 
0 ) [,] ( S `  M )
) )  ->  ( S `  0 )  e.  RR )
11486, 85eqeltrd 2701 . . . . . . . 8  |-  ( ph  ->  ( S `  M
)  e.  RR )
115114adantr 481 . . . . . . 7  |-  ( (
ph  /\  x  e.  ( ( S ` 
0 ) [,] ( S `  M )
) )  ->  ( S `  M )  e.  RR )
116113, 115iccssred 39727 . . . . . 6  |-  ( (
ph  /\  x  e.  ( ( S ` 
0 ) [,] ( S `  M )
) )  ->  (
( S `  0
) [,] ( S `
 M ) ) 
C_  RR )
117 simpr 477 . . . . . 6  |-  ( (
ph  /\  x  e.  ( ( S ` 
0 ) [,] ( S `  M )
) )  ->  x  e.  ( ( S ` 
0 ) [,] ( S `  M )
) )
118116, 117sseldd 3604 . . . . 5  |-  ( (
ph  /\  x  e.  ( ( S ` 
0 ) [,] ( S `  M )
) )  ->  x  e.  RR )
119111, 118ffvelrnd 6360 . . . 4  |-  ( (
ph  /\  x  e.  ( ( S ` 
0 ) [,] ( S `  M )
) )  ->  ( F `  x )  e.  CC )
12099, 97eqeltrd 2701 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( S `  i )  e.  RR )
121109, 108eqeltrd 2701 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( S `  ( i  +  1 ) )  e.  RR )
122 ioosscn 39716 . . . . . . . . 9  |-  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  CC
123122a1i 11 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  C_  CC )
124 eqeq1 2626 . . . . . . . . . . 11  |-  ( w  =  x  ->  (
w  =  ( z  +  T )  <->  x  =  ( z  +  T
) ) )
125124rexbidv 3052 . . . . . . . . . 10  |-  ( w  =  x  ->  ( E. z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T )  <->  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) ) )
126 oveq1 6657 . . . . . . . . . . . 12  |-  ( z  =  y  ->  (
z  +  T )  =  ( y  +  T ) )
127126eqeq2d 2632 . . . . . . . . . . 11  |-  ( z  =  y  ->  (
x  =  ( z  +  T )  <->  x  =  ( y  +  T
) ) )
128127cbvrexv 3172 . . . . . . . . . 10  |-  ( E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T )  <->  E. y  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( y  +  T ) )
129125, 128syl6bb 276 . . . . . . . . 9  |-  ( w  =  x  ->  ( E. z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T )  <->  E. y  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( y  +  T ) ) )
130129cbvrabv 3199 . . . . . . . 8  |-  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) }  =  { x  e.  CC  |  E. y  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( y  +  T ) }
131 fdm 6051 . . . . . . . . . . . 12  |-  ( F : RR --> CC  ->  dom 
F  =  RR )
13230, 131syl 17 . . . . . . . . . . 11  |-  ( ph  ->  dom  F  =  RR )
133132feq2d 6031 . . . . . . . . . 10  |-  ( ph  ->  ( F : dom  F --> CC  <->  F : RR --> CC ) )
13430, 133mpbird 247 . . . . . . . . 9  |-  ( ph  ->  F : dom  F --> CC )
135134adantr 481 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  F : dom  F --> CC )
136 elioore 12205 . . . . . . . . . . . . . . . . . 18  |-  ( z  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  z  e.  RR )
137136adantl 482 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  z  e.  RR )
13875adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  T  e.  RR )
139137, 138readdcld 10069 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
z  +  T )  e.  RR )
140139adantlr 751 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
z  +  T )  e.  RR )
1411403adant3 1081 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  w  =  ( z  +  T
) )  ->  (
z  +  T )  e.  RR )
142 simp3 1063 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  w  =  ( z  +  T
) )  ->  w  =  ( z  +  T ) )
1431323ad2ant1 1082 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  w  =  ( z  +  T
) )  ->  dom  F  =  RR )
1441433adant1r 1319 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  w  =  ( z  +  T
) )  ->  dom  F  =  RR )
145141, 142, 1443eltr4d 2716 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  w  =  ( z  +  T
) )  ->  w  e.  dom  F )
1461453exp 1264 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  ->  ( w  =  ( z  +  T )  ->  w  e.  dom  F ) ) )
147146adantr 481 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  w  e.  CC )  ->  (
z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  -> 
( w  =  ( z  +  T )  ->  w  e.  dom  F ) ) )
148147rexlimdv 3030 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  w  e.  CC )  ->  ( E. z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T )  ->  w  e.  dom  F ) )
149148ralrimiva 2966 . . . . . . . . 9  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  A. w  e.  CC  ( E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T )  ->  w  e.  dom  F ) )
150 rabss 3679 . . . . . . . . 9  |-  ( { w  e.  CC  |  E. z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) } 
C_  dom  F  <->  A. w  e.  CC  ( E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T )  ->  w  e.  dom  F ) )
151149, 150sylibr 224 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) }  C_  dom  F )
152 simpll 790 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ph )
15332rexrd 10089 . . . . . . . . . . 11  |-  ( ph  ->  A  e.  RR* )
154153ad2antrr 762 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  A  e.  RR* )
15534rexrd 10089 . . . . . . . . . . 11  |-  ( ph  ->  B  e.  RR* )
156155ad2antrr 762 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  B  e.  RR* )
1573, 2, 1fourierdlem15 40339 . . . . . . . . . . 11  |-  ( ph  ->  Q : ( 0 ... M ) --> ( A [,] B ) )
158157ad2antrr 762 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  Q : ( 0 ... M ) --> ( A [,] B ) )
159 simplr 792 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  i  e.  ( 0..^ M ) )
160 ioossicc 12259 . . . . . . . . . . . 12  |-  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )
161160sseli 3599 . . . . . . . . . . 11  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
162161adantl 482 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
163154, 156, 158, 159, 162fourierdlem1 40325 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  ( A [,] B
) )
164 fourierdlem81.fper . . . . . . . . 9  |-  ( (
ph  /\  x  e.  ( A [,] B ) )  ->  ( F `  ( x  +  T
) )  =  ( F `  x ) )
165152, 163, 164syl2anc 693 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( F `  ( x  +  T ) )  =  ( F `  x
) )
166123, 95, 130, 135, 151, 165, 53cncfperiod 40092 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  { w  e.  CC  |  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) } )  e.  ( { w  e.  CC  |  E. z  e.  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) }
-cn-> CC ) )
167125elrab 3363 . . . . . . . . . . . . 13  |-  ( x  e.  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) }  <->  ( x  e.  CC  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) ) )
168167simprbi 480 . . . . . . . . . . . 12  |-  ( x  e.  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) }  ->  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )
169 simpr 477 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )  ->  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )
170 nfv 1843 . . . . . . . . . . . . . . . 16  |-  F/ z ( ph  /\  i  e.  ( 0..^ M ) )
171 nfre1 3005 . . . . . . . . . . . . . . . 16  |-  F/ z E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) x  =  ( z  +  T )
172170, 171nfan 1828 . . . . . . . . . . . . . . 15  |-  F/ z ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )
173 nfv 1843 . . . . . . . . . . . . . . 15  |-  F/ z ( x  e.  RR  /\  ( S `  i
)  <  x  /\  x  <  ( S `  ( i  +  1 ) ) )
174 simp3 1063 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  x  =  ( z  +  T ) )
1751393adant3 1081 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  (
z  +  T )  e.  RR )
176174, 175eqeltrd 2701 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  x  e.  RR )
1771763adant1r 1319 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  x  e.  RR )
17842adantr 481 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR )
179136adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  z  e.  RR )
18075ad2antrr 762 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  T  e.  RR )
181 simpr 477 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
18242rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  RR* )
183182adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR* )
18445rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR* )
185184adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR* )
186 elioo2 12216 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR* )  ->  (
z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  <->  ( z  e.  RR  /\  ( Q `
 i )  < 
z  /\  z  <  ( Q `  ( i  +  1 ) ) ) ) )
187183, 185, 186syl2anc 693 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  <->  ( z  e.  RR  /\  ( Q `
 i )  < 
z  /\  z  <  ( Q `  ( i  +  1 ) ) ) ) )
188181, 187mpbid 222 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
z  e.  RR  /\  ( Q `  i )  <  z  /\  z  <  ( Q `  (
i  +  1 ) ) ) )
189188simp2d 1074 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  <  z )
190178, 179, 180, 189ltadd1dd 10638 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
( Q `  i
)  +  T )  <  ( z  +  T ) )
1911903adant3 1081 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  (
( Q `  i
)  +  T )  <  ( z  +  T ) )
192993ad2ant1 1082 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  ( S `  i )  =  ( ( Q `
 i )  +  T ) )
193 simp3 1063 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  x  =  ( z  +  T ) )
194191, 192, 1933brtr4d 4685 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  ( S `  i )  <  x )
19545adantr 481 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
196188simp3d 1075 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  z  <  ( Q `  (
i  +  1 ) ) )
197179, 195, 180, 196ltadd1dd 10638 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  (
z  +  T )  <  ( ( Q `
 ( i  +  1 ) )  +  T ) )
1981973adant3 1081 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  (
z  +  T )  <  ( ( Q `
 ( i  +  1 ) )  +  T ) )
1991093ad2ant1 1082 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  ( S `  ( i  +  1 ) )  =  ( ( Q `
 ( i  +  1 ) )  +  T ) )
200198, 193, 1993brtr4d 4685 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  x  <  ( S `  (
i  +  1 ) ) )
201177, 194, 2003jca 1242 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( z  +  T
) )  ->  (
x  e.  RR  /\  ( S `  i )  <  x  /\  x  <  ( S `  (
i  +  1 ) ) ) )
2022013exp 1264 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  ->  ( x  =  ( z  +  T )  ->  (
x  e.  RR  /\  ( S `  i )  <  x  /\  x  <  ( S `  (
i  +  1 ) ) ) ) ) )
203202adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )  ->  ( z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  ->  ( x  =  ( z  +  T )  ->  (
x  e.  RR  /\  ( S `  i )  <  x  /\  x  <  ( S `  (
i  +  1 ) ) ) ) ) )
204172, 173, 203rexlimd 3026 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )  ->  ( E. z  e.  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) x  =  ( z  +  T
)  ->  ( x  e.  RR  /\  ( S `
 i )  < 
x  /\  x  <  ( S `  ( i  +  1 ) ) ) ) )
205169, 204mpd 15 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )  ->  ( x  e.  RR  /\  ( S `
 i )  < 
x  /\  x  <  ( S `  ( i  +  1 ) ) ) )
206120rexrd 10089 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( S `  i )  e.  RR* )
207206adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )  ->  ( S `  i )  e.  RR* )
208121rexrd 10089 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( S `  ( i  +  1 ) )  e.  RR* )
209208adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )  ->  ( S `  ( i  +  1 ) )  e.  RR* )
210 elioo2 12216 . . . . . . . . . . . . . 14  |-  ( ( ( S `  i
)  e.  RR*  /\  ( S `  ( i  +  1 ) )  e.  RR* )  ->  (
x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) )  <->  ( x  e.  RR  /\  ( S `
 i )  < 
x  /\  x  <  ( S `  ( i  +  1 ) ) ) ) )
211207, 209, 210syl2anc 693 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )  ->  ( x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) )  <->  ( x  e.  RR  /\  ( S `
 i )  < 
x  /\  x  <  ( S `  ( i  +  1 ) ) ) ) )
212205, 211mpbird 247 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )  ->  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )
213168, 212sylan2 491 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e. 
{ w  e.  CC  |  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) } )  ->  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )
214 elioore 12205 . . . . . . . . . . . . . 14  |-  ( x  e.  ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) )  ->  x  e.  RR )
215214recnd 10068 . . . . . . . . . . . . 13  |-  ( x  e.  ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) )  ->  x  e.  CC )
216215adantl 482 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  e.  CC )
217182adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR* )
218184adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR* )
219214adantl 482 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
22075adantr 481 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  T  e.  RR )
221219, 220resubcld 10458 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  e.  RR )
222221adantlr 751 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  e.  RR )
22399oveq1d 6665 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( S `
 i )  -  T )  =  ( ( ( Q `  i )  +  T
)  -  T ) )
22442recnd 10068 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  CC )
22595recnd 10068 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  T  e.  CC )
226224, 225pncand 10393 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( ( Q `  i )  +  T )  -  T )  =  ( Q `  i ) )
227223, 226eqtr2d 2657 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  =  ( ( S `  i
)  -  T ) )
228227adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  =  ( ( S `
 i )  -  T ) )
229120adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( S `  i )  e.  RR )
230214adantl 482 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
23175ad2antrr 762 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  T  e.  RR )
232 simpr 477 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )
233206adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( S `  i )  e.  RR* )
234208adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( S `  ( i  +  1 ) )  e.  RR* )
235233, 234, 210syl2anc 693 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) )  <->  ( x  e.  RR  /\  ( S `
 i )  < 
x  /\  x  <  ( S `  ( i  +  1 ) ) ) ) )
236232, 235mpbid 222 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
x  e.  RR  /\  ( S `  i )  <  x  /\  x  <  ( S `  (
i  +  1 ) ) ) )
237236simp2d 1074 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( S `  i )  <  x )
238229, 230, 231, 237ltsub1dd 10639 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
( S `  i
)  -  T )  <  ( x  -  T ) )
239228, 238eqbrtrd 4675 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  <  ( x  -  T
) )
240121adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  ( S `  ( i  +  1 ) )  e.  RR )
241236simp3d 1075 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  <  ( S `  (
i  +  1 ) ) )
242230, 240, 231, 241ltsub1dd 10639 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  <  ( ( S `
 ( i  +  1 ) )  -  T ) )
243109oveq1d 6665 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( S `
 ( i  +  1 ) )  -  T )  =  ( ( ( Q `  ( i  +  1 ) )  +  T
)  -  T ) )
24445recnd 10068 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  CC )
245244, 225pncand 10393 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( ( Q `  ( i  +  1 ) )  +  T )  -  T )  =  ( Q `  ( i  +  1 ) ) )
246243, 245eqtrd 2656 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( S `
 ( i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) ) )
247246adantr 481 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
( S `  (
i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) ) )
248242, 247breqtrd 4679 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  <  ( Q `  ( i  +  1 ) ) )
249217, 218, 222, 239, 248eliood 39720 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) ) )
250219recnd 10068 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  e.  CC )
251220recnd 10068 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  T  e.  CC )
252250, 251npcand 10396 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
( x  -  T
)  +  T )  =  x )
253252eqcomd 2628 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  =  ( ( x  -  T )  +  T ) )
254253adantlr 751 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  =  ( ( x  -  T )  +  T ) )
255 oveq1 6657 . . . . . . . . . . . . . . 15  |-  ( z  =  ( x  -  T )  ->  (
z  +  T )  =  ( ( x  -  T )  +  T ) )
256255eqeq2d 2632 . . . . . . . . . . . . . 14  |-  ( z  =  ( x  -  T )  ->  (
x  =  ( z  +  T )  <->  x  =  ( ( x  -  T )  +  T
) ) )
257256rspcev 3309 . . . . . . . . . . . . 13  |-  ( ( ( x  -  T
)  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  /\  x  =  ( (
x  -  T )  +  T ) )  ->  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) x  =  ( z  +  T ) )
258249, 254, 257syl2anc 693 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) x  =  ( z  +  T ) )
259216, 258, 167sylanbrc 698 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  e.  { w  e.  CC  |  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) } )
260213, 259impbida 877 . . . . . . . . . 10  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e. 
{ w  e.  CC  |  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) }  <-> 
x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) )
261260eqrdv 2620 . . . . . . . . 9  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) }  =  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )
262261reseq2d 5396 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  { w  e.  CC  |  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) } )  =  ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) )
26330adantr 481 . . . . . . . . 9  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  F : RR --> CC )
264 ioossre 12235 . . . . . . . . . 10  |-  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) )  C_  RR
265264a1i 11 . . . . . . . . 9  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) )  C_  RR )
266263, 265feqresmpt 6250 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  =  ( x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) )  |->  ( F `  x ) ) )
267262, 266eqtrd 2656 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  { w  e.  CC  |  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) } )  =  ( x  e.  ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) )  |->  ( F `
 x ) ) )
268261oveq1d 6665 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) } -cn-> CC )  =  ( ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) -cn-> CC ) )
269166, 267, 2683eltr3d 2715 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) )  |->  ( F `  x ) )  e.  ( ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) ) -cn-> CC ) )
27049, 132syl5sseqr 3654 . . . . . . . . 9  |-  ( ph  ->  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) )  C_  dom  F )
271270adantr 481 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  C_  dom  F )
272 eqid 2622 . . . . . . . 8  |-  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) }  =  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) }
273 simpll 790 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ph )
274153ad2antrr 762 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  A  e.  RR* )
275155ad2antrr 762 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  B  e.  RR* )
276157ad2antrr 762 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  Q : ( 0 ... M ) --> ( A [,] B ) )
277 simplr 792 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  i  e.  ( 0..^ M ) )
278160, 181sseldi 3601 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  z  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
279274, 275, 276, 277, 278fourierdlem1 40325 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  z  e.  ( A [,] B
) )
280 eleq1 2689 . . . . . . . . . . . 12  |-  ( x  =  z  ->  (
x  e.  ( A [,] B )  <->  z  e.  ( A [,] B ) ) )
281280anbi2d 740 . . . . . . . . . . 11  |-  ( x  =  z  ->  (
( ph  /\  x  e.  ( A [,] B
) )  <->  ( ph  /\  z  e.  ( A [,] B ) ) ) )
282 oveq1 6657 . . . . . . . . . . . . 13  |-  ( x  =  z  ->  (
x  +  T )  =  ( z  +  T ) )
283282fveq2d 6195 . . . . . . . . . . . 12  |-  ( x  =  z  ->  ( F `  ( x  +  T ) )  =  ( F `  (
z  +  T ) ) )
284 fveq2 6191 . . . . . . . . . . . 12  |-  ( x  =  z  ->  ( F `  x )  =  ( F `  z ) )
285283, 284eqeq12d 2637 . . . . . . . . . . 11  |-  ( x  =  z  ->  (
( F `  (
x  +  T ) )  =  ( F `
 x )  <->  ( F `  ( z  +  T
) )  =  ( F `  z ) ) )
286281, 285imbi12d 334 . . . . . . . . . 10  |-  ( x  =  z  ->  (
( ( ph  /\  x  e.  ( A [,] B ) )  -> 
( F `  (
x  +  T ) )  =  ( F `
 x ) )  <-> 
( ( ph  /\  z  e.  ( A [,] B ) )  -> 
( F `  (
z  +  T ) )  =  ( F `
 z ) ) ) )
287286, 164chvarv 2263 . . . . . . . . 9  |-  ( (
ph  /\  z  e.  ( A [,] B ) )  ->  ( F `  ( z  +  T
) )  =  ( F `  z ) )
288273, 279, 287syl2anc 693 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )  ->  ( F `  ( z  +  T ) )  =  ( F `  z
) )
289135, 123, 271, 225, 272, 151, 288, 54limcperiod 39860 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  ( ( F  |`  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) } ) lim CC  (
( Q `  (
i  +  1 ) )  +  T ) ) )
290109eqcomd 2628 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 ( i  +  1 ) )  +  T )  =  ( S `  ( i  +  1 ) ) )
291267, 290oveq12d 6668 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( F  |`  { w  e.  CC  |  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) } ) lim CC  ( ( Q `  ( i  +  1 ) )  +  T ) )  =  ( ( x  e.  ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) )  |->  ( F `
 x ) ) lim
CC  ( S `  ( i  +  1 ) ) ) )
292289, 291eleqtrd 2703 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  ( ( x  e.  ( ( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) 
|->  ( F `  x
) ) lim CC  ( S `  ( i  +  1 ) ) ) )
293135, 123, 271, 225, 272, 151, 288, 55limcperiod 39860 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  ( ( F  |`  { w  e.  CC  |  E. z  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) w  =  ( z  +  T ) } ) lim CC  (
( Q `  i
)  +  T ) ) )
29499eqcomd 2628 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i )  +  T )  =  ( S `  i ) )
295267, 294oveq12d 6668 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( F  |`  { w  e.  CC  |  E. z  e.  ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) w  =  ( z  +  T ) } ) lim CC  ( ( Q `  i )  +  T ) )  =  ( ( x  e.  ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) )  |->  ( F `
 x ) ) lim
CC  ( S `  i ) ) )
296293, 295eleqtrd 2703 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  ( ( x  e.  ( ( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) 
|->  ( F `  x
) ) lim CC  ( S `  i )
) )
297120, 121, 269, 292, 296iblcncfioo 40194 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) )  |->  ( F `  x ) )  e.  L^1 )
29830ad2antrr 762 . . . . . 6  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  F : RR --> CC )
299120adantr 481 . . . . . . 7  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( S `  i )  e.  RR )
300121adantr 481 . . . . . . 7  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( S `  ( i  +  1 ) )  e.  RR )
301 simpr 477 . . . . . . 7  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )
302 eliccre 39728 . . . . . . 7  |-  ( ( ( S `  i
)  e.  RR  /\  ( S `  ( i  +  1 ) )  e.  RR  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
303299, 300, 301, 302syl3anc 1326 . . . . . 6  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  x  e.  RR )
304298, 303ffvelrnd 6360 . . . . 5  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( F `  x )  e.  CC )
305120, 121, 297, 304ibliooicc 40187 . . . 4  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) )  |->  ( F `  x ) )  e.  L^1 )
30615, 20, 94, 110, 119, 305itgspltprt 40195 . . 3  |-  ( ph  ->  S. ( ( S `
 0 ) [,] ( S `  M
) ) ( F `
 x )  _d x  =  sum_ i  e.  ( 0..^ M ) S. ( ( S `
 i ) [,] ( S `  (
i  +  1 ) ) ) ( F `
 x )  _d x )
307 iftrue 4092 . . . . . . . . . . . 12  |-  ( x  =  ( S `  i )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  =  R )
308307adantl 482 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  =  R )
309 fourierdlem81.g . . . . . . . . . . . . . . 15  |-  G  =  ( x  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( Q `  i
) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) ) )
310 iftrue 4092 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  ( Q `  i )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) ) )  =  R )
311 iftrue 4092 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  ( Q `  i )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) )  =  R )
312310, 311eqtr4d 2659 . . . . . . . . . . . . . . . . . 18  |-  ( x  =  ( Q `  i )  ->  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 ) ) ) )
313312adantl 482 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  x  =  ( Q `  i ) )  ->  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 ) ) ) )
314 iffalse 4095 . . . . . . . . . . . . . . . . . . . . 21  |-  ( -.  x  =  ( Q `
 i )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) )  =  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) ) )
315314adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( -.  x  =  ( Q `  i )  /\  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 ) ) )
316 iftrue 4092 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  =  ( Q `  ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  =  L )
317316adantl 482 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( -.  x  =  ( Q `  i )  /\  x  =  ( Q `  ( i  +  1 ) ) )  ->  if (
x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( F `
 x ) )  =  L )
318 iffalse 4095 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( -.  x  =  ( Q `
 i )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) ) )  =  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) ) )
319318adantr 481 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  x  =  ( Q `  i )  /\  x  =  ( Q `  ( i  +  1 ) ) )  ->  if (
x  =  ( Q `
 i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) )  =  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  x
) ) )
320 iftrue 4092 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  ( Q `  ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  =  L )
321320adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  x  =  ( Q `  i )  /\  x  =  ( Q `  ( i  +  1 ) ) )  ->  if (
x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) )  =  L )
322319, 321eqtr2d 2657 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( -.  x  =  ( Q `  i )  /\  x  =  ( Q `  ( i  +  1 ) ) )  ->  L  =  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) ) ) )
323315, 317, 3223eqtrd 2660 . . . . . . . . . . . . . . . . . . 19  |-  ( ( -.  x  =  ( Q `  i )  /\  x  =  ( 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 ) ) ) )
324323adantll 750 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  x  =  ( 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 ) ) ) )
325314ad2antlr 763 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  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 ) ) )
326 iffalse 4095 . . . . . . . . . . . . . . . . . . . 20  |-  ( -.  x  =  ( Q `
 ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( F `  x ) )  =  ( F `
 x ) )
327326adantl 482 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ( 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 ) )  =  ( F `
 x ) )
328318ad2antlr 763 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) ) )  =  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) ) )
329 iffalse 4095 . . . . . . . . . . . . . . . . . . . . 21  |-  ( -.  x  =  ( Q `
 ( i  +  1 ) )  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) )
330329adantl 482 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ( 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 ) )
331182ad3antrrr 766 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( Q `  i
)  e.  RR* )
332184ad3antrrr 766 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( Q `  (
i  +  1 ) )  e.  RR* )
33360ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  e.  RR )
33442ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  ( Q `  i )  e.  RR )
33560adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  x  e.  RR )
336182ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  ( Q `  i )  e.  RR* )
337184ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  ( Q `  ( i  +  1 ) )  e.  RR* )
338 simplr 792 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
339 iccgelb 12230 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  <_  x )
340336, 337, 338, 339syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  ( Q `  i )  <_  x
)
341 neqne 2802 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( -.  x  =  ( Q `
 i )  ->  x  =/=  ( Q `  i ) )
342341adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  x  =/=  ( Q `  i ) )
343334, 335, 340, 342leneltd 10191 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  ( Q `  i )  <  x
)
344343adantr 481 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( Q `  i
)  <  x )
34545ad3antrrr 766 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( Q `  (
i  +  1 ) )  e.  RR )
346182adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR* )
347184adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR* )
348 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
349 iccleub 12229 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  <_  ( Q `  (
i  +  1 ) ) )
350346, 347, 348, 349syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )  ->  x  <_  ( Q `  (
i  +  1 ) ) )
351350ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  <_  ( Q `  ( i  +  1 ) ) )
352 neqne 2802 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( -.  x  =  ( Q `
 ( i  +  1 ) )  ->  x  =/=  ( Q `  ( i  +  1 ) ) )
353352necomd 2849 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( -.  x  =  ( Q `
 ( i  +  1 ) )  -> 
( Q `  (
i  +  1 ) )  =/=  x )
354353adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  -> 
( Q `  (
i  +  1 ) )  =/=  x )
355333, 345, 351, 354leneltd 10191 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( Q `  ( i  +  1 ) ) )  ->  x  <  ( Q `  ( i  +  1 ) ) )
356331, 332, 333, 344, 355eliood 39720 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ( 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 ) ) ) )
357 fvres 6207 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  (
( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x )  =  ( F `  x ) )
358356, 357syl 17 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ( 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 ) )
359328, 330, 3583eqtrrd 2661 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ( 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 ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) ) )
360325, 327, 3593eqtrd 2660 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  /\  -.  x  =  ( 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 ) ) ) )
361324, 360pm2.61dan 832 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( Q `  i ) [,] ( Q `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( Q `  i )
)  ->  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 ) ) ) )
362313, 361pm2.61dan 832 . . . . . . . . . . . . . . . 16  |-  ( ( ( 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 ) ) ) )
363362mpteq2dva 4744 . . . . . . . . . . . . . . 15  |-  ( (
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
) ) ) ) )
364309, 363syl5eq 2668 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  G  =  ( 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 ) ) ) ) )
365 eqeq1 2626 . . . . . . . . . . . . . . . 16  |-  ( x  =  w  ->  (
x  =  ( Q `
 i )  <->  w  =  ( Q `  i ) ) )
366 eqeq1 2626 . . . . . . . . . . . . . . . . 17  |-  ( x  =  w  ->  (
x  =  ( Q `
 ( i  +  1 ) )  <->  w  =  ( Q `  ( i  +  1 ) ) ) )
367 fveq2 6191 . . . . . . . . . . . . . . . . 17  |-  ( x  =  w  ->  (
( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  w
) )
368366, 367ifbieq2d 4111 . . . . . . . . . . . . . . . 16  |-  ( x  =  w  ->  if ( x  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  x ) )  =  if ( w  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  w ) ) )
369365, 368ifbieq2d 4111 . . . . . . . . . . . . . . 15  |-  ( x  =  w  ->  if ( x  =  ( Q `  i ) ,  R ,  if ( x  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  x ) ) )  =  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  w
) ) ) )
370369cbvmptv 4750 . . . . . . . . . . . . . 14  |-  ( 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 ) ) ) )  =  ( w  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  |->  if ( w  =  ( Q `
 i ) ,  R ,  if ( w  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  w ) ) ) )
371364, 370syl6eq 2672 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  G  =  ( w  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  w ) ) ) ) )
372371adantr 481 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  G  =  ( w  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  w
) ) ) ) )
373 simpr 477 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i ) )  /\  w  =  ( x  -  T ) )  ->  w  =  ( x  -  T ) )
374 oveq1 6657 . . . . . . . . . . . . . . 15  |-  ( x  =  ( S `  i )  ->  (
x  -  T )  =  ( ( S `
 i )  -  T ) )
375374ad2antlr 763 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i ) )  /\  w  =  ( x  -  T ) )  -> 
( x  -  T
)  =  ( ( S `  i )  -  T ) )
376227eqcomd 2628 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( S `
 i )  -  T )  =  ( Q `  i ) )
377376ad2antrr 762 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i ) )  /\  w  =  ( x  -  T ) )  -> 
( ( S `  i )  -  T
)  =  ( Q `
 i ) )
378373, 375, 3773eqtrd 2660 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i ) )  /\  w  =  ( x  -  T ) )  ->  w  =  ( Q `  i ) )
379378iftrued 4094 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i ) )  /\  w  =  ( x  -  T ) )  ->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  w ) ) )  =  R )
380374adantl 482 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  (
x  -  T )  =  ( ( S `
 i )  -  T ) )
38142, 45, 29ltled 10185 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  <_  ( Q `  ( i  +  1 ) ) )
382 lbicc2 12288 . . . . . . . . . . . . . . . 16  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  ( Q `  i )  <_  ( Q `  (
i  +  1 ) ) )  ->  ( Q `  i )  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
383182, 184, 381, 382syl3anc 1326 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
384376, 383eqeltrd 2701 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( S `
 i )  -  T )  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
385384adantr 481 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  (
( S `  i
)  -  T )  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) )
386380, 385eqeltrd 2701 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  (
x  -  T )  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) )
387 limccl 23639 . . . . . . . . . . . . . 14  |-  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) lim CC  ( Q `  i ) )  C_  CC
388387, 55sseldi 3601 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  R  e.  CC )
389388adantr 481 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  R  e.  CC )
390372, 379, 386, 389fvmptd 6288 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  ( G `  ( x  -  T ) )  =  R )
391308, 390eqtr4d 2659 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  =  ( G `  ( x  -  T
) ) )
392391adantlr 751 . . . . . . . . 9  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  x  =  ( S `  i ) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) )  =  ( G `  ( x  -  T ) ) )
393 iffalse 4095 . . . . . . . . . . 11  |-  ( -.  x  =  ( S `
 i )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) )  =  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) )
394393adantl 482 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  if (
x  =  ( S `
 i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  =  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) `  x
) ) )
395371adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  (
i  +  1 ) ) )  ->  G  =  ( w  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  w
) ) ) ) )
396 eqeq1 2626 . . . . . . . . . . . . . . . . . 18  |-  ( w  =  ( ( S `
 ( i  +  1 ) )  -  T )  ->  (
w  =  ( Q `
 i )  <->  ( ( S `  ( i  +  1 ) )  -  T )  =  ( Q `  i
) ) )
397 eqeq1 2626 . . . . . . . . . . . . . . . . . . 19  |-  ( w  =  ( ( S `
 ( i  +  1 ) )  -  T )  ->  (
w  =  ( Q `
 ( i  +  1 ) )  <->  ( ( S `  ( i  +  1 ) )  -  T )  =  ( Q `  (
i  +  1 ) ) ) )
398 fveq2 6191 . . . . . . . . . . . . . . . . . . 19  |-  ( w  =  ( ( S `
 ( i  +  1 ) )  -  T )  ->  (
( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  w )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
( S `  (
i  +  1 ) )  -  T ) ) )
399397, 398ifbieq2d 4111 . . . . . . . . . . . . . . . . . 18  |-  ( w  =  ( ( S `
 ( i  +  1 ) )  -  T )  ->  if ( w  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  w ) )  =  if ( ( ( S `  ( i  +  1 ) )  -  T
)  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  ( ( S `  ( i  +  1 ) )  -  T
) ) ) )
400396, 399ifbieq2d 4111 . . . . . . . . . . . . . . . . 17  |-  ( w  =  ( ( S `
 ( i  +  1 ) )  -  T )  ->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  w ) ) )  =  if ( ( ( S `  (
i  +  1 ) )  -  T )  =  ( Q `  i ) ,  R ,  if ( ( ( S `  ( i  +  1 ) )  -  T )  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
( S `  (
i  +  1 ) )  -  T ) ) ) ) )
401400adantl 482 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  w  =  ( ( S `  ( i  +  1 ) )  -  T
) )  ->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  w ) ) )  =  if ( ( ( S `  (
i  +  1 ) )  -  T )  =  ( Q `  i ) ,  R ,  if ( ( ( S `  ( i  +  1 ) )  -  T )  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
( S `  (
i  +  1 ) )  -  T ) ) ) ) )
402 eqeq1 2626 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( S `  (
i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) )  ->  (
( ( S `  ( i  +  1 ) )  -  T
)  =  ( Q `
 i )  <->  ( Q `  ( i  +  1 ) )  =  ( Q `  i ) ) )
403 iftrue 4092 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( S `  (
i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) )  ->  if ( ( ( S `
 ( i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  ( ( S `  ( i  +  1 ) )  -  T ) ) )  =  L )
404402, 403ifbieq2d 4111 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( S `  (
i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) )  ->  if ( ( ( S `
 ( i  +  1 ) )  -  T )  =  ( Q `  i ) ,  R ,  if ( ( ( S `
 ( i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  ( ( S `  ( i  +  1 ) )  -  T ) ) ) )  =  if ( ( Q `  ( i  +  1 ) )  =  ( Q `  i ) ,  R ,  L
) )
405246, 404syl 17 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  if ( ( ( S `  (
i  +  1 ) )  -  T )  =  ( Q `  i ) ,  R ,  if ( ( ( S `  ( i  +  1 ) )  -  T )  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
( S `  (
i  +  1 ) )  -  T ) ) ) )  =  if ( ( Q `
 ( i  +  1 ) )  =  ( Q `  i
) ,  R ,  L ) )
406405adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  w  =  ( ( S `  ( i  +  1 ) )  -  T
) )  ->  if ( ( ( S `
 ( i  +  1 ) )  -  T )  =  ( Q `  i ) ,  R ,  if ( ( ( S `
 ( i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  ( ( S `  ( i  +  1 ) )  -  T ) ) ) )  =  if ( ( Q `  ( i  +  1 ) )  =  ( Q `  i ) ,  R ,  L
) )
40742, 29gtned 10172 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  =/=  ( Q `  i )
)
408407neneqd 2799 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  -.  ( Q `  ( i  +  1 ) )  =  ( Q `  i ) )
409408iffalsed 4097 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  if ( ( Q `  ( i  +  1 ) )  =  ( Q `  i ) ,  R ,  L )  =  L )
410409adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  w  =  ( ( S `  ( i  +  1 ) )  -  T
) )  ->  if ( ( Q `  ( i  +  1 ) )  =  ( Q `  i ) ,  R ,  L
)  =  L )
411401, 406, 4103eqtrd 2660 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  w  =  ( ( S `  ( i  +  1 ) )  -  T
) )  ->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  w ) ) )  =  L )
412411adantlr 751 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  ( i  +  1 ) ) )  /\  w  =  ( ( S `  ( i  +  1 ) )  -  T ) )  ->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  w
) ) )  =  L )
413 ubicc2 12289 . . . . . . . . . . . . . . . . 17  |-  ( ( ( Q `  i
)  e.  RR*  /\  ( Q `  ( i  +  1 ) )  e.  RR*  /\  ( Q `  i )  <_  ( Q `  (
i  +  1 ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) )
414182, 184, 381, 413syl3anc 1326 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  ( i  +  1 ) )  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
415246, 414eqeltrd 2701 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( S `
 ( i  +  1 ) )  -  T )  e.  ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) )
416415adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  (
i  +  1 ) ) )  ->  (
( S `  (
i  +  1 ) )  -  T )  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) )
417 limccl 23639 . . . . . . . . . . . . . . . 16  |-  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) lim CC  ( Q `  ( i  +  1 ) ) )  C_  CC
418417, 54sseldi 3601 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  L  e.  CC )
419418adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  (
i  +  1 ) ) )  ->  L  e.  CC )
420395, 412, 416, 419fvmptd 6288 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  (
i  +  1 ) ) )  ->  ( G `  ( ( S `  ( i  +  1 ) )  -  T ) )  =  L )
421 oveq1 6657 . . . . . . . . . . . . . . 15  |-  ( x  =  ( S `  ( i  +  1 ) )  ->  (
x  -  T )  =  ( ( S `
 ( i  +  1 ) )  -  T ) )
422421fveq2d 6195 . . . . . . . . . . . . . 14  |-  ( x  =  ( S `  ( i  +  1 ) )  ->  ( G `  ( x  -  T ) )  =  ( G `  (
( S `  (
i  +  1 ) )  -  T ) ) )
423422adantl 482 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  (
i  +  1 ) ) )  ->  ( G `  ( x  -  T ) )  =  ( G `  (
( S `  (
i  +  1 ) )  -  T ) ) )
424 iftrue 4092 . . . . . . . . . . . . . 14  |-  ( x  =  ( S `  ( i  +  1 ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  =  L )
425424adantl 482 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  (
i  +  1 ) ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  =  L )
426420, 423, 4253eqtr4rd 2667 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  (
i  +  1 ) ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( G `
 ( x  -  T ) ) )
427426ad4ant14 1293 . . . . . . . . . . 11  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  x  =  ( S `  ( i  +  1 ) ) )  ->  if (
x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) )  =  ( G `  (
x  -  T ) ) )
428 iffalse 4095 . . . . . . . . . . . . 13  |-  ( -.  x  =  ( S `
 ( i  +  1 ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) )
429428adantl 482 . . . . . . . . . . . 12  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) )
430371adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  G  =  ( w  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  w
) ) ) ) )
431430ad2antrr 762 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  G  =  ( w  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) )  |->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  w
) ) ) ) )
432 eqeq1 2626 . . . . . . . . . . . . . . . . . 18  |-  ( w  =  ( x  -  T )  ->  (
w  =  ( Q `
 i )  <->  ( x  -  T )  =  ( Q `  i ) ) )
433 eqeq1 2626 . . . . . . . . . . . . . . . . . . 19  |-  ( w  =  ( x  -  T )  ->  (
w  =  ( Q `
 ( i  +  1 ) )  <->  ( x  -  T )  =  ( Q `  ( i  +  1 ) ) ) )
434 fveq2 6191 . . . . . . . . . . . . . . . . . . 19  |-  ( w  =  ( x  -  T )  ->  (
( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  w )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
x  -  T ) ) )
435433, 434ifbieq2d 4111 . . . . . . . . . . . . . . . . . 18  |-  ( w  =  ( x  -  T )  ->  if ( w  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  w ) )  =  if ( ( x  -  T
)  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  ( x  -  T
) ) ) )
436432, 435ifbieq2d 4111 . . . . . . . . . . . . . . . . 17  |-  ( w  =  ( x  -  T )  ->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  w ) ) )  =  if ( ( x  -  T )  =  ( Q `  i ) ,  R ,  if ( ( x  -  T )  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
x  -  T ) ) ) ) )
437436adantl 482 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  /\  w  =  ( x  -  T
) )  ->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  w ) ) )  =  if ( ( x  -  T )  =  ( Q `  i ) ,  R ,  if ( ( x  -  T )  =  ( Q `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
x  -  T ) ) ) ) )
438303recnd 10068 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  x  e.  CC )
439225adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  T  e.  CC )
440438, 439npcand 10396 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
( x  -  T
)  +  T )  =  x )
441440eqcomd 2628 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  x  =  ( ( x  -  T )  +  T ) )
442441adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  ( x  -  T
)  =  ( Q `
 i ) )  ->  x  =  ( ( x  -  T
)  +  T ) )
443 oveq1 6657 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  -  T )  =  ( Q `  i )  ->  (
( x  -  T
)  +  T )  =  ( ( Q `
 i )  +  T ) )
444443adantl 482 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  ( x  -  T
)  =  ( Q `
 i ) )  ->  ( ( x  -  T )  +  T )  =  ( ( Q `  i
)  +  T ) )
445294ad2antrr 762 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  ( x  -  T
)  =  ( Q `
 i ) )  ->  ( ( Q `
 i )  +  T )  =  ( S `  i ) )
446442, 444, 4453eqtrd 2660 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  ( x  -  T
)  =  ( Q `
 i ) )  ->  x  =  ( S `  i ) )
447446stoic1a 1697 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  -.  (
x  -  T )  =  ( Q `  i ) )
448447iffalsed 4097 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  if (
( x  -  T
)  =  ( Q `
 i ) ,  R ,  if ( ( x  -  T
)  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  ( x  -  T
) ) ) )  =  if ( ( x  -  T )  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
x  -  T ) ) ) )
449448ad2antrr 762 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  /\  w  =  ( x  -  T
) )  ->  if ( ( x  -  T )  =  ( Q `  i ) ,  R ,  if ( ( x  -  T )  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  ( x  -  T ) ) ) )  =  if ( ( x  -  T )  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  ( x  -  T ) ) ) )
450441adantr 481 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  ( x  -  T
)  =  ( Q `
 ( i  +  1 ) ) )  ->  x  =  ( ( x  -  T
)  +  T ) )
451 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  -  T )  =  ( Q `  ( i  +  1 ) )  ->  (
( x  -  T
)  +  T )  =  ( ( Q `
 ( i  +  1 ) )  +  T ) )
452451adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  ( x  -  T
)  =  ( Q `
 ( i  +  1 ) ) )  ->  ( ( x  -  T )  +  T )  =  ( ( Q `  (
i  +  1 ) )  +  T ) )
453290ad2antrr 762 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  ( x  -  T
)  =  ( Q `
 ( i  +  1 ) ) )  ->  ( ( Q `
 ( i  +  1 ) )  +  T )  =  ( S `  ( i  +  1 ) ) )
454450, 452, 4533eqtrd 2660 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  ( x  -  T
)  =  ( Q `
 ( i  +  1 ) ) )  ->  x  =  ( S `  ( i  +  1 ) ) )
455454stoic1a 1697 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  -.  (
x  -  T )  =  ( Q `  ( i  +  1 ) ) )
456455iffalsed 4097 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  if (
( x  -  T
)  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  ( x  -  T
) ) )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
x  -  T ) ) )
457456adantlr 751 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  if ( ( x  -  T )  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  ( x  -  T ) ) )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  ( x  -  T
) ) )
458457adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  /\  w  =  ( x  -  T
) )  ->  if ( ( x  -  T )  =  ( Q `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  ( x  -  T ) ) )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  ( x  -  T
) ) )
459437, 449, 4583eqtrd 2660 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( (
ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  /\  w  =  ( x  -  T
) )  ->  if ( w  =  ( Q `  i ) ,  R ,  if ( w  =  ( Q `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  w ) ) )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
x  -  T ) ) )
46042adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  e.  RR )
46145adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
46275ad2antrr 762 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  T  e.  RR )
463303, 462resubcld 10458 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  e.  RR )
464227adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  =  ( ( S `
 i )  -  T ) )
465206adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( S `  i )  e.  RR* )
466208adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( S `  ( i  +  1 ) )  e.  RR* )
467 iccgelb 12230 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( S `  i
)  e.  RR*  /\  ( S `  ( i  +  1 ) )  e.  RR*  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( S `  i )  <_  x )
468465, 466, 301, 467syl3anc 1326 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( S `  i )  <_  x )
469299, 303, 462, 468lesub1dd 10643 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
( S `  i
)  -  T )  <_  ( x  -  T ) )
470464, 469eqbrtrd 4675 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( Q `  i )  <_  ( x  -  T
) )
471 iccleub 12229 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( S `  i
)  e.  RR*  /\  ( S `  ( i  +  1 ) )  e.  RR*  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  x  <_  ( S `  (
i  +  1 ) ) )
472465, 466, 301, 471syl3anc 1326 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  x  <_  ( S `  (
i  +  1 ) ) )
473303, 300, 462, 472lesub1dd 10643 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  <_  ( ( S `
 ( i  +  1 ) )  -  T ) )
474246adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
( S `  (
i  +  1 ) )  -  T )  =  ( Q `  ( i  +  1 ) ) )
475473, 474breqtrd 4679 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  <_  ( Q `  ( i  +  1 ) ) )
476460, 461, 463, 470, 475eliccd 39726 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) )
477476ad2antrr 762 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( x  -  T
)  e.  ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) )
478135, 271fssresd 6071 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) : ( ( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) --> CC )
479478ad3antrrr 766 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) : ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) --> CC )
480182ad3antrrr 766 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( Q `  i
)  e.  RR* )
481184ad3antrrr 766 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( Q `  (
i  +  1 ) )  e.  RR* )
482303ad2antrr 762 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  x  e.  RR )
48395ad3antrrr 766 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  T  e.  RR )
484482, 483resubcld 10458 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( x  -  T
)  e.  RR )
48542ad2antrr 762 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  ( Q `  i )  e.  RR )
486463adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  ( x  -  T )  e.  RR )
487470adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  ( Q `  i )  <_  (
x  -  T ) )
488447neqned 2801 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  ( x  -  T )  =/=  ( Q `  i )
)
489485, 486, 487, 488leneltd 10191 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  ( Q `  i )  <  (
x  -  T ) )
490489adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( Q `  i
)  <  ( x  -  T ) )
491463adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  ( x  -  T )  e.  RR )
49245ad2antrr 762 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
493475adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  ( x  -  T )  <_  ( Q `  ( i  +  1 ) ) )
494 eqcom 2629 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  -  T )  =  ( Q `  ( i  +  1 ) )  <->  ( Q `  ( i  +  1 ) )  =  ( x  -  T ) )
495454ex 450 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
( x  -  T
)  =  ( Q `
 ( i  +  1 ) )  ->  x  =  ( S `  ( i  +  1 ) ) ) )
496494, 495syl5bir 233 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
( Q `  (
i  +  1 ) )  =  ( x  -  T )  ->  x  =  ( S `  ( i  +  1 ) ) ) )
497496con3dimp 457 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  -.  ( Q `  ( i  +  1 ) )  =  ( x  -  T ) )
498497neqned 2801 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  ( Q `  ( i  +  1 ) )  =/=  (
x  -  T ) )
499491, 492, 493, 498leneltd 10191 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  ( x  -  T )  <  ( Q `  ( i  +  1 ) ) )
500499adantlr 751 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( x  -  T
)  <  ( Q `  ( i  +  1 ) ) )
501480, 481, 484, 490, 500eliood 39720 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( x  -  T
)  e.  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) )
502479, 501ffvelrnd 6360 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
x  -  T ) )  e.  CC )
503431, 459, 477, 502fvmptd 6288 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( G `  (
x  -  T ) )  =  ( ( F  |`  ( ( Q `  i ) (,) ( Q `  (
i  +  1 ) ) ) ) `  ( x  -  T
) ) )
504 fvres 6207 . . . . . . . . . . . . . . 15  |-  ( ( x  -  T )  e.  ( ( Q `
 i ) (,) ( Q `  (
i  +  1 ) ) )  ->  (
( F  |`  (
( Q `  i
) (,) ( Q `
 ( i  +  1 ) ) ) ) `  ( x  -  T ) )  =  ( F `  ( x  -  T
) ) )
505501, 504syl 17 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( ( F  |`  ( ( Q `  i ) (,) ( Q `  ( i  +  1 ) ) ) ) `  (
x  -  T ) )  =  ( F `
 ( x  -  T ) ) )
506503, 505eqtrd 2656 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( G `  (
x  -  T ) )  =  ( F `
 ( x  -  T ) ) )
507465ad2antrr 762 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( S `  i
)  e.  RR* )
508466ad2antrr 762 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( S `  (
i  +  1 ) )  e.  RR* )
509120ad2antrr 762 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  ( S `  i )  e.  RR )
510303adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  x  e.  RR )
511468adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  ( S `  i )  <_  x
)
512 neqne 2802 . . . . . . . . . . . . . . . . . . 19  |-  ( -.  x  =  ( S `
 i )  ->  x  =/=  ( S `  i ) )
513512adantl 482 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  x  =/=  ( S `  i ) )
514509, 510, 511, 513leneltd 10191 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  ( S `  i )  <  x
)
515514adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( S `  i
)  <  x )
516300ad2antrr 762 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( S `  (
i  +  1 ) )  e.  RR )
517472ad2antrr 762 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  x  <_  ( S `  ( i  +  1 ) ) )
518 neqne 2802 . . . . . . . . . . . . . . . . . . 19  |-  ( -.  x  =  ( S `
 ( i  +  1 ) )  ->  x  =/=  ( S `  ( i  +  1 ) ) )
519518necomd 2849 . . . . . . . . . . . . . . . . . 18  |-  ( -.  x  =  ( S `
 ( i  +  1 ) )  -> 
( S `  (
i  +  1 ) )  =/=  x )
520519adantl 482 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( S `  (
i  +  1 ) )  =/=  x )
521482, 516, 517, 520leneltd 10191 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  x  <  ( S `  ( i  +  1 ) ) )
522507, 508, 482, 515, 521eliood 39720 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  x  e.  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) )
523 fvres 6207 . . . . . . . . . . . . . . 15  |-  ( x  e.  ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) )  ->  (
( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x )  =  ( F `  x ) )
524522, 523syl 17 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) `  x
)  =  ( F `
 x ) )
525440fveq2d 6195 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( F `  ( (
x  -  T )  +  T ) )  =  ( F `  x ) )
526525eqcomd 2628 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( F `  x )  =  ( F `  ( ( x  -  T )  +  T
) ) )
527526ad2antrr 762 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( F `  x
)  =  ( F `
 ( ( x  -  T )  +  T ) ) )
528438, 439subcld 10392 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  e.  CC )
529 elex 3212 . . . . . . . . . . . . . . . . 17  |-  ( ( x  -  T )  e.  CC  ->  (
x  -  T )  e.  _V )
530528, 529syl 17 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  e.  _V )
531530ad2antrr 762 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( x  -  T
)  e.  _V )
532 simp-4l 806 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  ph )
533153adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  A  e.  RR* )
534155adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  B  e.  RR* )
535157adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  Q : ( 0 ... M ) --> ( A [,] B
) )
536 simpr 477 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  i  e.  ( 0..^ M ) )
537533, 534, 535, 536fourierdlem8 40332 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  C_  ( A [,] B ) )
538537adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) 
C_  ( A [,] B ) )
539538, 476sseldd 3604 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
x  -  T )  e.  ( A [,] B ) )
540539ad2antrr 762 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( x  -  T
)  e.  ( A [,] B ) )
541532, 540jca 554 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( ph  /\  (
x  -  T )  e.  ( A [,] B ) ) )
542 eleq1 2689 . . . . . . . . . . . . . . . . . 18  |-  ( y  =  ( x  -  T )  ->  (
y  e.  ( A [,] B )  <->  ( x  -  T )  e.  ( A [,] B ) ) )
543542anbi2d 740 . . . . . . . . . . . . . . . . 17  |-  ( y  =  ( x  -  T )  ->  (
( ph  /\  y  e.  ( A [,] B
) )  <->  ( ph  /\  ( x  -  T
)  e.  ( A [,] B ) ) ) )
544 oveq1 6657 . . . . . . . . . . . . . . . . . . 19  |-  ( y  =  ( x  -  T )  ->  (
y  +  T )  =  ( ( x  -  T )  +  T ) )
545544fveq2d 6195 . . . . . . . . . . . . . . . . . 18  |-  ( y  =  ( x  -  T )  ->  ( F `  ( y  +  T ) )  =  ( F `  (
( x  -  T
)  +  T ) ) )
546 fveq2 6191 . . . . . . . . . . . . . . . . . 18  |-  ( y  =  ( x  -  T )  ->  ( F `  y )  =  ( F `  ( x  -  T
) ) )
547545, 546eqeq12d 2637 . . . . . . . . . . . . . . . . 17  |-  ( y  =  ( x  -  T )  ->  (
( F `  (
y  +  T ) )  =  ( F `
 y )  <->  ( F `  ( ( x  -  T )  +  T
) )  =  ( F `  ( x  -  T ) ) ) )
548543, 547imbi12d 334 . . . . . . . . . . . . . . . 16  |-  ( y  =  ( x  -  T )  ->  (
( ( ph  /\  y  e.  ( A [,] B ) )  -> 
( F `  (
y  +  T ) )  =  ( F `
 y ) )  <-> 
( ( ph  /\  ( x  -  T
)  e.  ( A [,] B ) )  ->  ( F `  ( ( x  -  T )  +  T
) )  =  ( F `  ( x  -  T ) ) ) ) )
549 eleq1 2689 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  y  ->  (
x  e.  ( A [,] B )  <->  y  e.  ( A [,] B ) ) )
550549anbi2d 740 . . . . . . . . . . . . . . . . . 18  |-  ( x  =  y  ->  (
( ph  /\  x  e.  ( A [,] B
) )  <->  ( ph  /\  y  e.  ( A [,] B ) ) ) )
551 oveq1 6657 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  y  ->  (
x  +  T )  =  ( y  +  T ) )
552551fveq2d 6195 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  y  ->  ( F `  ( x  +  T ) )  =  ( F `  (
y  +  T ) ) )
553 fveq2 6191 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  y  ->  ( F `  x )  =  ( F `  y ) )
554552, 553eqeq12d 2637 . . . . . . . . . . . . . . . . . 18  |-  ( x  =  y  ->  (
( F `  (
x  +  T ) )  =  ( F `
 x )  <->  ( F `  ( y  +  T
) )  =  ( F `  y ) ) )
555550, 554imbi12d 334 . . . . . . . . . . . . . . . . 17  |-  ( x  =  y  ->  (
( ( ph  /\  x  e.  ( A [,] B ) )  -> 
( F `  (
x  +  T ) )  =  ( F `
 x ) )  <-> 
( ( ph  /\  y  e.  ( A [,] B ) )  -> 
( F `  (
y  +  T ) )  =  ( F `
 y ) ) ) )
556555, 164chvarv 2263 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  y  e.  ( A [,] B ) )  ->  ( F `  ( y  +  T
) )  =  ( F `  y ) )
557548, 556vtoclg 3266 . . . . . . . . . . . . . . 15  |-  ( ( x  -  T )  e.  _V  ->  (
( ph  /\  (
x  -  T )  e.  ( A [,] B ) )  -> 
( F `  (
( x  -  T
)  +  T ) )  =  ( F `
 ( x  -  T ) ) ) )
558531, 541, 557sylc 65 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( F `  (
( x  -  T
)  +  T ) )  =  ( F `
 ( x  -  T ) ) )
559524, 527, 5583eqtrd 2660 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) `  x
)  =  ( F `
 ( x  -  T ) ) )
560506, 559eqtr4d 2659 . . . . . . . . . . . 12  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( G `  (
x  -  T ) )  =  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) )
561429, 560eqtr4d 2659 . . . . . . . . . . 11  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( G `
 ( x  -  T ) ) )
562427, 561pm2.61dan 832 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  if (
x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) )  =  ( G `  (
x  -  T ) ) )
563394, 562eqtrd 2656 . . . . . . . . 9  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  if (
x  =  ( S `
 i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  =  ( G `  ( x  -  T
) ) )
564392, 563pm2.61dan 832 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  =  ( G `  ( x  -  T
) ) )
565308, 389eqeltrd 2701 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  i
) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  e.  CC )
566565adantlr 751 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  x  =  ( S `  i ) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) )  e.  CC )
567425, 419eqeltrd 2701 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  =  ( S `  (
i  +  1 ) ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  e.  CC )
568567ad4ant14 1293 . . . . . . . . . . . 12  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  x  =  ( S `  ( i  +  1 ) ) )  ->  if (
x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) )  e.  CC )
569263, 265fssresd 6071 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) : ( ( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) --> CC )
570569ad3antrrr 766 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) : ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) --> CC )
571570, 522ffvelrnd 6360 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  -> 
( ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) `  x
)  e.  CC )
572429, 571eqeltrd 2701 . . . . . . . . . . . 12  |-  ( ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  /\  -.  x  =  ( S `  ( i  +  1 ) ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  e.  CC )
573568, 572pm2.61dan 832 . . . . . . . . . . 11  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  if (
x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) )  e.  CC )
574394, 573eqeltrd 2701 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  (
i  +  1 ) ) ) )  /\  -.  x  =  ( S `  i )
)  ->  if (
x  =  ( S `
 i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  e.  CC )
575566, 574pm2.61dan 832 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  e.  CC )
576 eqid 2622 . . . . . . . . . 10  |-  ( x  e.  ( ( S `
 i ) [,] ( S `  (
i  +  1 ) ) )  |->  if ( x  =  ( S `
 i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) ) )  =  ( x  e.  ( ( S `
 i ) [,] ( S `  (
i  +  1 ) ) )  |->  if ( x  =  ( S `
 i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) ) )
577576fvmpt2 6291 . . . . . . . . 9  |-  ( ( x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) )  /\  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) )  e.  CC )  ->  ( ( x  e.  ( ( S `
 i ) [,] ( S `  (
i  +  1 ) ) )  |->  if ( x  =  ( S `
 i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  =  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `  (
i  +  1 ) ) ,  L , 
( ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) `  x
) ) ) )
578301, 575, 577syl2anc 693 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( S `  i
) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  =  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) )
579 nfv 1843 . . . . . . . . . . . . . 14  |-  F/ x
( ph  /\  i  e.  ( 0..^ M ) )
580 eqid 2622 . . . . . . . . . . . . . 14  |-  ( 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 ) ) ) )
581579, 580, 42, 45, 53, 54, 55cncfiooicc 40107 . . . . . . . . . . . . 13  |-  ( (
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 ) )
582364, 581eqeltrd 2701 . . . . . . . . . . . 12  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  G  e.  ( ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) -cn-> CC ) )
583 cncff 22696 . . . . . . . . . . . 12  |-  ( G  e.  ( ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) -cn-> CC )  ->  G :
( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) --> CC )
584582, 583syl 17 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  G : ( ( Q `  i
) [,] ( Q `
 ( i  +  1 ) ) ) --> CC )
585584adantr 481 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  G : ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) --> CC )
586585, 476ffvelrnd 6360 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( G `  ( x  -  T ) )  e.  CC )
587 fourierdlem81.h . . . . . . . . . 10  |-  H  =  ( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  ( G `  (
x  -  T ) ) )
588587fvmpt2 6291 . . . . . . . . 9  |-  ( ( x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) )  /\  ( G `  ( x  -  T ) )  e.  CC )  -> 
( H `  x
)  =  ( G `
 ( x  -  T ) ) )
589301, 586, 588syl2anc 693 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( H `  x )  =  ( G `  ( x  -  T
) ) )
590564, 578, 5893eqtr4rd 2667 . . . . . . 7  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  ( H `  x )  =  ( ( x  e.  ( ( S `
 i ) [,] ( S `  (
i  +  1 ) ) )  |->  if ( x  =  ( S `
 i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) ) ) `  x ) )
591590itgeq2dv 23548 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( H `  x )  _d x  =  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( ( x  e.  ( ( S `
 i ) [,] ( S `  (
i  +  1 ) ) )  |->  if ( x  =  ( S `
 i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  _d x )
592 ioossicc 12259 . . . . . . . . . . . 12  |-  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) )  C_  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) )
593592sseli 3599 . . . . . . . . . . 11  |-  ( x  e.  ( ( S `
 i ) (,) ( S `  (
i  +  1 ) ) )  ->  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )
594593adantl 482 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )
595593, 575sylan2 491 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  e.  CC )
596594, 595, 577syl2anc 693 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( S `  i
) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  =  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) )
597229, 237gtned 10172 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  =/=  ( S `  i
) )
598597neneqd 2799 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  -.  x  =  ( S `  i ) )
599598iffalsed 4097 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( S `  i ) ,  R ,  if ( x  =  ( S `
 ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) ) )  =  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ) `  x
) ) )
600230, 241ltned 10173 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  x  =/=  ( S `  (
i  +  1 ) ) )
601600neneqd 2799 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  -.  x  =  ( S `  ( i  +  1 ) ) )
602601iffalsed 4097 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( ( F  |`  ( ( S `  i ) (,) ( S `  (
i  +  1 ) ) ) ) `  x ) )
603523adantl 482 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x )  =  ( F `  x ) )
604602, 603eqtrd 2656 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) )  =  ( F `
 x ) )
605596, 599, 6043eqtrd 2660 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) )  ->  (
( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( S `  i
) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  =  ( F `  x ) )
606605itgeq2dv 23548 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ( ( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( S `  i
) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  _d x  =  S. ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ( F `  x )  _d x )
607578, 575eqeltrd 2701 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )  ->  (
( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( S `  i
) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  e.  CC )
608120, 121, 607itgioo 23582 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ( ( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( S `  i
) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  _d x  =  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( ( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( S `  i
) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  _d x )
609120, 121, 304itgioo 23582 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) (,) ( S `  ( i  +  1 ) ) ) ( F `  x )  _d x  =  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( F `  x )  _d x )
610606, 608, 6093eqtr3d 2664 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( ( x  e.  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) 
|->  if ( x  =  ( S `  i
) ,  R ,  if ( x  =  ( S `  ( i  +  1 ) ) ,  L ,  ( ( F  |`  (
( S `  i
) (,) ( S `
 ( i  +  1 ) ) ) ) `  x ) ) ) ) `  x )  _d x  =  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( F `  x )  _d x )
611591, 610eqtr2d 2657 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( F `  x )  _d x  =  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( H `  x )  _d x )
61299, 109oveq12d 6668 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( S `
 i ) [,] ( S `  (
i  +  1 ) ) )  =  ( ( ( Q `  i )  +  T
) [,] ( ( Q `  ( i  +  1 ) )  +  T ) ) )
613612itgeq1d 40172 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( H `  x )  _d x  =  S. ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) ( H `  x )  _d x )
614 simpr 477 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )
615612eqcomd 2628 . . . . . . . . . . 11  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( ( Q `  i )  +  T ) [,] ( ( Q `  ( i  +  1 ) )  +  T
) )  =  ( ( S `  i
) [,] ( S `
 ( i  +  1 ) ) ) )
616615adantr 481 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( ( Q `  i )  +  T
) [,] ( ( Q `  ( i  +  1 ) )  +  T ) )  =  ( ( S `
 i ) [,] ( S `  (
i  +  1 ) ) ) )
617614, 616eleqtrd 2703 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  x  e.  ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) )
618584adantr 481 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  G : ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) --> CC )
61942adantr 481 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  ( Q `  i )  e.  RR )
62045adantr 481 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  ( Q `  ( i  +  1 ) )  e.  RR )
62197adantr 481 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( Q `  i
)  +  T )  e.  RR )
622108adantr 481 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( Q `  (
i  +  1 ) )  +  T )  e.  RR )
623 eliccre 39728 . . . . . . . . . . . . 13  |-  ( ( ( ( Q `  i )  +  T
)  e.  RR  /\  ( ( Q `  ( i  +  1 ) )  +  T
)  e.  RR  /\  x  e.  ( (
( Q `  i
)  +  T ) [,] ( ( Q `
 ( i  +  1 ) )  +  T ) ) )  ->  x  e.  RR )
624621, 622, 614, 623syl3anc 1326 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  x  e.  RR )
62575ad2antrr 762 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  T  e.  RR )
626624, 625resubcld 10458 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
x  -  T )  e.  RR )
627226eqcomd 2628 . . . . . . . . . . . . 13  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( Q `  i )  =  ( ( ( Q `  i )  +  T
)  -  T ) )
628627adantr 481 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  ( Q `  i )  =  ( ( ( Q `  i )  +  T )  -  T ) )
629621rexrd 10089 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( Q `  i
)  +  T )  e.  RR* )
630622rexrd 10089 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( Q `  (
i  +  1 ) )  +  T )  e.  RR* )
631 iccgelb 12230 . . . . . . . . . . . . . 14  |-  ( ( ( ( Q `  i )  +  T
)  e.  RR*  /\  (
( Q `  (
i  +  1 ) )  +  T )  e.  RR*  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( Q `  i
)  +  T )  <_  x )
632629, 630, 614, 631syl3anc 1326 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( Q `  i
)  +  T )  <_  x )
633621, 624, 625, 632lesub1dd 10643 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( ( Q `  i )  +  T
)  -  T )  <_  ( x  -  T ) )
634628, 633eqbrtrd 4675 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  ( Q `  i )  <_  ( x  -  T
) )
635 iccleub 12229 . . . . . . . . . . . . . 14  |-  ( ( ( ( Q `  i )  +  T
)  e.  RR*  /\  (
( Q `  (
i  +  1 ) )  +  T )  e.  RR*  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  x  <_  ( ( Q `  ( i  +  1 ) )  +  T
) )
636629, 630, 614, 635syl3anc 1326 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  x  <_  ( ( Q `  ( i  +  1 ) )  +  T
) )
637624, 622, 625, 636lesub1dd 10643 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
x  -  T )  <_  ( ( ( Q `  ( i  +  1 ) )  +  T )  -  T ) )
638245adantr 481 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( ( Q `  ( i  +  1 ) )  +  T
)  -  T )  =  ( Q `  ( i  +  1 ) ) )
639637, 638breqtrd 4679 . . . . . . . . . . 11  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
x  -  T )  <_  ( Q `  ( i  +  1 ) ) )
640619, 620, 626, 634, 639eliccd 39726 . . . . . . . . . 10  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
x  -  T )  e.  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) )
641618, 640ffvelrnd 6360 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  ( G `  ( x  -  T ) )  e.  CC )
642617, 641, 588syl2anc 693 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  ( H `  x )  =  ( G `  ( x  -  T
) ) )
643 eqidd 2623 . . . . . . . . 9  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
y  e.  ( ( ( Q `  i
)  +  T ) [,] ( ( Q `
 ( i  +  1 ) )  +  T ) )  |->  ( G `  ( y  -  T ) ) )  =  ( y  e.  ( ( ( Q `  i )  +  T ) [,] ( ( Q `  ( i  +  1 ) )  +  T
) )  |->  ( G `
 ( y  -  T ) ) ) )
644 oveq1 6657 . . . . . . . . . . 11  |-  ( y  =  x  ->  (
y  -  T )  =  ( x  -  T ) )
645644fveq2d 6195 . . . . . . . . . 10  |-  ( y  =  x  ->  ( G `  ( y  -  T ) )  =  ( G `  (
x  -  T ) ) )
646645adantl 482 . . . . . . . . 9  |-  ( ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( (
( Q `  i
)  +  T ) [,] ( ( Q `
 ( i  +  1 ) )  +  T ) ) )  /\  y  =  x )  ->  ( G `  ( y  -  T
) )  =  ( G `  ( x  -  T ) ) )
647643, 646, 614, 641fvmptd 6288 . . . . . . . 8  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  (
( y  e.  ( ( ( Q `  i )  +  T
) [,] ( ( Q `  ( i  +  1 ) )  +  T ) ) 
|->  ( G `  (
y  -  T ) ) ) `  x
)  =  ( G `
 ( x  -  T ) ) )
648642, 647eqtr4d 2659 . . . . . . 7  |-  ( ( ( ph  /\  i  e.  ( 0..^ M ) )  /\  x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) )  ->  ( H `  x )  =  ( ( y  e.  ( ( ( Q `  i )  +  T ) [,] ( ( Q `  ( i  +  1 ) )  +  T
) )  |->  ( G `
 ( y  -  T ) ) ) `
 x ) )
649648itgeq2dv 23548 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( ( Q `  i
)  +  T ) [,] ( ( Q `
 ( i  +  1 ) )  +  T ) ) ( H `  x )  _d x  =  S. ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) ) ( ( y  e.  ( ( ( Q `  i )  +  T ) [,] ( ( Q `  ( i  +  1 ) )  +  T
) )  |->  ( G `
 ( y  -  T ) ) ) `
 x )  _d x )
65074adantr 481 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  T  e.  RR+ )
651645cbvmptv 4750 . . . . . . 7  |-  ( y  e.  ( ( ( Q `  i )  +  T ) [,] ( ( Q `  ( i  +  1 ) )  +  T
) )  |->  ( G `
 ( y  -  T ) ) )  =  ( x  e.  ( ( ( Q `
 i )  +  T ) [,] (
( Q `  (
i  +  1 ) )  +  T ) )  |->  ( G `  ( x  -  T
) ) )
65242, 45, 381, 582, 650, 651itgiccshift 40196 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( ( Q `  i
)  +  T ) [,] ( ( Q `
 ( i  +  1 ) )  +  T ) ) ( ( y  e.  ( ( ( Q `  i )  +  T
) [,] ( ( Q `  ( i  +  1 ) )  +  T ) ) 
|->  ( G `  (
y  -  T ) ) ) `  x
)  _d x  =  S. ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) ) ( G `
 x )  _d x )
653613, 649, 6523eqtrd 2660 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( H `  x )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( G `  x )  _d x )
654132adantr 481 . . . . . . . 8  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  dom  F  =  RR )
65559, 654sseqtr4d 3642 . . . . . . 7  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( ( Q `
 i ) [,] ( Q `  (
i  +  1 ) ) )  C_  dom  F )
65642, 45, 135, 53, 655, 55, 54, 309itgioocnicc 40193 . . . . . 6  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  ( G  e.  L^1  /\  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( G `  x )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( F `  x )  _d x ) )
657656simprd 479 . . . . 5  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( G `  x )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( F `  x )  _d x )
658611, 653, 6573eqtrd 2660 . . . 4  |-  ( (
ph  /\  i  e.  ( 0..^ M ) )  ->  S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( F `  x )  _d x  =  S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( F `  x )  _d x )
659658sumeq2dv 14433 . . 3  |-  ( ph  -> 
sum_ i  e.  ( 0..^ M ) S. ( ( S `  i ) [,] ( S `  ( i  +  1 ) ) ) ( F `  x )  _d x  =  sum_ i  e.  ( 0..^ M ) S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( F `  x )  _d x )
66090, 306, 6593eqtrrd 2661 . 2  |-  ( ph  -> 
sum_ i  e.  ( 0..^ M ) S. ( ( Q `  i ) [,] ( Q `  ( i  +  1 ) ) ) ( F `  x )  _d x  =  S. ( ( A  +  T ) [,] ( B  +  T ) ) ( F `  x )  _d x )
66114, 63, 6603eqtrrd 2661 1  |-  ( ph  ->  S. ( ( A  +  T ) [,] ( B  +  T
) ) ( F `
 x )  _d x  =  S. ( A [,] B ) ( F `  x
)  _d x )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 196    /\ wa 384    /\ w3a 1037    = wceq 1483    e. wcel 1990    =/= wne 2794   A.wral 2912   E.wrex 2913   {crab 2916   _Vcvv 3200    C_ wss 3574   ifcif 4086   class class class wbr 4653    |-> cmpt 4729   dom cdm 5114    |` cres 5116   -->wf 5884   ` cfv 5888  (class class class)co 6650    ^m cmap 7857   CCcc 9934   RRcr 9935   0cc0 9936   1c1 9937    + caddc 9939   RR*cxr 10073    < clt 10074    <_ cle 10075    - cmin 10266   NNcn 11020   NN0cn0 11292   ZZ>=cuz 11687   RR+crp 11832   (,)cioo 12175   [,]cicc 12178   ...cfz 12326  ..^cfzo 12465   sum_csu 14416   -cn->ccncf 22679   L^1cibl 23386   S.citg 23387   lim CC climc 23626
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-hash 13118  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-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-ditg 23611  df-limc 23630  df-dv 23631
This theorem is referenced by:  fourierdlem92  40415
  Copyright terms: Public domain W3C validator