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

Theorem fouriersw 40448
Description: Fourier series convergence, for the square wave function. Where  F is discontinuous, the series converges to  0, the average value of the left and the right limits. Notice that  F is an odd function and its Fourier expansion has only sine terms (coefficients for cosine terms are zero). (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fouriersw.t  |-  T  =  ( 2  x.  pi )
fouriersw.f  |-  F  =  ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
fouriersw.x  |-  X  e.  RR
fouriersw.z  |-  S  =  ( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) )
fouriersw.y  |-  Y  =  if ( ( X  mod  pi )  =  0 ,  0 ,  ( F `  X
) )
Assertion
Ref Expression
fouriersw  |-  ( ( ( 4  /  pi )  x.  sum_ k  e.  NN  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )  =  Y  /\  seq 1 (  +  ,  S )  ~~>  ( ( pi  / 
4 )  x.  Y
) )
Distinct variable groups:    x, k    n, F, x    x, T   
k, X, n, x   
k, Y
Allowed substitution hints:    S( x, k, n)    T( k, n)    F( k)    Y( x, n)

Proof of Theorem fouriersw
Dummy variable  y is distinct from all other variables.
StepHypRef Expression
1 nnuz 11723 . . . . . . 7  |-  NN  =  ( ZZ>= `  1 )
2 1zzd 11408 . . . . . . 7  |-  ( T. 
->  1  e.  ZZ )
3 eqidd 2623 . . . . . . . . 9  |-  ( k  e.  NN  ->  (
n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) )  =  ( n  e.  NN  |->  ( ( sin `  ( ( ( 2  x.  n
)  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  - 
1 ) ) ) )
4 oveq2 6658 . . . . . . . . . . . . . 14  |-  ( n  =  k  ->  (
2  x.  n )  =  ( 2  x.  k ) )
54oveq1d 6665 . . . . . . . . . . . . 13  |-  ( n  =  k  ->  (
( 2  x.  n
)  -  1 )  =  ( ( 2  x.  k )  - 
1 ) )
65oveq1d 6665 . . . . . . . . . . . 12  |-  ( n  =  k  ->  (
( ( 2  x.  n )  -  1 )  x.  X )  =  ( ( ( 2  x.  k )  -  1 )  x.  X ) )
76fveq2d 6195 . . . . . . . . . . 11  |-  ( n  =  k  ->  ( sin `  ( ( ( 2  x.  n )  -  1 )  x.  X ) )  =  ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) ) )
87, 5oveq12d 6668 . . . . . . . . . 10  |-  ( n  =  k  ->  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) )  =  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )
98adantl 482 . . . . . . . . 9  |-  ( ( k  e.  NN  /\  n  =  k )  ->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) )  =  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )
10 id 22 . . . . . . . . 9  |-  ( k  e.  NN  ->  k  e.  NN )
11 ovex 6678 . . . . . . . . . 10  |-  ( ( sin `  ( ( ( 2  x.  k
)  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  - 
1 ) )  e. 
_V
1211a1i 11 . . . . . . . . 9  |-  ( k  e.  NN  ->  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) )  e.  _V )
133, 9, 10, 12fvmptd 6288 . . . . . . . 8  |-  ( k  e.  NN  ->  (
( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) `  k )  =  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )
1413adantl 482 . . . . . . 7  |-  ( ( T.  /\  k  e.  NN )  ->  (
( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) `  k )  =  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )
15 2z 11409 . . . . . . . . . . . . . . 15  |-  2  e.  ZZ
1615a1i 11 . . . . . . . . . . . . . 14  |-  ( k  e.  NN  ->  2  e.  ZZ )
17 nnz 11399 . . . . . . . . . . . . . 14  |-  ( k  e.  NN  ->  k  e.  ZZ )
1816, 17zmulcld 11488 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  (
2  x.  k )  e.  ZZ )
19 1zzd 11408 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  1  e.  ZZ )
2018, 19zsubcld 11487 . . . . . . . . . . . 12  |-  ( k  e.  NN  ->  (
( 2  x.  k
)  -  1 )  e.  ZZ )
2120zcnd 11483 . . . . . . . . . . 11  |-  ( k  e.  NN  ->  (
( 2  x.  k
)  -  1 )  e.  CC )
22 fouriersw.x . . . . . . . . . . . . 13  |-  X  e.  RR
2322recni 10052 . . . . . . . . . . . 12  |-  X  e.  CC
2423a1i 11 . . . . . . . . . . 11  |-  ( k  e.  NN  ->  X  e.  CC )
2521, 24mulcld 10060 . . . . . . . . . 10  |-  ( k  e.  NN  ->  (
( ( 2  x.  k )  -  1 )  x.  X )  e.  CC )
2625sincld 14860 . . . . . . . . 9  |-  ( k  e.  NN  ->  ( sin `  ( ( ( 2  x.  k )  -  1 )  x.  X ) )  e.  CC )
27 0red 10041 . . . . . . . . . 10  |-  ( k  e.  NN  ->  0  e.  RR )
28 2re 11090 . . . . . . . . . . . . . 14  |-  2  e.  RR
2928a1i 11 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  2  e.  RR )
30 1red 10055 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  1  e.  RR )
3129, 30remulcld 10070 . . . . . . . . . . . 12  |-  ( k  e.  NN  ->  (
2  x.  1 )  e.  RR )
3231, 30resubcld 10458 . . . . . . . . . . 11  |-  ( k  e.  NN  ->  (
( 2  x.  1 )  -  1 )  e.  RR )
3320zred 11482 . . . . . . . . . . 11  |-  ( k  e.  NN  ->  (
( 2  x.  k
)  -  1 )  e.  RR )
34 0lt1 10550 . . . . . . . . . . . . 13  |-  0  <  1
35 2t1e2 11176 . . . . . . . . . . . . . . 15  |-  ( 2  x.  1 )  =  2
3635oveq1i 6660 . . . . . . . . . . . . . 14  |-  ( ( 2  x.  1 )  -  1 )  =  ( 2  -  1 )
37 2m1e1 11135 . . . . . . . . . . . . . 14  |-  ( 2  -  1 )  =  1
3836, 37eqtr2i 2645 . . . . . . . . . . . . 13  |-  1  =  ( ( 2  x.  1 )  - 
1 )
3934, 38breqtri 4678 . . . . . . . . . . . 12  |-  0  <  ( ( 2  x.  1 )  -  1 )
4039a1i 11 . . . . . . . . . . 11  |-  ( k  e.  NN  ->  0  <  ( ( 2  x.  1 )  -  1 ) )
4118zred 11482 . . . . . . . . . . . 12  |-  ( k  e.  NN  ->  (
2  x.  k )  e.  RR )
42 nnre 11027 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  k  e.  RR )
43 0le2 11111 . . . . . . . . . . . . . 14  |-  0  <_  2
4443a1i 11 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  0  <_  2 )
45 nnge1 11046 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  1  <_  k )
4630, 42, 29, 44, 45lemul2ad 10964 . . . . . . . . . . . 12  |-  ( k  e.  NN  ->  (
2  x.  1 )  <_  ( 2  x.  k ) )
4731, 41, 30, 46lesub1dd 10643 . . . . . . . . . . 11  |-  ( k  e.  NN  ->  (
( 2  x.  1 )  -  1 )  <_  ( ( 2  x.  k )  - 
1 ) )
4827, 32, 33, 40, 47ltletrd 10197 . . . . . . . . . 10  |-  ( k  e.  NN  ->  0  <  ( ( 2  x.  k )  -  1 ) )
4927, 48gtned 10172 . . . . . . . . 9  |-  ( k  e.  NN  ->  (
( 2  x.  k
)  -  1 )  =/=  0 )
5026, 21, 49divcld 10801 . . . . . . . 8  |-  ( k  e.  NN  ->  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) )  e.  CC )
5150adantl 482 . . . . . . 7  |-  ( ( T.  /\  k  e.  NN )  ->  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) )  e.  CC )
52 picn 24211 . . . . . . . . . . 11  |-  pi  e.  CC
5352a1i 11 . . . . . . . . . 10  |-  ( T. 
->  pi  e.  CC )
54 4cn 11098 . . . . . . . . . . 11  |-  4  e.  CC
5554a1i 11 . . . . . . . . . 10  |-  ( T. 
->  4  e.  CC )
56 4ne0 11117 . . . . . . . . . . 11  |-  4  =/=  0
5756a1i 11 . . . . . . . . . 10  |-  ( T. 
->  4  =/=  0
)
5853, 55, 57divcld 10801 . . . . . . . . 9  |-  ( T. 
->  ( pi  /  4
)  e.  CC )
59 eqid 2622 . . . . . . . . . . . . . . . 16  |-  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) )  =  ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) )
60 0cnd 10033 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  ->  0  e.  CC )
6154a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  4  e.  CC )
62 nncn 11028 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  n  e.  CC )
63 mulcl 10020 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  CC  /\  pi  e.  CC )  -> 
( n  x.  pi )  e.  CC )
6462, 52, 63sylancl 694 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  (
n  x.  pi )  e.  CC )
6552a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  pi  e.  CC )
66 nnne0 11053 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  n  =/=  0 )
67 0re 10040 . . . . . . . . . . . . . . . . . . . . . 22  |-  0  e.  RR
68 pipos 24212 . . . . . . . . . . . . . . . . . . . . . 22  |-  0  <  pi
6967, 68gtneii 10149 . . . . . . . . . . . . . . . . . . . . 21  |-  pi  =/=  0
7069a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  pi  =/=  0 )
7162, 65, 66, 70mulne0d 10679 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  (
n  x.  pi )  =/=  0 )
7261, 64, 71divcld 10801 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN  ->  (
4  /  ( n  x.  pi ) )  e.  CC )
7323a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  X  e.  CC )
7462, 73mulcld 10060 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  (
n  x.  X )  e.  CC )
7574sincld 14860 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN  ->  ( sin `  ( n  x.  X ) )  e.  CC )
7672, 75mulcld 10060 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  ->  (
( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) )  e.  CC )
7760, 76ifcld 4131 . . . . . . . . . . . . . . . 16  |-  ( n  e.  NN  ->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) )  e.  CC )
7859, 77fmpti 6383 . . . . . . . . . . . . . . 15  |-  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) : NN --> CC
7978a1i 11 . . . . . . . . . . . . . 14  |-  ( T. 
->  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) : NN --> CC )
80 eqidd 2623 . . . . . . . . . . . . . . . . . 18  |-  ( k  e.  NN  ->  (
n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) )  =  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) )
81 breq2 4657 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  =  k  ->  (
2  ||  n  <->  2  ||  k ) )
82 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( n  =  k  ->  (
n  x.  pi )  =  ( k  x.  pi ) )
8382oveq2d 6666 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  =  k  ->  (
4  /  ( n  x.  pi ) )  =  ( 4  / 
( k  x.  pi ) ) )
84 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( n  =  k  ->  (
n  x.  X )  =  ( k  x.  X ) )
8584fveq2d 6195 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  =  k  ->  ( sin `  ( n  x.  X ) )  =  ( sin `  (
k  x.  X ) ) )
8683, 85oveq12d 6668 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  =  k  ->  (
( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) )  =  ( ( 4  / 
( k  x.  pi ) )  x.  ( sin `  ( k  x.  X ) ) ) )
8781, 86ifbieq2d 4111 . . . . . . . . . . . . . . . . . . 19  |-  ( n  =  k  ->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) )  =  if ( 2 
||  k ,  0 ,  ( ( 4  /  ( k  x.  pi ) )  x.  ( sin `  (
k  x.  X ) ) ) ) )
8887adantl 482 . . . . . . . . . . . . . . . . . 18  |-  ( ( k  e.  NN  /\  n  =  k )  ->  if ( 2  ||  n ,  0 , 
( ( 4  / 
( n  x.  pi ) )  x.  ( sin `  ( n  x.  X ) ) ) )  =  if ( 2  ||  k ,  0 ,  ( ( 4  /  ( k  x.  pi ) )  x.  ( sin `  (
k  x.  X ) ) ) ) )
89 c0ex 10034 . . . . . . . . . . . . . . . . . . . 20  |-  0  e.  _V
90 ovex 6678 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( 4  /  ( k  x.  pi ) )  x.  ( sin `  (
k  x.  X ) ) )  e.  _V
9189, 90ifex 4156 . . . . . . . . . . . . . . . . . . 19  |-  if ( 2  ||  k ,  0 ,  ( ( 4  /  ( k  x.  pi ) )  x.  ( sin `  (
k  x.  X ) ) ) )  e. 
_V
9291a1i 11 . . . . . . . . . . . . . . . . . 18  |-  ( k  e.  NN  ->  if ( 2  ||  k ,  0 ,  ( ( 4  /  (
k  x.  pi ) )  x.  ( sin `  ( k  x.  X
) ) ) )  e.  _V )
9380, 88, 10, 92fvmptd 6288 . . . . . . . . . . . . . . . . 17  |-  ( k  e.  NN  ->  (
( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  k )  =  if ( 2 
||  k ,  0 ,  ( ( 4  /  ( k  x.  pi ) )  x.  ( sin `  (
k  x.  X ) ) ) ) )
9493adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( k  e.  NN  /\  ( k  /  2
)  e.  NN )  ->  ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) `
 k )  =  if ( 2  ||  k ,  0 , 
( ( 4  / 
( k  x.  pi ) )  x.  ( sin `  ( k  x.  X ) ) ) ) )
95 simpr 477 . . . . . . . . . . . . . . . . . 18  |-  ( ( k  e.  NN  /\  ( k  /  2
)  e.  NN )  ->  ( k  / 
2 )  e.  NN )
96 simpl 473 . . . . . . . . . . . . . . . . . . 19  |-  ( ( k  e.  NN  /\  ( k  /  2
)  e.  NN )  ->  k  e.  NN )
97 2nn 11185 . . . . . . . . . . . . . . . . . . 19  |-  2  e.  NN
98 nndivdvds 14989 . . . . . . . . . . . . . . . . . . 19  |-  ( ( k  e.  NN  /\  2  e.  NN )  ->  ( 2  ||  k  <->  ( k  /  2 )  e.  NN ) )
9996, 97, 98sylancl 694 . . . . . . . . . . . . . . . . . 18  |-  ( ( k  e.  NN  /\  ( k  /  2
)  e.  NN )  ->  ( 2  ||  k 
<->  ( k  /  2
)  e.  NN ) )
10095, 99mpbird 247 . . . . . . . . . . . . . . . . 17  |-  ( ( k  e.  NN  /\  ( k  /  2
)  e.  NN )  ->  2  ||  k
)
101100iftrued 4094 . . . . . . . . . . . . . . . 16  |-  ( ( k  e.  NN  /\  ( k  /  2
)  e.  NN )  ->  if ( 2 
||  k ,  0 ,  ( ( 4  /  ( k  x.  pi ) )  x.  ( sin `  (
k  x.  X ) ) ) )  =  0 )
10294, 101eqtrd 2656 . . . . . . . . . . . . . . 15  |-  ( ( k  e.  NN  /\  ( k  /  2
)  e.  NN )  ->  ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) `
 k )  =  0 )
1031023adant1 1079 . . . . . . . . . . . . . 14  |-  ( ( T.  /\  k  e.  NN  /\  ( k  /  2 )  e.  NN )  ->  (
( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  k )  =  0 )
104 fouriersw.f . . . . . . . . . . . . . . . . . 18  |-  F  =  ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
105 1re 10039 . . . . . . . . . . . . . . . . . . . 20  |-  1  e.  RR
106105renegcli 10342 . . . . . . . . . . . . . . . . . . . 20  |-  -u 1  e.  RR
107105, 106keepel 4155 . . . . . . . . . . . . . . . . . . 19  |-  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
)  e.  RR
108107a1i 11 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  RR  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  e.  RR )
109104, 108fmpti 6383 . . . . . . . . . . . . . . . . 17  |-  F : RR
--> RR
110 fouriersw.t . . . . . . . . . . . . . . . . 17  |-  T  =  ( 2  x.  pi )
111 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  y  ->  (
x  mod  T )  =  ( y  mod 
T ) )
112111breq1d 4663 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  y  ->  (
( x  mod  T
)  <  pi  <->  ( y  mod  T )  <  pi ) )
113112ifbid 4108 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  y  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  if ( ( y  mod  T
)  <  pi , 
1 ,  -u 1
) )
114113cbvmptv 4750 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  RR  |->  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )  =  ( y  e.  RR  |->  if ( ( y  mod 
T )  <  pi ,  1 ,  -u
1 ) )
115104, 114eqtri 2644 . . . . . . . . . . . . . . . . . . . 20  |-  F  =  ( y  e.  RR  |->  if ( ( y  mod 
T )  <  pi ,  1 ,  -u
1 ) )
116115a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  RR  ->  F  =  ( y  e.  RR  |->  if ( ( y  mod  T )  <  pi ,  1 ,  -u 1 ) ) )
117 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( y  =  ( x  +  T )  ->  (
y  mod  T )  =  ( ( x  +  T )  mod 
T ) )
118 pire 24210 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  pi  e.  RR
11928, 118remulcli 10054 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( 2  x.  pi )  e.  RR
120110, 119eqeltri 2697 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  T  e.  RR
121120recni 10052 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  T  e.  CC
122121mulid2i 10043 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( 1  x.  T )  =  T
123122eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  T  =  ( 1  x.  T
)
124123oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( x  +  T )  =  ( x  +  ( 1  x.  T ) )
125124oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( x  +  T )  mod  T )  =  ( ( x  +  ( 1  x.  T
) )  mod  T
)
126117, 125syl6eq 2672 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( y  =  ( x  +  T )  ->  (
y  mod  T )  =  ( ( x  +  ( 1  x.  T ) )  mod 
T ) )
127126adantl 482 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  RR  /\  y  =  ( x  +  T ) )  -> 
( y  mod  T
)  =  ( ( x  +  ( 1  x.  T ) )  mod  T ) )
128 simpl 473 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  RR  /\  y  =  ( x  +  T ) )  ->  x  e.  RR )
129 2pos 11112 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  0  <  2
13028, 118, 129, 68mulgt0ii 10170 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  0  <  ( 2  x.  pi )
131110eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( 2  x.  pi )  =  T
132130, 131breqtri 4678 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  0  <  T
133120, 132elrpii 11835 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  T  e.  RR+
134133a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  RR  /\  y  =  ( x  +  T ) )  ->  T  e.  RR+ )
135 1zzd 11408 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  RR  /\  y  =  ( x  +  T ) )  -> 
1  e.  ZZ )
136 modcyc 12705 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  RR  /\  T  e.  RR+  /\  1  e.  ZZ )  ->  (
( x  +  ( 1  x.  T ) )  mod  T )  =  ( x  mod  T ) )
137128, 134, 135, 136syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  RR  /\  y  =  ( x  +  T ) )  -> 
( ( x  +  ( 1  x.  T
) )  mod  T
)  =  ( x  mod  T ) )
138127, 137eqtrd 2656 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  RR  /\  y  =  ( x  +  T ) )  -> 
( y  mod  T
)  =  ( x  mod  T ) )
139138breq1d 4663 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( x  e.  RR  /\  y  =  ( x  +  T ) )  -> 
( ( y  mod 
T )  <  pi  <->  ( x  mod  T )  <  pi ) )
140139ifbid 4108 . . . . . . . . . . . . . . . . . . 19  |-  ( ( x  e.  RR  /\  y  =  ( x  +  T ) )  ->  if ( ( y  mod 
T )  <  pi ,  1 ,  -u
1 )  =  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
141 id 22 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  RR  ->  x  e.  RR )
142120a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  RR  ->  T  e.  RR )
143141, 142readdcld 10069 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  RR  ->  (
x  +  T )  e.  RR )
144116, 140, 143, 108fvmptd 6288 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  RR  ->  ( F `  ( x  +  T ) )  =  if ( ( x  mod  T )  < 
pi ,  1 , 
-u 1 ) )
145104fvmpt2 6291 . . . . . . . . . . . . . . . . . . 19  |-  ( ( x  e.  RR  /\  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  e.  RR )  ->  ( F `  x )  =  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
146107, 145mpan2 707 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  RR  ->  ( F `  x )  =  if ( ( x  mod  T )  < 
pi ,  1 , 
-u 1 ) )
147144, 146eqtr4d 2659 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  RR  ->  ( F `  ( x  +  T ) )  =  ( F `  x
) )
148 eqid 2622 . . . . . . . . . . . . . . . . 17  |-  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  =  ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )
149 snfi 8038 . . . . . . . . . . . . . . . . . 18  |-  { 0 }  e.  Fin
150 eldifi 3732 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( ( -u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  x  e.  ( -u pi (,) pi ) )
151 0xr 10086 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  0  e.  RR*
152151a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( x  e.  ( -u pi (,) pi )  /\  0  <  x )  -> 
0  e.  RR* )
153118rexri 10097 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  pi  e.  RR*
154153a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( x  e.  ( -u pi (,) pi )  /\  0  <  x )  ->  pi  e.  RR* )
155 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( x  e.  ( -u pi (,) pi )  ->  x  e.  RR )
156155adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( x  e.  ( -u pi (,) pi )  /\  0  <  x )  ->  x  e.  RR )
157 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( x  e.  ( -u pi (,) pi )  /\  0  <  x )  -> 
0  <  x )
158118renegcli 10342 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  -u pi  e.  RR
159158rexri 10097 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  -u pi  e.  RR*
160 iooltub 39735 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( (
-u pi  e.  RR*  /\  pi  e.  RR*  /\  x  e.  ( -u pi (,) pi ) )  ->  x  <  pi )
161159, 153, 160mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( x  e.  ( -u pi (,) pi )  ->  x  <  pi )
162161adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( x  e.  ( -u pi (,) pi )  /\  0  <  x )  ->  x  <  pi )
163152, 154, 156, 157, 162eliood 39720 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  ( -u pi (,) pi )  /\  0  <  x )  ->  x  e.  ( 0 (,) pi ) )
164 negpilt0 39492 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  -u pi  <  0
165158, 67, 164ltleii 10160 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  -u pi  <_  0
166 iooss1 12210 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( (
-u pi  e.  RR*  /\  -u pi  <_  0 )  ->  ( 0 (,) pi )  C_  ( -u pi (,) pi ) )
167159, 165, 166mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( 0 (,) pi )  C_  ( -u pi (,) pi )
168167sseli 3599 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( x  e.  ( 0 (,) pi )  ->  x  e.  ( -u pi (,) pi ) )
169104reseq1i 5392 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( F  |`  ( 0 (,) pi ) )  =  ( ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )  |`  (
0 (,) pi ) )
170 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( 0 (,) pi )  C_  RR
171 resmpt 5449 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( 0 (,) pi ) 
C_  RR  ->  ( ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )  |`  (
0 (,) pi ) )  =  ( x  e.  ( 0 (,) pi )  |->  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) ) )
172170, 171ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )  |`  (
0 (,) pi ) )  =  ( x  e.  ( 0 (,) pi )  |->  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )
173 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( 0 (,) pi )  ->  x  e.  RR )
174133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( 0 (,) pi )  ->  T  e.  RR+ )
175 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( 0 (,) pi )  ->  0  e.  RR )
176 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( ( 0  e.  RR*  /\  pi  e.  RR*  /\  x  e.  ( 0 (,) pi ) )  ->  0  <  x )
177151, 153, 176mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( 0 (,) pi )  ->  0  <  x )
178175, 173, 177ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( 0 (,) pi )  ->  0  <_  x )
179118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( 0 (,) pi )  ->  pi  e.  RR )
180120a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( 0 (,) pi )  ->  T  e.  RR )
181168, 161syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( 0 (,) pi )  ->  x  <  pi )
182 pirp 24213 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  pi  e.  RR+
183 2timesgt 39500 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( pi  e.  RR+  ->  pi  <  ( 2  x.  pi ) )
184182, 183ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  pi  <  ( 2  x.  pi )
185184, 131breqtri 4678 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  pi  <  T
186185a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( 0 (,) pi )  ->  pi  <  T )
187173, 179, 180, 181, 186lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( 0 (,) pi )  ->  x  <  T )
188 modid 12695 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( ( ( x  e.  RR  /\  T  e.  RR+ )  /\  ( 0  <_  x  /\  x  <  T ) )  ->  ( x  mod  T )  =  x )
189173, 174, 178, 187, 188syl22anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( 0 (,) pi )  ->  (
x  mod  T )  =  x )
190189, 181eqbrtrd 4675 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( 0 (,) pi )  ->  (
x  mod  T )  <  pi )
191190iftrued 4094 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( 0 (,) pi )  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  1 )
192191mpteq2ia 4740 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( 0 (,) pi )  |->  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )  =  ( x  e.  ( 0 (,) pi )  |->  1 )
193169, 172, 1923eqtrri 2649 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( 0 (,) pi )  |->  1 )  =  ( F  |`  ( 0 (,) pi ) )
194193oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( RR 
_D  ( x  e.  ( 0 (,) pi )  |->  1 ) )  =  ( RR  _D  ( F  |`  ( 0 (,) pi ) ) )
195 reelprrecn 10028 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  RR  e.  { RR ,  CC }
196195a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
->  RR  e.  { RR ,  CC } )
197 iooretop 22569 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( 0 (,) pi )  e.  ( topGen `  ran  (,) )
198 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( TopOpen ` fld )  =  ( TopOpen ` fld )
199198tgioo2 22606 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( topGen ` 
ran  (,) )  =  ( ( TopOpen ` fld )t  RR )
200197, 199eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( 0 (,) pi )  e.  ( ( TopOpen ` fld )t  RR )
201200a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
->  ( 0 (,) pi )  e.  ( ( TopOpen
` fld
)t 
RR ) )
202 1cnd 10056 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
->  1  e.  CC )
203196, 201, 202dvmptconst 40129 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( T. 
->  ( RR  _D  (
x  e.  ( 0 (,) pi )  |->  1 ) )  =  ( x  e.  ( 0 (,) pi )  |->  0 ) )
204203trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( RR 
_D  ( x  e.  ( 0 (,) pi )  |->  1 ) )  =  ( x  e.  ( 0 (,) pi )  |->  0 )
205 ssid 3624 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  RR  C_  RR
206 ax-resscn 9993 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  RR  C_  CC
207 fss 6056 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( F : RR --> RR  /\  RR  C_  CC )  ->  F : RR --> CC )
208109, 206, 207mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  F : RR
--> CC
209 dvresioo 40136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( RR  C_  RR  /\  F : RR --> CC )  -> 
( RR  _D  ( F  |`  ( 0 (,) pi ) ) )  =  ( ( RR 
_D  F )  |`  ( 0 (,) pi ) ) )
210205, 208, 209mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( RR 
_D  ( F  |`  ( 0 (,) pi ) ) )  =  ( ( RR  _D  F )  |`  (
0 (,) pi ) )
211194, 204, 2103eqtr3i 2652 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( 0 (,) pi )  |->  0 )  =  ( ( RR 
_D  F )  |`  ( 0 (,) pi ) )
212211dmeqi 5325 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  dom  (
x  e.  ( 0 (,) pi )  |->  0 )  =  dom  (
( RR  _D  F
)  |`  ( 0 (,) pi ) )
213 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( 0 (,) pi )  |->  0 )  =  ( x  e.  ( 0 (,) pi )  |->  0 )
21489, 213dmmpti 6023 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  dom  (
x  e.  ( 0 (,) pi )  |->  0 )  =  ( 0 (,) pi )
215212, 214eqtr3i 2646 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  dom  (
( RR  _D  F
)  |`  ( 0 (,) pi ) )  =  ( 0 (,) pi )
216 ssdmres 5420 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( 0 (,) pi ) 
C_  dom  ( RR  _D  F )  <->  dom  ( ( RR  _D  F )  |`  ( 0 (,) pi ) )  =  ( 0 (,) pi ) )
217215, 216mpbir 221 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( 0 (,) pi )  C_  dom  ( RR  _D  F
)
218217sseli 3599 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( x  e.  ( 0 (,) pi )  ->  x  e.  dom  ( RR  _D  F ) )
219168, 218elind 3798 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  ( 0 (,) pi )  ->  x  e.  ( ( -u pi (,) pi )  i^i  dom  ( RR  _D  F
) ) )
220 dmres 5419 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  =  ( ( -u pi (,) pi )  i^i  dom  ( RR  _D  F
) )
221219, 220syl6eleqr 2712 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( x  e.  ( 0 (,) pi )  ->  x  e.  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
222163, 221syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( x  e.  ( -u pi (,) pi )  /\  0  <  x )  ->  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
223222adantlr 751 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  0  <  x )  ->  x  e.  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
224159a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  ->  -u pi  e.  RR* )
225151a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  -> 
0  e.  RR* )
226155ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  ->  x  e.  RR )
227 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( (
-u pi  e.  RR*  /\  pi  e.  RR*  /\  x  e.  ( -u pi (,) pi ) )  ->  -u pi  <  x )
228159, 153, 227mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  ( -u pi (,) pi )  ->  -u pi  <  x )
229228ad2antrr 762 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  ->  -u pi  <  x )
230 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  -> 
0  e.  RR )
231 neqne 2802 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( -.  x  =  0  ->  x  =/=  0 )
232231ad2antlr 763 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  ->  x  =/=  0 )
233 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  ->  -.  0  <  x )
234226, 230, 232, 233lttri5d 39513 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  ->  x  <  0 )
235224, 225, 226, 229, 234eliood 39720 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  ->  x  e.  ( -u pi (,) 0 ) )
23667, 118, 68ltleii 10160 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  0  <_  pi
237 iooss2 12211 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( pi  e.  RR*  /\  0  <_  pi )  ->  ( -u pi (,) 0 ) 
C_  ( -u pi (,) pi ) )
238153, 236, 237mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( -u pi (,) 0 )  C_  ( -u pi (,) pi )
239238sseli 3599 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  ( -u pi (,) 0 )  ->  x  e.  ( -u pi (,) pi ) )
240104reseq1i 5392 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( F  |`  ( -u pi (,) 0 ) )  =  ( ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi ,  1 ,  -u 1 ) )  |`  ( -u pi (,) 0 ) )
241 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( -u pi (,) 0 )  C_  RR
242 resmpt 5449 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( (
-u pi (,) 0
)  C_  RR  ->  ( ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )  |`  ( -u pi (,) 0 ) )  =  ( x  e.  ( -u pi (,) 0 )  |->  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) ) )
243241, 242ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )  |`  ( -u pi (,) 0 ) )  =  ( x  e.  ( -u pi (,) 0 )  |->  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )
244118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( -u pi (,) 0 )  ->  pi  e.  RR )
245 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( -u pi (,) 0 )  ->  x  e.  RR )
246133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( -u pi (,) 0 )  ->  T  e.  RR+ )
247245, 246modcld 12674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
x  mod  T )  e.  RR )
248245, 143syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
x  +  T )  e.  RR )
249522timesi 11147 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( 2  x.  pi )  =  ( pi  +  pi )
250110, 249eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  T  =  ( pi  +  pi )
251250oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( -u pi  +  T )  =  ( -u pi  +  ( pi  +  pi ) )
252 negpicn 24214 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  -u pi  e.  CC
253252, 52, 52addassi 10048 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( (
-u pi  +  pi )  +  pi )  =  ( -u pi  +  ( pi  +  pi ) )
254253eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( -u pi  +  ( pi  +  pi ) )  =  ( ( -u pi  +  pi )  +  pi )
25552negidi 10350 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |-  ( pi  +  -u pi )  =  0
25652, 252, 255addcomli 10228 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( -u pi  +  pi )  =  0
257256oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( (
-u pi  +  pi )  +  pi )  =  ( 0  +  pi )
25852addid2i 10224 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( 0  +  pi )  =  pi
259257, 258eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( (
-u pi  +  pi )  +  pi )  =  pi
260251, 254, 2593eqtrri 2649 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  pi  =  ( -u pi  +  T
)
261260a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( -u pi (,) 0 )  ->  pi  =  ( -u pi  +  T ) )
262158a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( -u pi (,) 0 )  ->  -u pi  e.  RR )
263120a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( -u pi (,) 0 )  ->  T  e.  RR )
264239, 228syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( -u pi (,) 0 )  ->  -u pi  <  x )
265262, 245, 263, 264ltadd1dd 10638 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( -u pi (,) 0 )  ->  ( -u pi  +  T )  <  ( x  +  T ) )
266261, 265eqbrtrd 4675 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( -u pi (,) 0 )  ->  pi  <  ( x  +  T
) )
267244, 248, 266ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( -u pi (,) 0 )  ->  pi  <_  ( x  +  T
) )
268 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( x  e.  ( -u pi (,) 0 )  ->  0  e.  RR )
269158, 120readdcli 10053 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( -u pi  +  T )  e.  RR
270269a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( x  e.  ( -u pi (,) 0 )  ->  ( -u pi  +  T )  e.  RR )
27168a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( x  e.  ( -u pi (,) 0 )  ->  0  <  pi )
272271, 260syl6breq 4694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( x  e.  ( -u pi (,) 0 )  ->  0  <  ( -u pi  +  T ) )
273268, 270, 248, 272, 265lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( x  e.  ( -u pi (,) 0 )  ->  0  <  ( x  +  T
) )
274268, 248, 273ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( -u pi (,) 0 )  ->  0  <_  ( x  +  T
) )
275245recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( x  e.  ( -u pi (,) 0 )  ->  x  e.  CC )
276121a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( x  e.  ( -u pi (,) 0 )  ->  T  e.  CC )
277275, 276addcomd 10238 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
x  +  T )  =  ( T  +  x ) )
278 iooltub 39735 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( (
-u pi  e.  RR*  /\  0  e.  RR*  /\  x  e.  ( -u pi (,) 0 ) )  ->  x  <  0 )
279159, 151, 278mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( x  e.  ( -u pi (,) 0 )  ->  x  <  0 )
280 ltaddneg 10251 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( ( x  e.  RR  /\  T  e.  RR )  ->  ( x  <  0  <->  ( T  +  x )  <  T ) )
281245, 120, 280sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
x  <  0  <->  ( T  +  x )  <  T
) )
282279, 281mpbid 222 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( x  e.  ( -u pi (,) 0 )  ->  ( T  +  x )  <  T )
283277, 282eqbrtrd 4675 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
x  +  T )  <  T )
284274, 283jca 554 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
0  <_  ( x  +  T )  /\  (
x  +  T )  <  T ) )
285 modid2 12697 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( ( ( x  +  T
)  e.  RR  /\  T  e.  RR+ )  -> 
( ( ( x  +  T )  mod 
T )  =  ( x  +  T )  <-> 
( 0  <_  (
x  +  T )  /\  ( x  +  T )  <  T
) ) )
286248, 133, 285sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
( ( x  +  T )  mod  T
)  =  ( x  +  T )  <->  ( 0  <_  ( x  +  T )  /\  (
x  +  T )  <  T ) ) )
287284, 286mpbird 247 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
( x  +  T
)  mod  T )  =  ( x  +  T ) )
288125a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  RR  ->  (
( x  +  T
)  mod  T )  =  ( ( x  +  ( 1  x.  T ) )  mod 
T ) )
289133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( x  e.  RR  ->  T  e.  RR+ )
290 1zzd 11408 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( x  e.  RR  ->  1  e.  ZZ )
291141, 289, 290, 136syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  RR  ->  (
( x  +  ( 1  x.  T ) )  mod  T )  =  ( x  mod  T ) )
292288, 291eqtrd 2656 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  RR  ->  (
( x  +  T
)  mod  T )  =  ( x  mod  T ) )
293245, 292syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
( x  +  T
)  mod  T )  =  ( x  mod  T ) )
294287, 293eqtr3d 2658 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( -u pi (,) 0 )  ->  (
x  +  T )  =  ( x  mod  T ) )
295267, 294breqtrd 4679 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( -u pi (,) 0 )  ->  pi  <_  ( x  mod  T
) )
296244, 247, 295lensymd 10188 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( -u pi (,) 0 )  ->  -.  ( x  mod  T )  <  pi )
297296iffalsed 4097 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( -u pi (,) 0 )  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  -u 1
)
298297mpteq2ia 4740 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( -u pi (,) 0 )  |->  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )  =  ( x  e.  ( -u pi (,) 0 )  |->  -u
1 )
299240, 243, 2983eqtrri 2649 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( -u pi (,) 0 )  |->  -u 1
)  =  ( F  |`  ( -u pi (,) 0 ) )
300299oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( RR 
_D  ( x  e.  ( -u pi (,) 0 )  |->  -u 1
) )  =  ( RR  _D  ( F  |`  ( -u pi (,) 0 ) ) )
301 iooretop 22569 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( -u pi (,) 0 )  e.  ( topGen `  ran  (,) )
302301, 199eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( -u pi (,) 0 )  e.  ( ( TopOpen ` fld )t  RR )
303302a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( T. 
->  ( -u pi (,) 0 )  e.  ( ( TopOpen ` fld )t  RR ) )
304202negcld 10379 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( T. 
->  -u 1  e.  CC )
305196, 303, 304dvmptconst 40129 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  ( RR  _D  (
x  e.  ( -u pi (,) 0 )  |->  -u
1 ) )  =  ( x  e.  (
-u pi (,) 0
)  |->  0 ) )
306305trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( RR 
_D  ( x  e.  ( -u pi (,) 0 )  |->  -u 1
) )  =  ( x  e.  ( -u pi (,) 0 )  |->  0 )
307 dvresioo 40136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( RR  C_  RR  /\  F : RR --> CC )  -> 
( RR  _D  ( F  |`  ( -u pi (,) 0 ) ) )  =  ( ( RR 
_D  F )  |`  ( -u pi (,) 0
) ) )
308205, 208, 307mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( RR 
_D  ( F  |`  ( -u pi (,) 0
) ) )  =  ( ( RR  _D  F )  |`  ( -u pi (,) 0 ) )
309300, 306, 3083eqtr3i 2652 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( -u pi (,) 0 )  |->  0 )  =  ( ( RR 
_D  F )  |`  ( -u pi (,) 0
) )
310309dmeqi 5325 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  dom  (
x  e.  ( -u pi (,) 0 )  |->  0 )  =  dom  (
( RR  _D  F
)  |`  ( -u pi (,) 0 ) )
311 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( -u pi (,) 0 )  |->  0 )  =  ( x  e.  ( -u pi (,) 0 )  |->  0 )
31289, 311dmmpti 6023 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  dom  (
x  e.  ( -u pi (,) 0 )  |->  0 )  =  ( -u pi (,) 0 )
313310, 312eqtr3i 2646 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  dom  (
( RR  _D  F
)  |`  ( -u pi (,) 0 ) )  =  ( -u pi (,) 0 )
314 ssdmres 5420 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( (
-u pi (,) 0
)  C_  dom  ( RR 
_D  F )  <->  dom  ( ( RR  _D  F )  |`  ( -u pi (,) 0 ) )  =  ( -u pi (,) 0 ) )
315313, 314mpbir 221 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( -u pi (,) 0 )  C_  dom  ( RR  _D  F
)
316315sseli 3599 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  ( -u pi (,) 0 )  ->  x  e.  dom  ( RR  _D  F ) )
317239, 316elind 3798 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( x  e.  ( -u pi (,) 0 )  ->  x  e.  ( ( -u pi (,) pi )  i^i  dom  ( RR  _D  F
) ) )
318317, 220syl6eleqr 2712 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( -u pi (,) 0 )  ->  x  e.  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
319235, 318syl 17 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( x  e.  (
-u pi (,) pi )  /\  -.  x  =  0 )  /\  -.  0  <  x )  ->  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
320223, 319pm2.61dan 832 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( -u pi (,) pi )  /\  -.  x  =  0
)  ->  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
321150, 320sylan 488 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  ( (
-u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  0
)  ->  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
322 eldifn 3733 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( ( -u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  -.  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
323322adantr 481 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  ( (
-u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  0
)  ->  -.  x  e.  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
324321, 323condan 835 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  ( ( -u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  x  =  0 )
325 velsn 4193 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  { 0 }  <-> 
x  =  0 )
326324, 325sylibr 224 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  ( ( -u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  x  e.  { 0 } )
327326ssriv 3607 . . . . . . . . . . . . . . . . . 18  |-  ( (
-u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  C_  { 0 }
328 ssfi 8180 . . . . . . . . . . . . . . . . . 18  |-  ( ( { 0 }  e.  Fin  /\  ( ( -u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  C_  { 0 } )  ->  (
( -u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  e. 
Fin )
329149, 327, 328mp2an 708 . . . . . . . . . . . . . . . . 17  |-  ( (
-u pi (,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  e. 
Fin
330 inss1 3833 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( (
-u pi (,) pi )  i^i  dom  ( RR  _D  F ) )  C_  ( -u pi (,) pi )
331220, 330eqsstri 3635 . . . . . . . . . . . . . . . . . . . . 21  |-  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  C_  ( -u pi (,) pi )
332 ioosscn 39716 . . . . . . . . . . . . . . . . . . . . 21  |-  ( -u pi (,) pi )  C_  CC
333331, 332sstri 3612 . . . . . . . . . . . . . . . . . . . 20  |-  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  C_  CC
334333a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( T. 
->  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  C_  CC )
335 dvf 23671 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( RR 
_D  F ) : dom  ( RR  _D  F ) --> CC
336 fresin 6073 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( RR  _D  F ) : dom  ( RR 
_D  F ) --> CC 
->  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) : ( dom  ( RR  _D  F
)  i^i  ( -u pi (,) pi ) ) --> CC )
337 ffdm 6062 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) ) : ( dom  ( RR 
_D  F )  i^i  ( -u pi (,) pi ) ) --> CC  ->  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) : dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) ) --> CC 
/\  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  C_  ( dom  ( RR  _D  F
)  i^i  ( -u pi (,) pi ) ) ) )
338335, 336, 337mp2b 10 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) ) : dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) --> CC  /\  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  C_  ( dom  ( RR  _D  F
)  i^i  ( -u pi (,) pi ) ) )
339338simpli 474 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) : dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) --> CC
340339a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( T. 
->  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) : dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) ) --> CC )
341159a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  x  <  0 )  ->  -u pi  e.  RR* )
342151a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  x  <  0 )  -> 
0  e.  RR* )
343 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( -u pi (,) pi )  C_  RR
344331sseli 3599 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  x  e.  ( -u pi (,) pi ) )
345343, 344sseldi 3601 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  x  e.  RR )
346345adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  x  <  0 )  ->  x  e.  RR )
347344, 228syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  -u pi  <  x )
348347adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  x  <  0 )  ->  -u pi  <  x )
349 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  x  <  0 )  ->  x  <  0 )
350341, 342, 346, 348, 349eliood 39720 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  x  <  0 )  ->  x  e.  ( -u pi (,) 0 ) )
351 elun1 3780 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( -u pi (,) 0 )  ->  x  e.  ( ( -u pi (,) 0 )  u.  (
0 (,) pi ) ) )
352350, 351syl 17 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  x  <  0 )  ->  x  e.  ( ( -u pi (,) 0 )  u.  ( 0 (,) pi ) ) )
353 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  -.  x  <  0
)  ->  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
354 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  -.  x  <  0
)  ->  0  e.  RR )
355345adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  -.  x  <  0
)  ->  x  e.  RR )
356 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  -.  x  <  0
)  ->  -.  x  <  0 )
357354, 355, 356nltled 10187 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  -.  x  <  0
)  ->  0  <_  x )
358 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( x  =  0  ->  x  =  0 )
359205a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  RR  C_  RR )
360 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( topGen ` 
ran  (,) )  =  (
topGen `  ran  (,) )
361208a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  F : RR --> CC )
362 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  0  e.  RR )
363 mnfxr 10096 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |- -oo  e.  RR*
364363a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
-> -oo  e.  RR* )
365362mnfltd 11958 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
-> -oo  <  0 )
366360, 364, 362, 365lptioo2 39863 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( T. 
->  0  e.  (
( limPt `  ( topGen ` 
ran  (,) ) ) `  ( -oo (,) 0 ) ) )
367 incom 3805 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( RR 
i^i  ( -oo (,) 0 ) )  =  ( ( -oo (,) 0 )  i^i  RR )
368 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( -oo (,) 0 )  C_  RR
369 df-ss 3588 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( -oo (,) 0 ) 
C_  RR  <->  ( ( -oo (,) 0 )  i^i  RR )  =  ( -oo (,) 0 ) )
370368, 369mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( -oo (,) 0 )  i^i  RR )  =  ( -oo (,) 0
)
371367, 370eqtr2i 2645 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( -oo (,) 0 )  =  ( RR  i^i  ( -oo (,) 0 ) )
372371fveq2i 6194 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( (
limPt `  ( topGen `  ran  (,) ) ) `  ( -oo (,) 0 ) )  =  ( ( limPt `  ( topGen `  ran  (,) )
) `  ( RR  i^i  ( -oo (,) 0
) ) )
373366, 372syl6eleq 2711 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  0  e.  (
( limPt `  ( topGen ` 
ran  (,) ) ) `  ( RR  i^i  ( -oo (,) 0 ) ) ) )
374 pnfxr 10092 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |- +oo  e.  RR*
375374a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
-> +oo  e.  RR* )
376362ltpnfd 11955 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
->  0  < +oo )
377360, 362, 375, 376lptioo1 39864 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( T. 
->  0  e.  (
( limPt `  ( topGen ` 
ran  (,) ) ) `  ( 0 (,) +oo ) ) )
378 incom 3805 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( RR 
i^i  ( 0 (,) +oo ) )  =  ( ( 0 (,) +oo )  i^i  RR )
379 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( 0 (,) +oo )  C_  RR
380 df-ss 3588 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( 0 (,) +oo )  C_  RR  <->  ( ( 0 (,) +oo )  i^i 
RR )  =  ( 0 (,) +oo )
)
381379, 380mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( 0 (,) +oo )  i^i  RR )  =  ( 0 (,) +oo )
382378, 381eqtr2i 2645 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( 0 (,) +oo )  =  ( RR  i^i  (
0 (,) +oo )
)
383382fveq2i 6194 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( (
limPt `  ( topGen `  ran  (,) ) ) `  (
0 (,) +oo )
)  =  ( (
limPt `  ( topGen `  ran  (,) ) ) `  ( RR  i^i  ( 0 (,) +oo ) ) )
384377, 383syl6eleq 2711 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  0  e.  (
( limPt `  ( topGen ` 
ran  (,) ) ) `  ( RR  i^i  (
0 (,) +oo )
) ) )
385 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( -u pi (,) 0 )  |->  -u 1
)  =  ( x  e.  ( -u pi (,) 0 )  |->  -u 1
)
386 mnfle 11969 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( -u pi  e.  RR*  -> -oo  <_  -u pi )
387159, 386ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |- -oo  <_  -u pi
388 iooss1 12210 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( -oo  e.  RR*  /\ -oo  <_ 
-u pi )  -> 
( -u pi (,) 0
)  C_  ( -oo (,) 0 ) )
389363, 387, 388mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( -u pi (,) 0 )  C_  ( -oo (,) 0 )
390389a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( T. 
->  ( -u pi (,) 0 )  C_  ( -oo (,) 0 ) )
391 ioosscn 39716 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( -oo (,) 0 )  C_  CC
392390, 391syl6ss 3615 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
->  ( -u pi (,) 0 )  C_  CC )
393 0cnd 10033 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
->  0  e.  CC )
394385, 392, 304, 393constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( T. 
->  -u 1  e.  ( ( x  e.  (
-u pi (,) 0
)  |->  -u 1 ) lim CC  0 ) )
395 resabs1 5427 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( (
-u pi (,) 0
)  C_  ( -oo (,) 0 )  ->  (
( F  |`  ( -oo (,) 0 ) )  |`  ( -u pi (,) 0 ) )  =  ( F  |`  ( -u pi (,) 0 ) ) )
396389, 395ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( F  |`  ( -oo (,) 0 ) )  |`  ( -u pi (,) 0
) )  =  ( F  |`  ( -u pi (,) 0 ) )
397299, 396eqtr4i 2647 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( -u pi (,) 0 )  |->  -u 1
)  =  ( ( F  |`  ( -oo (,) 0 ) )  |`  ( -u pi (,) 0
) )
398397oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( x  e.  ( -u pi (,) 0 )  |->  -u
1 ) lim CC  0 )  =  ( ( ( F  |`  ( -oo (,) 0 ) )  |`  ( -u pi (,) 0 ) ) lim CC  0 )
399 fssres 6070 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( ( F : RR --> CC  /\  ( -oo (,) 0 ) 
C_  RR )  -> 
( F  |`  ( -oo (,) 0 ) ) : ( -oo (,) 0 ) --> CC )
400208, 368, 399mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( F  |`  ( -oo (,) 0
) ) : ( -oo (,) 0 ) --> CC
401400a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( T. 
->  ( F  |`  ( -oo (,) 0 ) ) : ( -oo (,) 0 ) --> CC )
402391a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( T. 
->  ( -oo (,) 0
)  C_  CC )
403 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( (
TopOpen ` fld )t  ( ( -oo (,) 0 )  u.  {
0 } ) )  =  ( ( TopOpen ` fld )t  (
( -oo (,) 0 )  u.  { 0 } ) )
404 0le0 11110 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  0  <_  0
405 elioc2 12236 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( (
-u pi  e.  RR*  /\  0  e.  RR )  ->  ( 0  e.  ( -u pi (,] 0 )  <->  ( 0  e.  RR  /\  -u pi  <  0  /\  0  <_ 
0 ) ) )
406159, 67, 405mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( 0  e.  ( -u pi (,] 0 )  <->  ( 0  e.  RR  /\  -u pi  <  0  /\  0  <_ 
0 ) )
40767, 164, 404, 406mpbir3an 1244 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  0  e.  ( -u pi (,] 0 )
408198cnfldtop 22587 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( TopOpen ` fld )  e.  Top
409 ovex 6678 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( -oo (,] 0 )  e.  _V
410 resttop 20964 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( ( ( TopOpen ` fld )  e.  Top  /\  ( -oo (,] 0
)  e.  _V )  ->  ( ( TopOpen ` fld )t  ( -oo (,] 0
) )  e.  Top )
411408, 409, 410mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( (
TopOpen ` fld )t  ( -oo (,] 0
) )  e.  Top
412159a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( T. 
->  -u pi  e.  RR* )
413 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( (
topGen `  ran  (,) )t  ( -oo (,] 0 ) )  =  ( ( topGen ` 
ran  (,) )t  ( -oo (,] 0
) )
414387a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( T. 
-> -oo  <_  -u pi )
415364, 412, 362, 360, 413, 414, 362iocopn 39746 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( T. 
->  ( -u pi (,] 0 )  e.  ( ( topGen `  ran  (,) )t  ( -oo (,] 0 ) ) )
416415trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( -u pi (,] 0 )  e.  ( ( topGen `  ran  (,) )t  ( -oo (,] 0
) )
417199oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( (
topGen `  ran  (,) )t  ( -oo (,] 0 ) )  =  ( ( (
TopOpen ` fld )t  RR )t  ( -oo (,] 0
) )
418 iocssre 12253 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |-  ( ( -oo  e.  RR*  /\  0  e.  RR )  ->  ( -oo (,] 0 )  C_  RR )
419363, 67, 418mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( -oo (,] 0 )  C_  RR
420195elexi 3213 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  RR  e.  _V
421 restabs 20969 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( ( ( TopOpen ` fld )  e.  Top  /\  ( -oo (,] 0
)  C_  RR  /\  RR  e.  _V )  ->  (
( ( TopOpen ` fld )t  RR )t  ( -oo (,] 0
) )  =  ( ( TopOpen ` fld )t  ( -oo (,] 0
) ) )
422408, 419, 420, 421mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( ( ( TopOpen ` fld )t  RR )t  ( -oo (,] 0
) )  =  ( ( TopOpen ` fld )t  ( -oo (,] 0
) )
423417, 422eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( (
topGen `  ran  (,) )t  ( -oo (,] 0 ) )  =  ( ( TopOpen ` fld )t  ( -oo (,] 0 ) )
424416, 423eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( -u pi (,] 0 )  e.  ( ( TopOpen ` fld )t  ( -oo (,] 0
) )
425 isopn3i 20886 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( ( ( ( TopOpen ` fld )t  ( -oo (,] 0
) )  e.  Top  /\  ( -u pi (,] 0 )  e.  ( ( TopOpen ` fld )t  ( -oo (,] 0
) ) )  -> 
( ( int `  (
( TopOpen ` fld )t  ( -oo (,] 0
) ) ) `  ( -u pi (,] 0
) )  =  (
-u pi (,] 0
) )
426411, 424, 425mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( int `  ( (
TopOpen ` fld )t  ( -oo (,] 0
) ) ) `  ( -u pi (,] 0
) )  =  (
-u pi (,] 0
)
427 mnflt0 11959 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |- -oo  <  0
428 snunioo2 39731 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |-  ( ( -oo  e.  RR*  /\  0  e.  RR*  /\ -oo  <  0 )  ->  (
( -oo (,) 0 )  u.  { 0 } )  =  ( -oo (,] 0 ) )
429363, 151, 427, 428mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( ( -oo (,) 0 )  u.  { 0 } )  =  ( -oo (,] 0 )
430429eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( -oo (,] 0 )  =  ( ( -oo (,) 0
)  u.  { 0 } )
431430oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( (
TopOpen ` fld )t  ( -oo (,] 0
) )  =  ( ( TopOpen ` fld )t  ( ( -oo (,) 0 )  u.  {
0 } ) )
432431fveq2i 6194 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( int `  ( ( TopOpen ` fld )t  ( -oo (,] 0
) ) )  =  ( int `  (
( TopOpen ` fld )t  ( ( -oo (,) 0 )  u.  {
0 } ) ) )
433 snunioo2 39731 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( (
-u pi  e.  RR*  /\  0  e.  RR*  /\  -u pi  <  0 )  ->  (
( -u pi (,) 0
)  u.  { 0 } )  =  (
-u pi (,] 0
) )
434159, 151, 164, 433mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( (
-u pi (,) 0
)  u.  { 0 } )  =  (
-u pi (,] 0
)
435434eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( -u pi (,] 0 )  =  ( ( -u pi (,) 0 )  u.  {
0 } )
436432, 435fveq12i 6196 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( int `  ( (
TopOpen ` fld )t  ( -oo (,] 0
) ) ) `  ( -u pi (,] 0
) )  =  ( ( int `  (
( TopOpen ` fld )t  ( ( -oo (,) 0 )  u.  {
0 } ) ) ) `  ( (
-u pi (,) 0
)  u.  { 0 } ) )
437426, 436eqtr3i 2646 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( -u pi (,] 0 )  =  ( ( int `  (
( TopOpen ` fld )t  ( ( -oo (,) 0 )  u.  {
0 } ) ) ) `  ( (
-u pi (,) 0
)  u.  { 0 } ) )
438407, 437eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  0  e.  ( ( int `  (
( TopOpen ` fld )t  ( ( -oo (,) 0 )  u.  {
0 } ) ) ) `  ( (
-u pi (,) 0
)  u.  { 0 } ) )
439438a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( T. 
->  0  e.  (
( int `  (
( TopOpen ` fld )t  ( ( -oo (,) 0 )  u.  {
0 } ) ) ) `  ( (
-u pi (,) 0
)  u.  { 0 } ) ) )
440401, 390, 402, 198, 403, 439limcres 23650 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( T. 
->  ( ( ( F  |`  ( -oo (,) 0
) )  |`  ( -u pi (,) 0 ) ) lim CC  0 )  =  ( ( F  |`  ( -oo (,) 0
) ) lim CC  0 ) )
441440trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( ( F  |`  ( -oo (,) 0 ) )  |`  ( -u pi (,) 0 ) ) lim CC  0 )  =  ( ( F  |`  ( -oo (,) 0 ) ) lim
CC  0 )
442398, 441eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( x  e.  ( -u pi (,) 0 )  |->  -u
1 ) lim CC  0 )  =  ( ( F  |`  ( -oo (,) 0 ) ) lim CC  0 )
443394, 442syl6eleq 2711 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  -u 1  e.  ( ( F  |`  ( -oo (,) 0 ) ) lim
CC  0 ) )
444 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( 0 (,) pi )  |->  1 )  =  ( x  e.  ( 0 (,) pi )  |->  1 )
445 ioosscn 39716 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( 0 (,) pi )  C_  CC
446445a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( T. 
->  ( 0 (,) pi )  C_  CC )
447444, 446, 202, 393constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( T. 
->  1  e.  (
( x  e.  ( 0 (,) pi ) 
|->  1 ) lim CC  0 ) )
448 ltpnf 11954 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( pi  e.  RR  ->  pi  < +oo )
449 xrltle 11982 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( ( pi  e.  RR*  /\ +oo  e.  RR* )  ->  (
pi  < +oo  ->  pi  <_ +oo ) )
450153, 374, 449mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( pi 
< +oo  ->  pi  <_ +oo )
451118, 448, 450mp2b 10 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  pi  <_ +oo
452 iooss2 12211 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( ( +oo  e.  RR*  /\  pi  <_ +oo )  ->  (
0 (,) pi ) 
C_  ( 0 (,) +oo ) )
453374, 451, 452mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( 0 (,) pi )  C_  ( 0 (,) +oo )
454 resabs1 5427 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( 0 (,) pi ) 
C_  ( 0 (,) +oo )  ->  ( ( F  |`  ( 0 (,) +oo ) )  |`  ( 0 (,) pi ) )  =  ( F  |`  ( 0 (,) pi ) ) )
455453, 454ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( F  |`  ( 0 (,) +oo ) )  |`  ( 0 (,) pi ) )  =  ( F  |`  ( 0 (,) pi ) )
456193, 455eqtr4i 2647 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( 0 (,) pi )  |->  1 )  =  ( ( F  |`  ( 0 (,) +oo ) )  |`  (
0 (,) pi ) )
457456oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( x  e.  ( 0 (,) pi )  |->  1 ) lim CC  0 )  =  ( ( ( F  |`  ( 0 (,) +oo ) )  |`  ( 0 (,) pi ) ) lim CC  0
)
458 fssres 6070 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( ( F : RR --> CC  /\  ( 0 (,) +oo )  C_  RR )  -> 
( F  |`  (
0 (,) +oo )
) : ( 0 (,) +oo ) --> CC )
459208, 379, 458mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( F  |`  ( 0 (,) +oo ) ) : ( 0 (,) +oo ) --> CC
460459a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( T. 
->  ( F  |`  (
0 (,) +oo )
) : ( 0 (,) +oo ) --> CC )
461453a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( T. 
->  ( 0 (,) pi )  C_  ( 0 (,) +oo ) )
462 ioosscn 39716 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( 0 (,) +oo )  C_  CC
463462a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( T. 
->  ( 0 (,) +oo )  C_  CC )
464 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( (
TopOpen ` fld )t  ( ( 0 (,) +oo )  u.  { 0 } ) )  =  ( ( TopOpen ` fld )t  ( ( 0 (,) +oo )  u. 
{ 0 } ) )
465 elico2 12237 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( ( 0  e.  RR  /\  pi  e.  RR* )  ->  (
0  e.  ( 0 [,) pi )  <->  ( 0  e.  RR  /\  0  <_  0  /\  0  < 
pi ) ) )
46667, 153, 465mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( 0  e.  ( 0 [,) pi )  <->  ( 0  e.  RR  /\  0  <_  0  /\  0  < 
pi ) )
46767, 404, 68, 466mpbir3an 1244 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  0  e.  ( 0 [,) pi )
468 ovex 6678 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( 0 [,) +oo )  e. 
_V
469 resttop 20964 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( ( ( TopOpen ` fld )  e.  Top  /\  ( 0 [,) +oo )  e.  _V )  ->  ( ( TopOpen ` fld )t  ( 0 [,) +oo ) )  e.  Top )
470408, 468, 469mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( (
TopOpen ` fld )t  ( 0 [,) +oo ) )  e.  Top
471153a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( T. 
->  pi  e.  RR* )
472 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( (
topGen `  ran  (,) )t  (
0 [,) +oo )
)  =  ( (
topGen `  ran  (,) )t  (
0 [,) +oo )
)
473451a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( T. 
->  pi  <_ +oo )
474362, 471, 375, 360, 472, 473icoopn 39751 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( T. 
->  ( 0 [,) pi )  e.  ( ( topGen `
 ran  (,) )t  (
0 [,) +oo )
) )
475474trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( 0 [,) pi )  e.  ( ( topGen `  ran  (,) )t  ( 0 [,) +oo ) )
476199oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( (
topGen `  ran  (,) )t  (
0 [,) +oo )
)  =  ( ( ( TopOpen ` fld )t  RR )t  ( 0 [,) +oo ) )
477 rge0ssre 12280 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( 0 [,) +oo )  C_  RR
478 restabs 20969 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( ( ( TopOpen ` fld )  e.  Top  /\  ( 0 [,) +oo )  C_  RR  /\  RR  e.  _V )  ->  (
( ( TopOpen ` fld )t  RR )t  ( 0 [,) +oo ) )  =  ( ( TopOpen ` fld )t  ( 0 [,) +oo ) ) )
479408, 477, 420, 478mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( ( ( TopOpen ` fld )t  RR )t  ( 0 [,) +oo ) )  =  ( ( TopOpen ` fld )t  ( 0 [,) +oo ) )
480476, 479eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( (
topGen `  ran  (,) )t  (
0 [,) +oo )
)  =  ( (
TopOpen ` fld )t  ( 0 [,) +oo ) )
481475, 480eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( 0 [,) pi )  e.  ( ( TopOpen ` fld )t  ( 0 [,) +oo ) )
482 isopn3i 20886 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( ( ( ( TopOpen ` fld )t  ( 0 [,) +oo ) )  e.  Top  /\  ( 0 [,) pi )  e.  ( ( TopOpen
` fld
)t  ( 0 [,) +oo ) ) )  -> 
( ( int `  (
( TopOpen ` fld )t  ( 0 [,) +oo ) ) ) `  ( 0 [,) pi ) )  =  ( 0 [,) pi ) )
483470, 481, 482mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( int `  ( (
TopOpen ` fld )t  ( 0 [,) +oo ) ) ) `  ( 0 [,) pi ) )  =  ( 0 [,) pi )
484 0ltpnf 11956 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |-  0  < +oo
485 snunioo1 39738 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |-  ( ( 0  e.  RR*  /\ +oo  e.  RR*  /\  0  < +oo )  ->  ( ( 0 (,) +oo )  u.  { 0 } )  =  ( 0 [,) +oo ) )
486151, 374, 484, 485mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( ( 0 (,) +oo )  u.  { 0 } )  =  ( 0 [,) +oo )
487486eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( 0 [,) +oo )  =  ( ( 0 (,) +oo )  u.  { 0 } )
488487oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( (
TopOpen ` fld )t  ( 0 [,) +oo ) )  =  ( ( TopOpen ` fld )t  ( ( 0 (,) +oo )  u. 
{ 0 } ) )
489488fveq2i 6194 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( int `  ( ( TopOpen ` fld )t  ( 0 [,) +oo ) ) )  =  ( int `  (
( TopOpen ` fld )t  ( ( 0 (,) +oo )  u. 
{ 0 } ) ) )
490 snunioo1 39738 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( ( 0  e.  RR*  /\  pi  e.  RR*  /\  0  < 
pi )  ->  (
( 0 (,) pi )  u.  { 0 } )  =  ( 0 [,) pi ) )
491151, 153, 68, 490mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( ( 0 (,) pi )  u.  { 0 } )  =  ( 0 [,) pi )
492491eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( 0 [,) pi )  =  ( ( 0 (,) pi )  u.  {
0 } )
493489, 492fveq12i 6196 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( int `  ( (
TopOpen ` fld )t  ( 0 [,) +oo ) ) ) `  ( 0 [,) pi ) )  =  ( ( int `  (
( TopOpen ` fld )t  ( ( 0 (,) +oo )  u. 
{ 0 } ) ) ) `  (
( 0 (,) pi )  u.  { 0 } ) )
494483, 493eqtr3i 2646 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( 0 [,) pi )  =  ( ( int `  (
( TopOpen ` fld )t  ( ( 0 (,) +oo )  u. 
{ 0 } ) ) ) `  (
( 0 (,) pi )  u.  { 0 } ) )
495467, 494eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  0  e.  ( ( int `  (
( TopOpen ` fld )t  ( ( 0 (,) +oo )  u. 
{ 0 } ) ) ) `  (
( 0 (,) pi )  u.  { 0 } ) )
496495a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( T. 
->  0  e.  (
( int `  (
( TopOpen ` fld )t  ( ( 0 (,) +oo )  u. 
{ 0 } ) ) ) `  (
( 0 (,) pi )  u.  { 0 } ) ) )
497460, 461, 463, 198, 464, 496limcres 23650 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( T. 
->  ( ( ( F  |`  ( 0 (,) +oo ) )  |`  (
0 (,) pi ) ) lim CC  0 )  =  ( ( F  |`  ( 0 (,) +oo ) ) lim CC  0
) )
498497trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( ( F  |`  (
0 (,) +oo )
)  |`  ( 0 (,) pi ) ) lim CC  0 )  =  ( ( F  |`  (
0 (,) +oo )
) lim CC  0 )
499457, 498eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( x  e.  ( 0 (,) pi )  |->  1 ) lim CC  0 )  =  ( ( F  |`  ( 0 (,) +oo ) ) lim CC  0
)
500447, 499syl6eleq 2711 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  1  e.  (
( F  |`  (
0 (,) +oo )
) lim CC  0 ) )
501 neg1lt0 11127 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  -u 1  <  0
502106, 67, 105lttri 10163 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( (
-u 1  <  0  /\  0  <  1
)  ->  -u 1  <  1 )
503501, 34, 502mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  -u 1  <  1
504106, 503ltneii 10150 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  -u 1  =/=  1
505504a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( T. 
->  -u 1  =/=  1
)
506198, 359, 360, 361, 362, 373, 384, 443, 500, 505jumpncnp 40111 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( T. 
->  -.  F  e.  ( ( ( topGen `  ran  (,) )  CnP  ( TopOpen ` fld )
) `  0 )
)
507506trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  -.  F  e.  ( ( ( topGen ` 
ran  (,) )  CnP  ( TopOpen
` fld
) ) `  0
)
508206a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( 0  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  RR  C_  CC )
509208a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( 0  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  F : RR --> CC )
510205a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( 0  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  RR  C_  RR )
511 inss2 3834 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( (
-u pi (,) pi )  i^i  dom  ( RR  _D  F ) )  C_  dom  ( RR  _D  F
)
512220, 511eqsstri 3635 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  C_  dom  ( RR  _D  F
)
513512sseli 3599 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( 0  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  0  e.  dom  ( RR  _D  F ) )
514199, 198dvcnp2 23683 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( ( RR  C_  CC  /\  F : RR --> CC  /\  RR  C_  RR )  /\  0  e.  dom  ( RR 
_D  F ) )  ->  F  e.  ( ( ( topGen `  ran  (,) )  CnP  ( TopOpen ` fld )
) `  0 )
)
515508, 509, 510, 513, 514syl31anc 1329 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( 0  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  F  e.  ( ( ( topGen ` 
ran  (,) )  CnP  ( TopOpen
` fld
) ) `  0
) )
516507, 515mto 188 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  -.  0  e.  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )
517516a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( x  =  0  ->  -.  0  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
518358, 517eqneltrd 2720 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( x  =  0  ->  -.  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
519518necon2ai 2823 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  x  =/=  0 )
520519adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  -.  x  <  0
)  ->  x  =/=  0 )
521354, 355, 357, 520leneltd 10191 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  -.  x  <  0
)  ->  0  <  x )
522344, 163sylan 488 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  0  <  x )  ->  x  e.  ( 0 (,) pi ) )
523 elun2 3781 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( x  e.  ( 0 (,) pi )  ->  x  e.  ( ( -u pi (,) 0 )  u.  (
0 (,) pi ) ) )
524522, 523syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  0  <  x )  ->  x  e.  ( ( -u pi (,) 0 )  u.  ( 0 (,) pi ) ) )
525353, 521, 524syl2anc 693 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  /\  -.  x  <  0
)  ->  x  e.  ( ( -u pi (,) 0 )  u.  (
0 (,) pi ) ) )
526352, 525pm2.61dan 832 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  x  e.  ( ( -u pi (,) 0 )  u.  (
0 (,) pi ) ) )
527 ovex 6678 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -u pi (,) 0 )  e. 
_V
528 ovex 6678 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( 0 (,) pi )  e. 
_V
529527, 528unipr 4449 . . . . . . . . . . . . . . . . . . . . . 22  |-  U. {
( -u pi (,) 0
) ,  ( 0 (,) pi ) }  =  ( ( -u pi (,) 0 )  u.  ( 0 (,) pi ) )
530526, 529syl6eleqr 2712 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  ->  x  e.  U. { ( -u pi (,) 0 ) ,  ( 0 (,) pi ) } )
531530ssriv 3607 . . . . . . . . . . . . . . . . . . . 20  |-  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  C_  U. { ( -u pi (,) 0 ) ,  ( 0 (,) pi ) }
532531a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( T. 
->  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  C_  U. {
( -u pi (,) 0
) ,  ( 0 (,) pi ) } )
533 ineq2 3808 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( -u pi (,) 0 )  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  =  ( dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  i^i  ( -u pi (,) 0 ) ) )
534 retop 22565 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( topGen ` 
ran  (,) )  e.  Top
535 ovex 6678 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( RR 
_D  F )  e. 
_V
536535resex 5443 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  e.  _V
537536dmex 7099 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  e. 
_V
538534, 537pm3.2i 471 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( (
topGen `  ran  (,) )  e.  Top  /\  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  e. 
_V )
539318ssriv 3607 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( -u pi (,) 0 )  C_  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )
540 ssid 3624 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( -u pi (,) 0 )  C_  ( -u pi (,) 0
)
541301, 539, 5403pm3.2i 1239 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( (
-u pi (,) 0
)  e.  ( topGen ` 
ran  (,) )  /\  ( -u pi (,) 0 ) 
C_  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  /\  ( -u pi (,) 0 ) 
C_  ( -u pi (,) 0 ) )
542 restopnb 20979 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( topGen `  ran  (,) )  e.  Top  /\  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  e.  _V )  /\  ( ( -u pi (,) 0 )  e.  (
topGen `  ran  (,) )  /\  ( -u pi (,) 0 )  C_  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  /\  ( -u pi (,) 0 )  C_  ( -u pi (,) 0
) ) )  -> 
( ( -u pi (,) 0 )  e.  (
topGen `  ran  (,) )  <->  (
-u pi (,) 0
)  e.  ( (
topGen `  ran  (,) )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) ) ) )
543538, 541, 542mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
-u pi (,) 0
)  e.  ( topGen ` 
ran  (,) )  <->  ( -u pi (,) 0 )  e.  ( ( topGen `  ran  (,) )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) ) )
544301, 543mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( -u pi (,) 0 )  e.  ( ( topGen `  ran  (,) )t 
dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
545 inss2 3834 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  ( -u pi (,) 0 ) ) 
C_  ( -u pi (,) 0 )
546539, 540ssini 3836 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( -u pi (,) 0 )  C_  ( dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  i^i  ( -u pi (,) 0 ) )
547545, 546eqssi 3619 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  ( -u pi (,) 0 ) )  =  ( -u pi (,) 0 )
548199oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
topGen `  ran  (,) )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  =  ( ( ( TopOpen ` fld )t  RR )t  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
549331, 343sstri 3612 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  C_  RR
550 restabs 20969 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( TopOpen ` fld )  e.  Top  /\ 
dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  C_  RR  /\  RR  e.  _V )  ->  ( ( ( TopOpen ` fld )t  RR )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  =  ( ( TopOpen ` fld )t  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) ) )
551408, 549, 420, 550mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( TopOpen ` fld )t  RR )t  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )  =  ( ( TopOpen ` fld )t  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
552548, 551eqtr2i 2645 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
TopOpen ` fld )t 
dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )  =  ( ( topGen `  ran  (,) )t 
dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
553544, 547, 5523eltr4i 2714 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  ( -u pi (,) 0 ) )  e.  ( ( TopOpen ` fld )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
554533, 553syl6eqel 2709 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  ( -u pi (,) 0 )  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  e.  ( ( TopOpen ` fld )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) ) )
555554adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  { (
-u pi (,) 0
) ,  ( 0 (,) pi ) }  /\  x  =  (
-u pi (,) 0
) )  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  e.  ( ( TopOpen ` fld )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) ) )
556 neqne 2802 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -.  x  =  ( -u pi (,) 0 )  ->  x  =/=  ( -u pi (,) 0 ) )
557 elprn1 39865 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  { (
-u pi (,) 0
) ,  ( 0 (,) pi ) }  /\  x  =/=  ( -u pi (,) 0 ) )  ->  x  =  ( 0 (,) pi ) )
558556, 557sylan2 491 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  { (
-u pi (,) 0
) ,  ( 0 (,) pi ) }  /\  -.  x  =  ( -u pi (,) 0 ) )  ->  x  =  ( 0 (,) pi ) )
559 ineq2 3808 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( 0 (,) pi )  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  =  ( dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  i^i  ( 0 (,) pi ) ) )
560221ssriv 3607 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( 0 (,) pi )  C_  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )
561 ssid 3624 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( 0 (,) pi )  C_  ( 0 (,) pi )
562197, 560, 5613pm3.2i 1239 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( 0 (,) pi )  e.  ( topGen `  ran  (,) )  /\  ( 0 (,) pi )  C_  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  /\  ( 0 (,) pi )  C_  ( 0 (,) pi ) )
563 restopnb 20979 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( topGen `  ran  (,) )  e.  Top  /\  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  e.  _V )  /\  ( ( 0 (,) pi )  e.  (
topGen `  ran  (,) )  /\  ( 0 (,) pi )  C_  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  /\  (
0 (,) pi ) 
C_  ( 0 (,) pi ) ) )  ->  ( ( 0 (,) pi )  e.  ( topGen `  ran  (,) )  <->  ( 0 (,) pi )  e.  ( ( topGen ` 
ran  (,) )t  dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) ) ) )
564538, 562, 563mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( 0 (,) pi )  e.  ( topGen `  ran  (,) )  <->  ( 0 (,) pi )  e.  ( ( topGen `  ran  (,) )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) ) )
565197, 564mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( 0 (,) pi )  e.  ( ( topGen `  ran  (,) )t 
dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) )
566 inss2 3834 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  ( 0 (,) pi ) ) 
C_  ( 0 (,) pi )
567560, 561ssini 3836 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( 0 (,) pi )  C_  ( dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  i^i  (
0 (,) pi ) )
568566, 567eqssi 3619 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  ( 0 (,) pi ) )  =  ( 0 (,) pi )
569565, 568, 5523eltr4i 2714 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  ( 0 (,) pi ) )  e.  ( ( TopOpen ` fld )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
570559, 569syl6eqel 2709 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  ( 0 (,) pi )  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  e.  ( ( TopOpen ` fld )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) ) )
571558, 570syl 17 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  { (
-u pi (,) 0
) ,  ( 0 (,) pi ) }  /\  -.  x  =  ( -u pi (,) 0 ) )  -> 
( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x
)  e.  ( (
TopOpen ` fld )t 
dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) ) )
572555, 571pm2.61dan 832 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  { ( -u pi (,) 0 ) ,  ( 0 (,) pi ) }  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  e.  ( ( TopOpen ` fld )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) ) )
573572adantl 482 . . . . . . . . . . . . . . . . . . 19  |-  ( ( T.  /\  x  e. 
{ ( -u pi (,) 0 ) ,  ( 0 (,) pi ) } )  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  e.  ( ( TopOpen ` fld )t  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) ) )
574 ssid 3624 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  CC  C_  CC
575574a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  CC  C_  CC )
576392, 393, 575constcncfg 40084 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( T. 
->  ( x  e.  (
-u pi (,) 0
)  |->  0 )  e.  ( ( -u pi (,) 0 ) -cn-> CC ) )
577576trud 1493 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( -u pi (,) 0 )  |->  0 )  e.  ( ( -u pi (,) 0 ) -cn-> CC )
578577a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( -u pi (,) 0 )  ->  (
x  e.  ( -u pi (,) 0 )  |->  0 )  e.  ( (
-u pi (,) 0
) -cn-> CC ) )
579 reseq2 5391 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  ( -u pi (,) 0 )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  x )  =  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -u pi (,) 0 ) ) )
580 resabs1 5427 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( (
-u pi (,) 0
)  C_  ( -u pi (,) pi )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -u pi (,) 0 ) )  =  ( ( RR  _D  F )  |`  ( -u pi (,) 0 ) ) )
581238, 580ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( -u pi (,) 0
) )  =  ( ( RR  _D  F
)  |`  ( -u pi (,) 0 ) )
582581, 309eqtr4i 2647 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( -u pi (,) 0
) )  =  ( x  e.  ( -u pi (,) 0 )  |->  0 )
583579, 582syl6eq 2672 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( -u pi (,) 0 )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  x )  =  ( x  e.  ( -u pi (,) 0 )  |->  0 ) )
584533, 547syl6eq 2672 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  ( -u pi (,) 0 )  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  =  ( -u pi (,) 0 ) )
585584oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( -u pi (,) 0 )  ->  (
( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x
) -cn-> CC )  =  ( ( -u pi (,) 0 ) -cn-> CC ) )
586578, 583, 5853eltr4d 2716 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  ( -u pi (,) 0 )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  x )  e.  ( ( dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  i^i  x ) -cn-> CC ) )
587586adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  { (
-u pi (,) 0
) ,  ( 0 (,) pi ) }  /\  x  =  (
-u pi (,) 0
) )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  x )  e.  ( ( dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  i^i  x ) -cn-> CC ) )
588446, 393, 575constcncfg 40084 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( T. 
->  ( x  e.  ( 0 (,) pi ) 
|->  0 )  e.  ( ( 0 (,) pi ) -cn-> CC ) )
589588trud 1493 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( 0 (,) pi )  |->  0 )  e.  ( ( 0 (,) pi ) -cn-> CC )
590589a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( 0 (,) pi )  ->  (
x  e.  ( 0 (,) pi )  |->  0 )  e.  ( ( 0 (,) pi )
-cn-> CC ) )
591 reseq2 5391 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  ( 0 (,) pi )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  x )  =  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  (
0 (,) pi ) ) )
592 resabs1 5427 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( 0 (,) pi ) 
C_  ( -u pi (,) pi )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( 0 (,) pi ) )  =  ( ( RR 
_D  F )  |`  ( 0 (,) pi ) ) )
593167, 592ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( 0 (,) pi ) )  =  ( ( RR  _D  F
)  |`  ( 0 (,) pi ) )
594593, 211eqtr4i 2647 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( 0 (,) pi ) )  =  ( x  e.  ( 0 (,) pi )  |->  0 )
595591, 594syl6eq 2672 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( 0 (,) pi )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  x )  =  ( x  e.  ( 0 (,) pi )  |->  0 ) )
596559, 568syl6eq 2672 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  ( 0 (,) pi )  ->  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x )  =  ( 0 (,) pi ) )
597596oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  ( 0 (,) pi )  ->  (
( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x
) -cn-> CC )  =  ( ( 0 (,) pi ) -cn-> CC ) )
598590, 595, 5973eltr4d 2716 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  ( 0 (,) pi )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  x )  e.  ( ( dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  i^i  x ) -cn-> CC ) )
599558, 598syl 17 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  { (
-u pi (,) 0
) ,  ( 0 (,) pi ) }  /\  -.  x  =  ( -u pi (,) 0 ) )  -> 
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  x
)  e.  ( ( dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  i^i  x
) -cn-> CC ) )
600587, 599pm2.61dan 832 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  { ( -u pi (,) 0 ) ,  ( 0 (,) pi ) }  ->  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  x )  e.  ( ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  i^i  x
) -cn-> CC ) )
601600adantl 482 . . . . . . . . . . . . . . . . . . 19  |-  ( ( T.  /\  x  e. 
{ ( -u pi (,) 0 ) ,  ( 0 (,) pi ) } )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  x )  e.  ( ( dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) )  i^i  x ) -cn-> CC ) )
602334, 340, 532, 573, 601cncfuni 40099 . . . . . . . . . . . . . . . . . 18  |-  ( T. 
->  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  e.  ( dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) -cn-> CC ) )
603602trud 1493 . . . . . . . . . . . . . . . . 17  |-  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  e.  ( dom  ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) -cn-> CC )
604 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  -u pi  ->  (
x (,) +oo )  =  ( -u pi (,) +oo ) )
605604reseq2d 5396 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  -u pi  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( x (,) +oo ) )  =  ( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -u pi (,) +oo )
) )
606 iooss2 12211 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( +oo  e.  RR*  /\  pi  <_ +oo )  ->  ( -u pi (,) pi ) 
C_  ( -u pi (,) +oo ) )
607374, 451, 606mp2an 708 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -u pi (,) pi )  C_  ( -u pi (,) +oo )
608 resabs2 5429 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
-u pi (,) pi )  C_  ( -u pi (,) +oo )  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -u pi (,) +oo ) )  =  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
609607, 608ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( -u pi (,) +oo ) )  =  ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )
610605, 609syl6eq 2672 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  =  -u pi  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( x (,) +oo ) )  =  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
611 id 22 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  =  -u pi  ->  x  =  -u pi )
612610, 611oveq12d 6668 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  -u pi  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  (
x (,) +oo )
) lim CC  x )  =  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) lim CC  -u pi ) )
613252a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( T. 
->  -u pi  e.  CC )
614311, 392, 393, 613constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  0  e.  (
( x  e.  (
-u pi (,) 0
)  |->  0 ) lim CC  -u pi ) )
615614trud 1493 . . . . . . . . . . . . . . . . . . . . . . 23  |-  0  e.  ( ( x  e.  ( -u pi (,) 0 )  |->  0 ) lim
CC  -u pi )
616309oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( x  e.  ( -u pi (,) 0 )  |->  0 ) lim CC  -u pi )  =  ( (
( RR  _D  F
)  |`  ( -u pi (,) 0 ) ) lim CC  -u pi )
617335a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  ( RR  _D  F
) : dom  ( RR  _D  F ) --> CC )
618158a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  -u pi  e.  RR )
619151a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  0  e.  RR* )
620164a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  -u pi  <  0
)
621315a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  ( -u pi (,) 0 )  C_  dom  ( RR  _D  F
) )
622236a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  0  <_  pi )
623617, 618, 619, 620, 621, 471, 622limcresioolb 39875 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( T. 
->  ( ( ( RR 
_D  F )  |`  ( -u pi (,) 0
) ) lim CC  -u pi )  =  ( (
( RR  _D  F
)  |`  ( -u pi (,) pi ) ) lim CC  -u pi ) )
624623trud 1493 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) 0 ) ) lim CC  -u pi )  =  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) lim CC  -u pi )
625616, 624eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  ( -u pi (,) 0 )  |->  0 ) lim CC  -u pi )  =  ( (
( RR  _D  F
)  |`  ( -u pi (,) pi ) ) lim CC  -u pi )
626615, 625eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . 22  |-  0  e.  ( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) lim CC  -u pi )
627626ne0ii 3923 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) ) lim CC  -u pi )  =/=  (/)
628627a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  -u pi  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) lim CC  -u pi )  =/=  (/) )
629612, 628eqnetrd 2861 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  -u pi  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  (
x (,) +oo )
) lim CC  x )  =/=  (/) )
630629adantl 482 . . . . . . . . . . . . . . . . . 18  |-  ( ( x  e.  ( (
-u pi [,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  x  =  -u pi )  ->  ( ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( x (,) +oo ) ) lim CC  x )  =/=  (/) )
631 eldifi 3732 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  ( ( -u pi [,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  x  e.  ( -u pi [,) pi ) )
632159a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  -u pi  e.  RR* )
633153a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  pi  e.  RR* )
634 icossre 12254 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
-u pi  e.  RR  /\  pi  e.  RR* )  ->  ( -u pi [,) pi )  C_  RR )
635158, 153, 634mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( -u pi [,) pi )  C_  RR
636635sseli 3599 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  e.  ( -u pi [,) pi )  ->  x  e.  RR )
637636adantr 481 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  x  e.  RR )
638158a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  -u pi  e.  RR )
639 icogelb 12225 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( (
-u pi  e.  RR*  /\  pi  e.  RR*  /\  x  e.  ( -u pi [,) pi ) )  ->  -u pi  <_  x )
640159, 153, 639mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( -u pi [,) pi )  ->  -u pi  <_  x )
641640adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  -u pi  <_  x
)
642 neqne 2802 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( -.  x  =  -u pi  ->  x  =/=  -u pi )
643642adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  x  =/=  -u pi )
644638, 637, 641, 643leneltd 10191 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  -u pi  <  x
)
645 icoltub 39732 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
-u pi  e.  RR*  /\  pi  e.  RR*  /\  x  e.  ( -u pi [,) pi ) )  ->  x  <  pi )
646159, 153, 645mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  e.  ( -u pi [,) pi )  ->  x  <  pi )
647646adantr 481 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  x  <  pi )
648632, 633, 637, 644, 647eliood 39720 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  ( -u pi [,) pi )  /\  -.  x  =  -u pi )  ->  x  e.  (
-u pi (,) pi ) )
649631, 648sylan 488 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( x  e.  ( (
-u pi [,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  -u pi )  ->  x  e.  (
-u pi (,) pi ) )
650 eldifn 3733 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  ( ( -u pi [,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  -.  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
651650adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( x  e.  ( (
-u pi [,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  -u pi )  ->  -.  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
652649, 651eldifd 3585 . . . . . . . . . . . . . . . . . . 19  |-  ( ( x  e.  ( (
-u pi [,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  -u pi )  ->  x  e.  ( ( -u pi (,) pi )  \  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) ) ) )
653 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  0  ->  (
x (,) +oo )  =  ( 0 (,) +oo ) )
654653reseq2d 5396 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  =  0  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( x (,) +oo ) )  =  ( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  (
0 (,) +oo )
) )
655654, 358oveq12d 6668 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  0  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  (
x (,) +oo )
) lim CC  x )  =  ( ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( 0 (,) +oo ) ) lim CC  0
) )
656213, 446, 393, 393constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  0  e.  (
( x  e.  ( 0 (,) pi ) 
|->  0 ) lim CC  0 ) )
657656trud 1493 . . . . . . . . . . . . . . . . . . . . . . 23  |-  0  e.  ( ( x  e.  ( 0 (,) pi )  |->  0 ) lim CC  0 )
658 resres 5409 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( 0 (,) +oo ) )  =  ( ( RR  _D  F
)  |`  ( ( -u pi (,) pi )  i^i  ( 0 (,) +oo ) ) )
659 iooin 12209 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( -u pi  e.  RR* 
/\  pi  e.  RR* )  /\  ( 0  e. 
RR*  /\ +oo  e.  RR* ) )  ->  (
( -u pi (,) pi )  i^i  ( 0 (,) +oo ) )  =  ( if ( -u pi  <_  0 ,  0 , 
-u pi ) (,)
if ( pi  <_ +oo ,  pi , +oo ) ) )
660159, 153, 151, 374, 659mp4an 709 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( (
-u pi (,) pi )  i^i  ( 0 (,) +oo ) )  =  ( if ( -u pi  <_  0 ,  0 , 
-u pi ) (,)
if ( pi  <_ +oo ,  pi , +oo ) )
661165iftruei 4093 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  if (
-u pi  <_  0 ,  0 ,  -u pi )  =  0
662451iftruei 4093 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  if ( pi  <_ +oo ,  pi , +oo )  =  pi
663661, 662oveq12i 6662 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( if ( -u pi  <_  0 ,  0 ,  -u pi ) (,) if ( pi  <_ +oo ,  pi , +oo ) )  =  ( 0 (,) pi )
664660, 663eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( (
-u pi (,) pi )  i^i  ( 0 (,) +oo ) )  =  ( 0 (,) pi )
665664reseq2i 5393 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( RR  _D  F )  |`  ( ( -u pi (,) pi )  i^i  (
0 (,) +oo )
) )  =  ( ( RR  _D  F
)  |`  ( 0 (,) pi ) )
666211eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( RR  _D  F )  |`  ( 0 (,) pi ) )  =  ( x  e.  ( 0 (,) pi )  |->  0 )
667658, 665, 6663eqtrri 2649 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( 0 (,) pi )  |->  0 )  =  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  (
0 (,) +oo )
)
668667oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  ( 0 (,) pi )  |->  0 ) lim CC  0 )  =  ( ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( 0 (,) +oo ) ) lim CC  0
)
669657, 668eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . 22  |-  0  e.  ( ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  (
0 (,) +oo )
) lim CC  0 )
670669ne0ii 3923 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( 0 (,) +oo ) ) lim
CC  0 )  =/=  (/)
671670a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  0  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  (
0 (,) +oo )
) lim CC  0 )  =/=  (/) )
672655, 671eqnetrd 2861 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  0  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  (
x (,) +oo )
) lim CC  x )  =/=  (/) )
673652, 324, 6723syl 18 . . . . . . . . . . . . . . . . . 18  |-  ( ( x  e.  ( (
-u pi [,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  -u pi )  ->  ( ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( x (,) +oo ) ) lim CC  x )  =/=  (/) )
674630, 673pm2.61dan 832 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ( ( -u pi [,) pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  (
x (,) +oo )
) lim CC  x )  =/=  (/) )
675 oveq2 6658 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  pi  ->  ( -oo (,) x )  =  ( -oo (,) pi ) )
676675reseq2d 5396 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  pi  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) )  =  ( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) pi ) ) )
677 id 22 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  pi  ->  x  =  pi )
678676, 677oveq12d 6668 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  =  pi  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) ) lim
CC  x )  =  ( ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) pi ) ) lim
CC  pi ) )
679 iooss1 12210 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( -oo  e.  RR*  /\ -oo  <_ 
-u pi )  -> 
( -u pi (,) pi )  C_  ( -oo (,) pi ) )
680363, 387, 679mp2an 708 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -u pi (,) pi )  C_  ( -oo (,) pi )
681 resabs2 5429 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
-u pi (,) pi )  C_  ( -oo (,) pi )  ->  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) pi ) )  =  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
682680, 681ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) pi ) )  =  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )
683682oveq1i 6660 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) pi ) ) lim CC  pi )  =  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) lim CC  pi )
684678, 683syl6eq 2672 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  pi  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) ) lim
CC  x )  =  ( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) lim CC  pi ) )
685213, 446, 393, 53constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  0  e.  (
( x  e.  ( 0 (,) pi ) 
|->  0 ) lim CC  pi ) )
686685trud 1493 . . . . . . . . . . . . . . . . . . . . . . 23  |-  0  e.  ( ( x  e.  ( 0 (,) pi )  |->  0 ) lim CC  pi )
687211oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( x  e.  ( 0 (,) pi )  |->  0 ) lim CC  pi )  =  ( ( ( RR  _D  F )  |`  ( 0 (,) pi ) ) lim CC  pi )
688118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  pi  e.  RR )
68968a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  0  <  pi )
690217a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  ( 0 (,) pi )  C_  dom  ( RR 
_D  F ) )
691165a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( T. 
->  -u pi  <_  0
)
692617, 619, 688, 689, 690, 412, 691limcresiooub 39874 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( T. 
->  ( ( ( RR 
_D  F )  |`  ( 0 (,) pi ) ) lim CC  pi )  =  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) lim CC  pi ) )
693692trud 1493 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( RR  _D  F
)  |`  ( 0 (,) pi ) ) lim CC  pi )  =  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) lim CC  pi )
694687, 693eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  ( 0 (,) pi )  |->  0 ) lim CC  pi )  =  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) lim CC  pi )
695686, 694eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . 22  |-  0  e.  ( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) ) lim CC  pi )
696695ne0ii 3923 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) ) lim CC  pi )  =/=  (/)
697696a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  pi  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) lim CC  pi )  =/=  (/) )
698684, 697eqnetrd 2861 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  pi  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) ) lim
CC  x )  =/=  (/) )
699698adantl 482 . . . . . . . . . . . . . . . . . 18  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  x  =  pi )  ->  ( ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) ) lim
CC  x )  =/=  (/) )
700159a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  -u pi  e.  RR* )
701153a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  pi  e.  RR* )
702 negpitopissre 24286 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -u pi (,] pi )  C_  RR
703 eldifi 3732 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  e.  ( ( -u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  x  e.  ( -u pi (,] pi ) )
704702, 703sseldi 3601 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( ( -u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  x  e.  RR )
705704adantr 481 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  x  e.  RR )
706159a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  e.  ( ( -u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  -u pi  e.  RR* )
707153a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  e.  ( ( -u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  pi  e.  RR* )
708 iocgtlb 39724 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( (
-u pi  e.  RR*  /\  pi  e.  RR*  /\  x  e.  ( -u pi (,] pi ) )  ->  -u pi  <  x )
709706, 707, 703, 708syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( ( -u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  -u pi  <  x )
710709adantr 481 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  -u pi  <  x
)
711118a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  pi  e.  RR )
712 iocleub 39725 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( (
-u pi  e.  RR*  /\  pi  e.  RR*  /\  x  e.  ( -u pi (,] pi ) )  ->  x  <_  pi )
713706, 707, 703, 712syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  e.  ( ( -u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  x  <_  pi )
714713adantr 481 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  x  <_  pi )
715 id 22 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( pi  =  x  ->  pi  =  x )
716715eqcomd 2628 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( pi  =  x  ->  x  =  pi )
717716necon3bi 2820 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -.  x  =  pi  ->  pi  =/=  x )
718717adantl 482 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  pi  =/=  x
)
719705, 711, 714, 718leneltd 10191 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  x  <  pi )
720700, 701, 705, 710, 719eliood 39720 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  x  e.  (
-u pi (,) pi ) )
721 eldifn 3733 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  ( ( -u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  -.  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
722721adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  -.  x  e.  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )
723720, 722eldifd 3585 . . . . . . . . . . . . . . . . . . 19  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  x  e.  ( ( -u pi (,) pi )  \  dom  (
( RR  _D  F
)  |`  ( -u pi (,) pi ) ) ) )
724 oveq2 6658 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  0  ->  ( -oo (,) x )  =  ( -oo (,) 0
) )
725724reseq2d 5396 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  =  0  ->  (
( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) )  =  ( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) 0 ) ) )
726725, 358oveq12d 6668 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  0  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) ) lim
CC  x )  =  ( ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) 0 ) ) lim
CC  0 ) )
727311, 392, 393, 393constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  0  e.  (
( x  e.  (
-u pi (,) 0
)  |->  0 ) lim CC  0 ) )
728727trud 1493 . . . . . . . . . . . . . . . . . . . . . . 23  |-  0  e.  ( ( x  e.  ( -u pi (,) 0 )  |->  0 ) lim
CC  0 )
729 resres 5409 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) 0 ) )  =  ( ( RR  _D  F )  |`  ( ( -u pi (,) pi )  i^i  ( -oo (,) 0 ) ) )
730 iooin 12209 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( -u pi  e.  RR* 
/\  pi  e.  RR* )  /\  ( -oo  e.  RR* 
/\  0  e.  RR* ) )  ->  (
( -u pi (,) pi )  i^i  ( -oo (,) 0 ) )  =  ( if ( -u pi  <_ -oo , -oo ,  -u pi ) (,) if ( pi  <_  0 ,  pi ,  0 ) ) )
731159, 153, 363, 151, 730mp4an 709 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( (
-u pi (,) pi )  i^i  ( -oo (,) 0 ) )  =  ( if ( -u pi  <_ -oo , -oo ,  -u pi ) (,) if ( pi  <_  0 ,  pi ,  0 ) )
732 mnflt 11957 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( -u pi  e.  RR  -> -oo  <  -u pi )
733158, 732ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |- -oo  <  -u pi
734 xrltnle 10105 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( -oo  e.  RR*  /\  -u pi  e.  RR* )  ->  ( -oo  <  -u pi  <->  -.  -u pi  <_ -oo ) )
735363, 159, 734mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( -oo  <  -u pi  <->  -.  -u pi  <_ -oo )
736733, 735mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  -.  -u pi  <_ -oo
737736iffalsei 4096 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  if (
-u pi  <_ -oo , -oo ,  -u pi )  = 
-u pi
738 xrltnle 10105 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( 0  e.  RR*  /\  pi  e.  RR* )  ->  (
0  <  pi  <->  -.  pi  <_  0 ) )
739151, 153, 738mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( 0  <  pi  <->  -.  pi  <_  0 )
74068, 739mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  -.  pi  <_  0
741740iffalsei 4096 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  if ( pi  <_  0 ,  pi ,  0 )  =  0
742737, 741oveq12i 6662 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( if ( -u pi  <_ -oo , -oo ,  -u pi ) (,) if ( pi  <_  0 ,  pi ,  0 ) )  =  ( -u pi (,) 0 )
743731, 742eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( (
-u pi (,) pi )  i^i  ( -oo (,) 0 ) )  =  ( -u pi (,) 0 )
744743reseq2i 5393 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( RR  _D  F )  |`  ( ( -u pi (,) pi )  i^i  ( -oo (,) 0 ) ) )  =  ( ( RR  _D  F )  |`  ( -u pi (,) 0 ) )
745309eqcomi 2631 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( RR  _D  F )  |`  ( -u pi (,) 0 ) )  =  ( x  e.  (
-u pi (,) 0
)  |->  0 )
746729, 744, 7453eqtrri 2649 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( -u pi (,) 0 )  |->  0 )  =  ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) 0 ) )
747746oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( x  e.  ( -u pi (,) 0 )  |->  0 ) lim CC  0 )  =  ( ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) 0 ) ) lim CC  0 )
748728, 747eleqtri 2699 . . . . . . . . . . . . . . . . . . . . . 22  |-  0  e.  ( ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) 0 ) ) lim
CC  0 )
749748ne0ii 3923 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( RR  _D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) 0 ) ) lim CC  0 )  =/=  (/)
750749a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  =  0  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) 0 ) ) lim
CC  0 )  =/=  (/) )
751726, 750eqnetrd 2861 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  0  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) ) lim
CC  x )  =/=  (/) )
752723, 324, 7513syl 18 . . . . . . . . . . . . . . . . . 18  |-  ( ( x  e.  ( (
-u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  /\  -.  x  =  pi )  ->  ( ( ( ( RR  _D  F
)  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) ) lim CC  x )  =/=  (/) )
753699, 752pm2.61dan 832 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ( ( -u pi (,] pi )  \  dom  ( ( RR  _D  F )  |`  ( -u pi (,) pi ) ) )  ->  (
( ( ( RR 
_D  F )  |`  ( -u pi (,) pi ) )  |`  ( -oo (,) x ) ) lim
CC  x )  =/=  (/) )
754 eqid 2622 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X
)  |->  1 )  =  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X )  |->  1 )
755 ioosscn 39716 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  -  ( X  mod  T ) ) (,) X )  C_  CC
756755a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  (
( X  -  ( X  mod  T ) ) (,) X )  C_  CC )
757 1cnd 10056 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  1  e.  CC )
75823a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  X  e.  CC )
759754, 756, 757, 758constlimc 39856 . . . . . . . . . . . . . . . . . . 19  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  1  e.  ( ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) 
|->  1 ) lim CC  X
) )
760 ioossioc 39713 . . . . . . . . . . . . . . . . . . . . 21  |-  ( 0 (,) pi )  C_  ( 0 (,] pi )
761760sseli 3599 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  ( X  mod  T )  e.  ( 0 (,] pi ) )
762761iftrued 4094 . . . . . . . . . . . . . . . . . . 19  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  =  1 )
763208a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  F : RR --> CC )
764 modcl 12672 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  e.  RR  /\  T  e.  RR+ )  -> 
( X  mod  T
)  e.  RR )
76522, 133, 764mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( X  mod  T )  e.  RR
76622, 765resubcli 10343 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( X  -  ( X  mod  T ) )  e.  RR
767766rexri 10097 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( X  -  ( X  mod  T ) )  e.  RR*
768767a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  ( X  -  ( X  mod  T ) )  e. 
RR* )
76922a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  X  e.  RR )
770 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  ( X  mod  T )  e.  RR )
771 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( 0  e.  RR*  /\  pi  e.  RR*  /\  ( X  mod  T )  e.  ( 0 (,) pi ) )  ->  0  <  ( X  mod  T
) )
772151, 153, 771mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  0  <  ( X  mod  T
) )
773770, 772elrpd 11869 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  ( X  mod  T )  e.  RR+ )
774769, 773ltsubrpd 11904 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  ( X  -  ( X  mod  T ) )  < 
X )
775 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  -  ( X  mod  T ) ) (,) X )  C_  RR
776775a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  (
( X  -  ( X  mod  T ) ) (,) X )  C_  RR )
777363a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  -> -oo  e.  RR* )
778 mnflt 11957 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  -  ( X  mod  T ) )  e.  RR  -> -oo  <  ( X  -  ( X  mod  T ) ) )
779 xrltle 11982 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( -oo  e.  RR*  /\  ( X  -  ( X  mod  T ) )  e. 
RR* )  ->  ( -oo  <  ( X  -  ( X  mod  T ) )  -> -oo  <_  ( X  -  ( X  mod  T ) ) ) )
780363, 767, 779mp2an 708 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -oo  <  ( X  -  ( X  mod  T ) )  -> -oo  <_  ( X  -  ( X  mod  T ) ) )
781766, 778, 780mp2b 10 . . . . . . . . . . . . . . . . . . . . . 22  |- -oo  <_  ( X  -  ( X  mod  T ) )
782781a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  -> -oo  <_  ( X  -  ( X  mod  T ) ) )
783763, 768, 769, 774, 776, 777, 782limcresiooub 39874 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  (
( F  |`  (
( X  -  ( X  mod  T ) ) (,) X ) ) lim
CC  X )  =  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
784 iooltub 39735 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( 0  e.  RR*  /\  pi  e.  RR*  /\  ( X  mod  T )  e.  ( 0 (,) pi ) )  ->  ( X  mod  T )  < 
pi )
785151, 153, 784mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  ( X  mod  T )  < 
pi )
786208a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  <  pi  ->  F : RR --> CC )
787775a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  <  pi  ->  (
( X  -  ( X  mod  T ) ) (,) X )  C_  RR )
788786, 787feqresmpt 6250 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  <  pi  ->  ( F  |`  ( ( X  -  ( X  mod  T ) ) (,) X
) )  =  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X )  |->  ( F `  x ) ) )
789 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X
)  ->  x  e.  RR )
790789, 107, 145sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X
)  ->  ( F `  x )  =  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
791790adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  -> 
( F `  x
)  =  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )
792789adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  ->  x  e.  RR )
793133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  ->  T  e.  RR+ )
794792, 793modcld 12674 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  -> 
( x  mod  T
)  e.  RR )
795765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  -> 
( X  mod  T
)  e.  RR )
796118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  ->  pi  e.  RR )
79722a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X
)  ->  X  e.  RR )
798133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X
)  ->  T  e.  RR+ )
799 ioossico 12262 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( X  -  ( X  mod  T ) ) (,) X )  C_  ( ( X  -  ( X  mod  T ) ) [,) X )
800799sseli 3599 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X
)  ->  x  e.  ( ( X  -  ( X  mod  T ) ) [,) X ) )
801797, 798, 800ltmod 39870 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X
)  ->  ( x  mod  T )  <  ( X  mod  T ) )
802801adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  -> 
( x  mod  T
)  <  ( X  mod  T ) )
803 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  -> 
( X  mod  T
)  <  pi )
804794, 795, 796, 802, 803lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  -> 
( x  mod  T
)  <  pi )
805804iftrued 4094 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  1 )
806791, 805eqtrd 2656 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )  -> 
( F `  x
)  =  1 )
807806mpteq2dva 4744 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  <  pi  ->  (
x  e.  ( ( X  -  ( X  mod  T ) ) (,) X )  |->  ( F `  x ) )  =  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X
)  |->  1 ) )
808788, 807eqtrd 2656 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  <  pi  ->  ( F  |`  ( ( X  -  ( X  mod  T ) ) (,) X
) )  =  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X )  |->  1 ) )
809785, 808syl 17 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  ( F  |`  ( ( X  -  ( X  mod  T ) ) (,) X
) )  =  ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X )  |->  1 ) )
810809oveq1d 6665 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  (
( F  |`  (
( X  -  ( X  mod  T ) ) (,) X ) ) lim
CC  X )  =  ( ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) 
|->  1 ) lim CC  X
) )
811783, 810eqtr3d 2658 . . . . . . . . . . . . . . . . . . 19  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  (
( F  |`  ( -oo (,) X ) ) lim
CC  X )  =  ( ( x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) 
|->  1 ) lim CC  X
) )
812759, 762, 8113eltr4d 2716 . . . . . . . . . . . . . . . . . 18  |-  ( ( X  mod  T )  e.  ( 0 (,) pi )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
813 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( ( X  -  pi ) (,) X )  |->  -u 1
)  =  ( x  e.  ( ( X  -  pi ) (,) X )  |->  -u 1
)
814 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( X  -  pi ) (,) X )  C_  RR
815814a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( T. 
->  ( ( X  -  pi ) (,) X ) 
C_  RR )
816815, 206syl6ss 3615 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  ( ( X  -  pi ) (,) X ) 
C_  CC )
81723a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  X  e.  CC )
818813, 816, 304, 817constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( T. 
->  -u 1  e.  ( ( x  e.  ( ( X  -  pi ) (,) X )  |->  -u
1 ) lim CC  X
) )
819818trud 1493 . . . . . . . . . . . . . . . . . . . . . 22  |-  -u 1  e.  ( ( x  e.  ( ( X  -  pi ) (,) X ) 
|->  -u 1 ) lim CC  X )
820819a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  =  0  ->  -u 1  e.  ( ( x  e.  ( ( X  -  pi ) (,) X ) 
|->  -u 1 ) lim CC  X ) )
821 id 22 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  =  0  ->  ( X  mod  T )  =  0 )
822 lbioc 39739 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  -.  0  e.  ( 0 (,] pi )
823822a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  =  0  ->  -.  0  e.  ( 0 (,] pi ) )
824821, 823eqneltrd 2720 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  =  0  ->  -.  ( X  mod  T )  e.  ( 0 (,] pi ) )
825824iffalsed 4097 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  =  0  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  =  -u 1
)
826208a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  =  0  ->  F : RR --> CC )
827814a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  =  0  ->  (
( X  -  pi ) (,) X )  C_  RR )
828826, 827feqresmpt 6250 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  =  0  ->  ( F  |`  ( ( X  -  pi ) (,) X ) )  =  ( x  e.  ( ( X  -  pi ) (,) X )  |->  ( F `  x ) ) )
829827sselda 3603 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  x  e.  RR )
830829, 107, 145sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( F `  x )  =  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
831118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  pi  e.  RR )
832133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  T  e.  RR+ )
833829, 832modcld 12674 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( x  mod  T )  e.  RR )
83422, 118resubcli 10343 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( X  -  pi )  e.  RR
835834a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  ( X  -  pi )  e.  RR )
836120a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  T  e.  RR )
837835, 836readdcld 10069 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( X  -  pi )  +  T )  e.  RR )
838 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  x  e.  RR )
839838, 836readdcld 10069 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
x  +  T )  e.  RR )
84022a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  X  e.  RR )
841834rexri 10097 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( X  -  pi )  e. 
RR*
842841a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  ( X  -  pi )  e.  RR* )
843840rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  X  e.  RR* )
844 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  x  e.  ( ( X  -  pi ) (,) X ) )
845 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( ( X  -  pi )  e.  RR*  /\  X  e.  RR*  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( X  -  pi )  <  x
)
846842, 843, 844, 845syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  ( X  -  pi )  <  x )
847835, 838, 836, 846ltadd1dd 10638 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( X  -  pi )  +  T )  <  ( x  +  T
) )
848837, 839, 840, 847ltsub1dd 10639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( X  -  pi )  +  T
)  -  X )  <  ( ( x  +  T )  -  X ) )
849848adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( ( X  -  pi )  +  T )  -  X )  <  (
( x  +  T
)  -  X ) )
850250oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( X  -  pi )  +  T )  =  ( ( X  -  pi )  +  (
pi  +  pi ) )
85152, 52addcli 10044 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( pi  +  pi )  e.  CC
852 subadd23 10293 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( X  e.  CC  /\  pi  e.  CC  /\  (
pi  +  pi )  e.  CC )  -> 
( ( X  -  pi )  +  (
pi  +  pi ) )  =  ( X  +  ( ( pi  +  pi )  -  pi ) ) )
85323, 52, 851, 852mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( X  -  pi )  +  ( pi  +  pi ) )  =  ( X  +  ( ( pi  +  pi )  -  pi ) )
85452, 52pncan3oi 10297 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( pi  +  pi )  -  pi )  =  pi
855854oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( X  +  ( ( pi  +  pi )  -  pi ) )  =  ( X  +  pi )
856850, 853, 8553eqtri 2648 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( X  -  pi )  +  T )  =  ( X  +  pi )
857856oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( ( X  -  pi )  +  T )  -  X )  =  ( ( X  +  pi )  -  X )
858 pncan2 10288 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( X  e.  CC  /\  pi  e.  CC )  -> 
( ( X  +  pi )  -  X
)  =  pi )
85923, 52, 858mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( X  +  pi )  -  X )  =  pi
860857, 859eqtr2i 2645 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  pi  =  ( ( ( X  -  pi )  +  T )  -  X
)
861860a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  pi  =  ( ( ( X  -  pi )  +  T
)  -  X ) )
862839, 840resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( x  +  T
)  -  X )  e.  RR )
863 modabs2 12704 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( ( ( x  +  T )  -  X
)  e.  RR  /\  T  e.  RR+ )  -> 
( ( ( ( x  +  T )  -  X )  mod 
T )  mod  T
)  =  ( ( ( x  +  T
)  -  X )  mod  T ) )
864862, 133, 863sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( ( x  +  T )  -  X )  mod  T
)  mod  T )  =  ( ( ( x  +  T )  -  X )  mod 
T ) )
865133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  T  e.  RR+ )
866 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  0  e.  RR )
867837, 840resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( X  -  pi )  +  T
)  -  X )  e.  RR )
86868, 860breqtri 4678 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  0  <  ( ( ( X  -  pi )  +  T )  -  X
)
869868a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  0  <  ( ( ( X  -  pi )  +  T )  -  X
) )
870866, 867, 862, 869, 848lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  0  <  ( ( x  +  T )  -  X
) )
871866, 862, 870ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  0  <_  ( ( x  +  T )  -  X
) )
872840, 836readdcld 10069 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  ( X  +  T )  e.  RR )
873 iooltub 39735 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( ( X  -  pi )  e.  RR*  /\  X  e.  RR*  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  x  <  X )
874842, 843, 844, 873syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  x  <  X )
875838, 840, 836, 874ltadd1dd 10638 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
x  +  T )  <  ( X  +  T ) )
876839, 872, 840, 875ltsub1dd 10639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( x  +  T
)  -  X )  <  ( ( X  +  T )  -  X ) )
877 pncan2 10288 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( X  e.  CC  /\  T  e.  CC )  ->  ( ( X  +  T )  -  X
)  =  T )
87823, 121, 877mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( X  +  T )  -  X )  =  T
879876, 878syl6breq 4694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( x  +  T
)  -  X )  <  T )
880 modid 12695 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( ( ( ( x  +  T )  -  X )  e.  RR  /\  T  e.  RR+ )  /\  ( 0  <_  (
( x  +  T
)  -  X )  /\  ( ( x  +  T )  -  X )  <  T
) )  ->  (
( ( x  +  T )  -  X
)  mod  T )  =  ( ( x  +  T )  -  X ) )
881862, 865, 871, 879, 880syl22anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( x  +  T )  -  X
)  mod  T )  =  ( ( x  +  T )  -  X ) )
882864, 881eqtr2d 2657 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( x  +  T
)  -  X )  =  ( ( ( ( x  +  T
)  -  X )  mod  T )  mod 
T ) )
883882adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( x  +  T )  -  X )  =  ( ( ( ( x  +  T )  -  X )  mod  T
)  mod  T )
)
884 oveq2 6658 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( X  mod  T )  =  0  ->  (
( ( ( x  +  T )  -  X )  mod  T
)  +  ( X  mod  T ) )  =  ( ( ( ( x  +  T
)  -  X )  mod  T )  +  0 ) )
885884adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( ( ( x  +  T
)  -  X )  mod  T )  +  ( X  mod  T
) )  =  ( ( ( ( x  +  T )  -  X )  mod  T
)  +  0 ) )
886862, 865modcld 12674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( x  +  T )  -  X
)  mod  T )  e.  RR )
887886recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( x  +  T )  -  X
)  mod  T )  e.  CC )
888887addid1d 10236 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( ( x  +  T )  -  X )  mod  T
)  +  0 )  =  ( ( ( x  +  T )  -  X )  mod 
T ) )
889888adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( ( ( x  +  T
)  -  X )  mod  T )  +  0 )  =  ( ( ( x  +  T )  -  X
)  mod  T )
)
890885, 889eqtr2d 2657 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( ( x  +  T )  -  X )  mod 
T )  =  ( ( ( ( x  +  T )  -  X )  mod  T
)  +  ( X  mod  T ) ) )
891890oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( ( ( x  +  T
)  -  X )  mod  T )  mod 
T )  =  ( ( ( ( ( x  +  T )  -  X )  mod 
T )  +  ( X  mod  T ) )  mod  T ) )
892 modaddabs 12708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( ( ( x  +  T )  -  X
)  e.  RR  /\  X  e.  RR  /\  T  e.  RR+ )  ->  (
( ( ( ( x  +  T )  -  X )  mod 
T )  +  ( X  mod  T ) )  mod  T )  =  ( ( ( ( x  +  T
)  -  X )  +  X )  mod 
T ) )
893862, 840, 865, 892syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( ( ( x  +  T )  -  X )  mod 
T )  +  ( X  mod  T ) )  mod  T )  =  ( ( ( ( x  +  T
)  -  X )  +  X )  mod 
T ) )
894893adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( ( ( ( x  +  T )  -  X
)  mod  T )  +  ( X  mod  T ) )  mod  T
)  =  ( ( ( ( x  +  T )  -  X
)  +  X )  mod  T ) )
895883, 891, 8943eqtrd 2660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( x  +  T )  -  X )  =  ( ( ( ( x  +  T )  -  X )  +  X
)  mod  T )
)
896143recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  RR  ->  (
x  +  T )  e.  CC )
89723a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  RR  ->  X  e.  CC )
898896, 897npcand 10396 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  RR  ->  (
( ( x  +  T )  -  X
)  +  X )  =  ( x  +  T ) )
899122a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  RR  ->  (
1  x.  T )  =  T )
900899oveq2d 6666 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  RR  ->  (
x  +  ( 1  x.  T ) )  =  ( x  +  T ) )
901898, 900eqtr4d 2659 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  RR  ->  (
( ( x  +  T )  -  X
)  +  X )  =  ( x  +  ( 1  x.  T
) ) )
902901oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  RR  ->  (
( ( ( x  +  T )  -  X )  +  X
)  mod  T )  =  ( ( x  +  ( 1  x.  T ) )  mod 
T ) )
903838, 902syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  (
( ( ( x  +  T )  -  X )  +  X
)  mod  T )  =  ( ( x  +  ( 1  x.  T ) )  mod 
T ) )
904903adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( ( ( x  +  T
)  -  X )  +  X )  mod 
T )  =  ( ( x  +  ( 1  x.  T ) )  mod  T ) )
905 1zzd 11408 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  1  e.  ZZ )
906829, 832, 905, 136syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( ( x  +  ( 1  x.  T ) )  mod 
T )  =  ( x  mod  T ) )
907895, 904, 9063eqtrrd 2661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( x  mod  T )  =  ( ( x  +  T )  -  X ) )
908849, 861, 9073brtr4d 4685 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  pi  <  (
x  mod  T )
)
909831, 833, 908ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  pi  <_  (
x  mod  T )
)
910831, 833, 909lensymd 10188 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  -.  ( x  mod  T )  <  pi )
911910iffalsed 4097 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  if ( ( x  mod  T )  <  pi ,  1 ,  -u 1 )  = 
-u 1 )
912830, 911eqtrd 2656 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( X  mod  T
)  =  0  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  ( F `  x )  =  -u
1 )
913912mpteq2dva 4744 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  =  0  ->  (
x  e.  ( ( X  -  pi ) (,) X )  |->  ( F `  x ) )  =  ( x  e.  ( ( X  -  pi ) (,) X )  |->  -u 1
) )
914828, 913eqtr2d 2657 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  =  0  ->  (
x  e.  ( ( X  -  pi ) (,) X )  |->  -u
1 )  =  ( F  |`  ( ( X  -  pi ) (,) X ) ) )
915914oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  =  0  ->  (
( x  e.  ( ( X  -  pi ) (,) X )  |->  -u
1 ) lim CC  X
)  =  ( ( F  |`  ( ( X  -  pi ) (,) X ) ) lim CC  X ) )
916841a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  ( X  -  pi )  e.  RR* )
91722a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  X  e.  RR )
918 ltsubrp 11866 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( X  e.  RR  /\  pi  e.  RR+ )  ->  ( X  -  pi )  <  X )
91922, 182, 918mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( X  -  pi )  < 
X
920919a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  ( X  -  pi )  <  X )
921 mnflt 11957 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( X  -  pi )  e.  RR  -> -oo  <  ( X  -  pi ) )
922 xrltle 11982 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( -oo  e.  RR*  /\  ( X  -  pi )  e.  RR* )  ->  ( -oo  <  ( X  -  pi )  -> -oo  <_  ( X  -  pi ) ) )
923363, 841, 922mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( -oo  <  ( X  -  pi )  -> -oo  <_  ( X  -  pi ) )
924834, 921, 923mp2b 10 . . . . . . . . . . . . . . . . . . . . . . . . 25  |- -oo  <_  ( X  -  pi )
925924a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
-> -oo  <_  ( X  -  pi ) )
926361, 916, 917, 920, 815, 364, 925limcresiooub 39874 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( T. 
->  ( ( F  |`  ( ( X  -  pi ) (,) X ) ) lim CC  X )  =  ( ( F  |`  ( -oo (,) X
) ) lim CC  X
) )
927926trud 1493 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( F  |`  ( ( X  -  pi ) (,) X ) ) lim CC  X )  =  ( ( F  |`  ( -oo (,) X ) ) lim
CC  X )
928915, 927syl6req 2673 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  =  0  ->  (
( F  |`  ( -oo (,) X ) ) lim
CC  X )  =  ( ( x  e.  ( ( X  -  pi ) (,) X ) 
|->  -u 1 ) lim CC  X ) )
929820, 825, 9283eltr4d 2716 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  =  0  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
930929adantl 482 . . . . . . . . . . . . . . . . . . 19  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  ( X  mod  T )  =  0 )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
931153a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  pi  e.  RR* )
932120rexri 10097 . . . . . . . . . . . . . . . . . . . . . 22  |-  T  e. 
RR*
933932a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  T  e.  RR* )
934765rexri 10097 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( X  mod  T )  e. 
RR*
935934a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  ( X  mod  T )  e.  RR* )
936118a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  pi  e.  RR )
937765a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  ( X  mod  T )  e.  RR )
938 pm4.56 516 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  <->  -.  ( ( X  mod  T )  e.  ( 0 (,) pi )  \/  ( X  mod  T
)  =  0 ) )
939938biimpi 206 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  -.  ( ( X  mod  T )  e.  ( 0 (,) pi )  \/  ( X  mod  T )  =  0 ) )
940 olc 399 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  =  0  ->  (
( X  mod  T
)  e.  ( 0 (,) pi )  \/  ( X  mod  T
)  =  0 ) )
941940adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  <  pi  /\  ( X  mod  T )  =  0 )  -> 
( ( X  mod  T )  e.  ( 0 (,) pi )  \/  ( X  mod  T
)  =  0 ) )
942151a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  <  pi  /\  ( X  mod  T )  =/=  0 )  -> 
0  e.  RR* )
943153a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  <  pi  /\  ( X  mod  T )  =/=  0 )  ->  pi  e.  RR* )
944765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  <  pi  /\  ( X  mod  T )  =/=  0 )  -> 
( X  mod  T
)  e.  RR )
945 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( X  mod  T )  =/=  0  ->  0  e.  RR )
946765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( X  mod  T )  =/=  0  ->  ( X  mod  T )  e.  RR )
947 modge0 12678 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( X  e.  RR  /\  T  e.  RR+ )  -> 
0  <_  ( X  mod  T ) )
94822, 133, 947mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  0  <_  ( X  mod  T
)
949948a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( X  mod  T )  =/=  0  ->  0  <_  ( X  mod  T
) )
950 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( X  mod  T )  =/=  0  ->  ( X  mod  T )  =/=  0 )
951945, 946, 949, 950leneltd 10191 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( X  mod  T )  =/=  0  ->  0  <  ( X  mod  T
) )
952951adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  <  pi  /\  ( X  mod  T )  =/=  0 )  -> 
0  <  ( X  mod  T ) )
953 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  <  pi  /\  ( X  mod  T )  =/=  0 )  -> 
( X  mod  T
)  <  pi )
954942, 943, 944, 952, 953eliood 39720 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( X  mod  T
)  <  pi  /\  ( X  mod  T )  =/=  0 )  -> 
( X  mod  T
)  e.  ( 0 (,) pi ) )
955954orcd 407 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  <  pi  /\  ( X  mod  T )  =/=  0 )  -> 
( ( X  mod  T )  e.  ( 0 (,) pi )  \/  ( X  mod  T
)  =  0 ) )
956941, 955pm2.61dane 2881 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  <  pi  ->  (
( X  mod  T
)  e.  ( 0 (,) pi )  \/  ( X  mod  T
)  =  0 ) )
957939, 956nsyl 135 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  -.  ( X  mod  T )  <  pi )
958936, 937, 957nltled 10187 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  pi  <_  ( X  mod  T ) )
959 modlt 12679 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  e.  RR  /\  T  e.  RR+ )  -> 
( X  mod  T
)  <  T )
96022, 133, 959mp2an 708 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( X  mod  T )  < 
T
961960a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  ( X  mod  T )  <  T )
962931, 933, 935, 958, 961elicod 12224 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  ( X  mod  T )  e.  ( pi
[,) T ) )
963 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  ( ( X  -  pi ) (,) X )  |->  1 )  =  ( x  e.  ( ( X  -  pi ) (,) X ) 
|->  1 )
964963, 816, 202, 817constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( T. 
->  1  e.  (
( x  e.  ( ( X  -  pi ) (,) X )  |->  1 ) lim CC  X ) )
965964trud 1493 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  1  e.  ( ( x  e.  ( ( X  -  pi ) (,) X ) 
|->  1 ) lim CC  X
)
966965a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  =  pi  ->  1  e.  ( ( x  e.  ( ( X  -  pi ) (,) X ) 
|->  1 ) lim CC  X
) )
967 id 22 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  =  pi  ->  ( X  mod  T )  =  pi )
968 ubioc1 12227 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( 0  e.  RR*  /\  pi  e.  RR*  /\  0  < 
pi )  ->  pi  e.  ( 0 (,] pi ) )
969151, 153, 68, 968mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  pi  e.  ( 0 (,] pi )
970967, 969syl6eqel 2709 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  =  pi  ->  ( X  mod  T )  e.  ( 0 (,] pi ) )
971970iftrued 4094 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  =  pi  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  =  1 )
972361, 815feqresmpt 6250 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( T. 
->  ( F  |`  (
( X  -  pi ) (,) X ) )  =  ( x  e.  ( ( X  -  pi ) (,) X ) 
|->  ( F `  x
) ) )
973972trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( F  |`  ( ( X  -  pi ) (,) X ) )  =  ( x  e.  ( ( X  -  pi ) (,) X )  |->  ( F `
 x ) )
974838, 107, 145sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( ( X  -  pi ) (,) X )  ->  ( F `  x )  =  if ( ( x  mod  T )  < 
pi ,  1 , 
-u 1 ) )
975974adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  -> 
( F `  x
)  =  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )
976 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  x  e.  ( ( X  -  pi ) (,) X ) )
977967eqcomd 2628 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( ( X  mod  T )  =  pi  ->  pi  =  ( X  mod  T ) )
978977oveq2d 6666 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( X  mod  T )  =  pi  ->  ( X  -  pi )  =  ( X  -  ( X  mod  T ) ) )
979978oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( X  mod  T )  =  pi  ->  (
( X  -  pi ) (,) X )  =  ( ( X  -  ( X  mod  T ) ) (,) X ) )
980979adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  -> 
( ( X  -  pi ) (,) X )  =  ( ( X  -  ( X  mod  T ) ) (,) X
) )
981976, 980eleqtrd 2703 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  x  e.  ( ( X  -  ( X  mod  T ) ) (,) X ) )
982981, 801syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  -> 
( x  mod  T
)  <  ( X  mod  T ) )
983 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  -> 
( X  mod  T
)  =  pi )
984982, 983breqtrd 4679 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  -> 
( x  mod  T
)  <  pi )
985984iftrued 4094 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  1 )
986975, 985eqtrd 2656 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  =  pi  /\  x  e.  ( ( X  -  pi ) (,) X ) )  -> 
( F `  x
)  =  1 )
987986mpteq2dva 4744 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( X  mod  T )  =  pi  ->  (
x  e.  ( ( X  -  pi ) (,) X )  |->  ( F `  x ) )  =  ( x  e.  ( ( X  -  pi ) (,) X )  |->  1 ) )
988973, 987syl5req 2669 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  =  pi  ->  (
x  e.  ( ( X  -  pi ) (,) X )  |->  1 )  =  ( F  |`  ( ( X  -  pi ) (,) X ) ) )
989988oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  =  pi  ->  (
( x  e.  ( ( X  -  pi ) (,) X )  |->  1 ) lim CC  X )  =  ( ( F  |`  ( ( X  -  pi ) (,) X ) ) lim CC  X ) )
990989, 927syl6req 2673 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  =  pi  ->  (
( F  |`  ( -oo (,) X ) ) lim
CC  X )  =  ( ( x  e.  ( ( X  -  pi ) (,) X ) 
|->  1 ) lim CC  X
) )
991966, 971, 9903eltr4d 2716 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  =  pi  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
992991adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  ( X  mod  T )  =  pi )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
993153a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  pi  e.  RR* )
994932a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  T  e.  RR* )
995765a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  ( X  mod  T )  e.  RR )
996118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  pi  e.  RR )
997 icogelb 12225 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( pi  e.  RR*  /\  T  e.  RR*  /\  ( X  mod  T )  e.  ( pi [,) T
) )  ->  pi  <_  ( X  mod  T
) )
998153, 932, 997mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  pi  <_  ( X  mod  T
) )
999998adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  pi  <_  ( X  mod  T ) )
1000 neqne 2802 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( -.  ( X  mod  T
)  =  pi  ->  ( X  mod  T )  =/=  pi )
10011000adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  ( X  mod  T )  =/=  pi )
1002996, 995, 999, 1001leneltd 10191 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  pi  <  ( X  mod  T ) )
1003960a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  ( X  mod  T )  <  T )
1004993, 994, 995, 1002, 1003eliood 39720 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  ( X  mod  T )  e.  ( pi
(,) T ) )
1005 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  |->  -u 1 )  =  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X )  |->  -u
1 )
1006 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X )  C_  RR
10071006a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
( ( X  +  pi )  -  ( X  mod  T ) ) (,) X )  C_  RR )
10081007, 206syl6ss 3615 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
( ( X  +  pi )  -  ( X  mod  T ) ) (,) X )  C_  CC )
1009 neg1cn 11124 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  -u 1  e.  CC
10101009a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  -u 1  e.  CC )
101123a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  X  e.  CC )
10121005, 1008, 1010, 1011constlimc 39856 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  -u 1  e.  ( ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) 
|->  -u 1 ) lim CC  X ) )
1013151a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  0  e.  RR* )
1014118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  pi  e.  RR )
1015934a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  ( X  mod  T )  e. 
RR* )
1016 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( pi  e.  RR*  /\  T  e.  RR*  /\  ( X  mod  T )  e.  ( pi (,) T
) )  ->  pi  <  ( X  mod  T
) )
1017153, 932, 1016mp3an12 1414 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  pi  <  ( X  mod  T
) )
10181013, 1014, 1015, 1017gtnelioc 39712 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  -.  ( X  mod  T )  e.  ( 0 (,] pi ) )
10191018iffalsed 4097 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  =  -u 1
)
10201006a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( T. 
->  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) 
C_  RR )
1021361, 1020feqresmpt 6250 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( T. 
->  ( F  |`  (
( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  =  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) 
|->  ( F `  x
) ) )
10221021trud 1493 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( F  |`  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  =  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  |->  ( F `  x ) )
1023 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  x  e.  RR )
10241023, 107, 145sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( F `  x )  =  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
10251024adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  e.  ( pi
(,) T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  -> 
( F `  x
)  =  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )
1026118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  e.  ( pi
(,) T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  pi  e.  RR )
1027133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  T  e.  RR+ )
10281023, 1027modcld 12674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( x  mod  T )  e.  RR )
10291028adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  e.  ( pi
(,) T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  -> 
( x  mod  T
)  e.  RR )
103022, 118readdcli 10053 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( X  +  pi )  e.  RR
10311030recni 10052 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( X  +  pi )  e.  CC
10321031a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  +  pi )  e.  CC )
103323a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  X  e.  CC )
1034765recni 10052 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( X  mod  T )  e.  CC
10351034a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  mod  T )  e.  CC )
10361032, 1033, 1035nnncan2d 10427 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( (
( X  +  pi )  -  ( X  mod  T ) )  -  ( X  -  ( X  mod  T ) ) )  =  ( ( X  +  pi )  -  X ) )
10371036, 859syl6req 2673 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  pi  =  ( ( ( X  +  pi )  -  ( X  mod  T ) )  -  ( X  -  ( X  mod  T ) ) ) )
10381030, 765resubcli 10343 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( ( X  +  pi )  -  ( X  mod  T ) )  e.  RR
10391038a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  +  pi )  -  ( X  mod  T ) )  e.  RR )
1040766a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  ( X  mod  T ) )  e.  RR )
10411038rexri 10097 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( X  +  pi )  -  ( X  mod  T ) )  e.  RR*
10421041a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  +  pi )  -  ( X  mod  T ) )  e.  RR* )
104322a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  X  e.  RR )
10441043rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  X  e.  RR* )
1045 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )
1046 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( ( ( ( X  +  pi )  -  ( X  mod  T ) )  e.  RR*  /\  X  e. 
RR*  /\  x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  ( ( X  +  pi )  -  ( X  mod  T ) )  <  x
)
10471042, 1044, 1045, 1046syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  +  pi )  -  ( X  mod  T ) )  <  x
)
10481039, 1023, 1040, 1047ltsub1dd 10639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( (
( X  +  pi )  -  ( X  mod  T ) )  -  ( X  -  ( X  mod  T ) ) )  <  ( x  -  ( X  -  ( X  mod  T ) ) ) )
10491037, 1048eqbrtrd 4675 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  pi  <  ( x  -  ( X  -  ( X  mod  T ) ) ) )
10501023recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  x  e.  CC )
1051 sub31 39503 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( x  e.  CC  /\  X  e.  CC  /\  ( X  mod  T )  e.  CC )  ->  (
x  -  ( X  -  ( X  mod  T ) ) )  =  ( ( X  mod  T )  -  ( X  -  x ) ) )
10521050, 1033, 1035, 1051syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( x  -  ( X  -  ( X  mod  T ) ) )  =  ( ( X  mod  T
)  -  ( X  -  x ) ) )
10531049, 1052breqtrd 4679 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  pi  <  ( ( X  mod  T
)  -  ( X  -  x ) ) )
10541053adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( pi  <  ( X  mod  T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  pi  <  ( ( X  mod  T )  -  ( X  -  x
) ) )
10551043, 1023resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  x )  e.  RR )
1056 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  0  e.  RR )
1057 iooltub 39735 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( ( ( ( X  +  pi )  -  ( X  mod  T ) )  e.  RR*  /\  X  e. 
RR*  /\  x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  x  <  X )
10581042, 1044, 1045, 1057syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  x  <  X )
10591023, 1043posdifd 10614 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( x  <  X  <->  0  <  ( X  -  x )
) )
10601058, 1059mpbid 222 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  0  <  ( X  -  x ) )
10611056, 1055, 1060ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  0  <_  ( X  -  x ) )
10621043, 1039resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  ( ( X  +  pi )  -  ( X  mod  T ) ) )  e.  RR )
1063120a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  T  e.  RR )
10641039, 1023, 1043, 1047ltsub2dd 10640 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  x )  <  ( X  -  ( ( X  +  pi )  -  ( X  mod  T ) ) ) )
1065 sub31 39503 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |-  ( ( X  e.  CC  /\  ( X  +  pi )  e.  CC  /\  ( X  mod  T )  e.  CC )  ->  ( X  -  ( ( X  +  pi )  -  ( X  mod  T ) ) )  =  ( ( X  mod  T )  -  ( ( X  +  pi )  -  X ) ) )
106623, 1031, 1034, 1065mp3an 1424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( X  -  ( ( X  +  pi )  -  ( X  mod  T ) ) )  =  ( ( X  mod  T
)  -  ( ( X  +  pi )  -  X ) )
1067859oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( ( X  mod  T )  -  ( ( X  +  pi )  -  X ) )  =  ( ( X  mod  T )  -  pi )
10681066, 1067eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( X  -  ( ( X  +  pi )  -  ( X  mod  T ) ) )  =  ( ( X  mod  T
)  -  pi )
1069 ltsubrp 11866 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |-  ( ( ( X  mod  T
)  e.  RR  /\  pi  e.  RR+ )  ->  (
( X  mod  T
)  -  pi )  <  ( X  mod  T ) )
1070765, 182, 1069mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( ( X  mod  T )  -  pi )  < 
( X  mod  T
)
1071765, 118resubcli 10343 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44  |-  ( ( X  mod  T )  -  pi )  e.  RR
10721071, 765, 120lttri 10163 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43  |-  ( ( ( ( X  mod  T )  -  pi )  <  ( X  mod  T )  /\  ( X  mod  T )  < 
T )  ->  (
( X  mod  T
)  -  pi )  <  T )
10731070, 960, 1072mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( ( X  mod  T )  -  pi )  < 
T
10741068, 1073eqbrtri 4674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( X  -  ( ( X  +  pi )  -  ( X  mod  T ) ) )  <  T
10751074a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  ( ( X  +  pi )  -  ( X  mod  T ) ) )  <  T
)
10761055, 1062, 1063, 1064, 1075lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  x )  <  T
)
1077 modid 12695 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( ( ( X  -  x )  e.  RR  /\  T  e.  RR+ )  /\  ( 0  <_  ( X  -  x )  /\  ( X  -  x
)  <  T )
)  ->  ( ( X  -  x )  mod  T )  =  ( X  -  x ) )
10781055, 1027, 1061, 1076, 1077syl22anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  -  x )  mod  T )  =  ( X  -  x ) )
10791078oveq2d 6666 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  mod  T )  -  ( ( X  -  x )  mod  T
) )  =  ( ( X  mod  T
)  -  ( X  -  x ) ) )
10801079oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( (
( X  mod  T
)  -  ( ( X  -  x )  mod  T ) )  mod  T )  =  ( ( ( X  mod  T )  -  ( X  -  x
) )  mod  T
) )
1081765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  mod  T )  e.  RR )
10821081, 1055resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  mod  T )  -  ( X  -  x
) )  e.  RR )
1083118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  pi  e.  RR )
10841052, 1082eqeltrd 2701 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( x  -  ( X  -  ( X  mod  T ) ) )  e.  RR )
108568a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  0  <  pi )
10861056, 1083, 1084, 1085, 1049lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  0  <  ( x  -  ( X  -  ( X  mod  T ) ) ) )
10871086, 1052breqtrd 4679 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  0  <  ( ( X  mod  T
)  -  ( X  -  x ) ) )
10881056, 1082, 1087ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  0  <_  ( ( X  mod  T
)  -  ( X  -  x ) ) )
10891043, 1040resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  ( X  -  ( X  mod  T ) ) )  e.  RR )
10901023, 1043, 1040, 1058ltsub1dd 10639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( x  -  ( X  -  ( X  mod  T ) ) )  <  ( X  -  ( X  -  ( X  mod  T ) ) ) )
1091 nncan 10310 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42  |-  ( ( X  e.  CC  /\  ( X  mod  T )  e.  CC )  -> 
( X  -  ( X  -  ( X  mod  T ) ) )  =  ( X  mod  T ) )
109223, 1034, 1091mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41  |-  ( X  -  ( X  -  ( X  mod  T ) ) )  =  ( X  mod  T )
10931092, 960eqbrtri 4674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( X  -  ( X  -  ( X  mod  T ) ) )  <  T
10941093a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  ( X  -  ( X  mod  T ) ) )  <  T
)
10951084, 1089, 1063, 1090, 1094lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( x  -  ( X  -  ( X  mod  T ) ) )  <  T
)
10961052, 1095eqbrtrrd 4677 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  mod  T )  -  ( X  -  x
) )  <  T
)
1097 modid 12695 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( ( ( ( X  mod  T )  -  ( X  -  x
) )  e.  RR  /\  T  e.  RR+ )  /\  ( 0  <_  (
( X  mod  T
)  -  ( X  -  x ) )  /\  ( ( X  mod  T )  -  ( X  -  x
) )  <  T
) )  ->  (
( ( X  mod  T )  -  ( X  -  x ) )  mod  T )  =  ( ( X  mod  T )  -  ( X  -  x ) ) )
10981082, 1027, 1088, 1096, 1097syl22anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( (
( X  mod  T
)  -  ( X  -  x ) )  mod  T )  =  ( ( X  mod  T )  -  ( X  -  x ) ) )
10991080, 1098eqtr2d 2657 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  mod  T )  -  ( X  -  x
) )  =  ( ( ( X  mod  T )  -  ( ( X  -  x )  mod  T ) )  mod  T ) )
1100 modsubmodmod 12729 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( X  e.  RR  /\  ( X  -  x
)  e.  RR  /\  T  e.  RR+ )  -> 
( ( ( X  mod  T )  -  ( ( X  -  x )  mod  T
) )  mod  T
)  =  ( ( X  -  ( X  -  x ) )  mod  T ) )
11011043, 1055, 1027, 1100syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( (
( X  mod  T
)  -  ( ( X  -  x )  mod  T ) )  mod  T )  =  ( ( X  -  ( X  -  x
) )  mod  T
) )
11021033, 1050nncand 10397 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( X  -  ( X  -  x ) )  =  x )
11031102oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  -  ( X  -  x ) )  mod 
T )  =  ( x  mod  T ) )
11041099, 1101, 11033eqtrd 2660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X
)  ->  ( ( X  mod  T )  -  ( X  -  x
) )  =  ( x  mod  T ) )
11051104adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( pi  <  ( X  mod  T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  -> 
( ( X  mod  T )  -  ( X  -  x ) )  =  ( x  mod  T ) )
11061054, 1105breqtrd 4679 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( ( pi  <  ( X  mod  T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  pi  <  ( x  mod  T ) )
11071017, 1106sylan 488 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( ( X  mod  T
)  e.  ( pi
(,) T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  pi  <  ( x  mod  T ) )
11081026, 1029, 1107ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  e.  ( pi
(,) T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  pi  <_  ( x  mod  T ) )
11091026, 1029, 1108lensymd 10188 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( X  mod  T
)  e.  ( pi
(,) T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  -.  ( x  mod  T
)  <  pi )
11101109iffalsed 4097 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  e.  ( pi
(,) T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  -u 1
)
11111025, 1110eqtrd 2656 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  e.  ( pi
(,) T )  /\  x  e.  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) )  -> 
( F `  x
)  =  -u 1
)
11121111mpteq2dva 4744 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X )  |->  ( F `
 x ) )  =  ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) 
|->  -u 1 ) )
11131022, 1112syl5req 2669 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X )  |->  -u 1
)  =  ( F  |`  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) ) )
11141113oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X )  |->  -u
1 ) lim CC  X
)  =  ( ( F  |`  ( (
( X  +  pi )  -  ( X  mod  T ) ) (,) X ) ) lim CC  X ) )
1115208a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  F : RR --> CC )
11161041a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
( X  +  pi )  -  ( X  mod  T ) )  e. 
RR* )
111722a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  X  e.  RR )
1118 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  ( X  mod  T )  e.  RR )
1119 ltaddsublt 10654 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( X  e.  RR  /\  pi  e.  RR  /\  ( X  mod  T )  e.  RR )  ->  (
pi  <  ( X  mod  T )  <->  ( ( X  +  pi )  -  ( X  mod  T ) )  <  X
) )
11201117, 1014, 1118, 1119syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
pi  <  ( X  mod  T )  <->  ( ( X  +  pi )  -  ( X  mod  T ) )  <  X
) )
11211017, 1120mpbid 222 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
( X  +  pi )  -  ( X  mod  T ) )  < 
X )
1122363a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  -> -oo  e.  RR* )
1123 mnflt 11957 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  +  pi )  -  ( X  mod  T ) )  e.  RR  -> -oo  <  (
( X  +  pi )  -  ( X  mod  T ) ) )
1124 xrltle 11982 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( -oo  e.  RR*  /\  (
( X  +  pi )  -  ( X  mod  T ) )  e. 
RR* )  ->  ( -oo  <  ( ( X  +  pi )  -  ( X  mod  T ) )  -> -oo  <_  (
( X  +  pi )  -  ( X  mod  T ) ) ) )
1125363, 1041, 1124mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( -oo  <  ( ( X  +  pi )  -  ( X  mod  T ) )  -> -oo  <_  ( ( X  +  pi )  -  ( X  mod  T ) ) )
11261038, 1123, 1125mp2b 10 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |- -oo  <_  ( ( X  +  pi )  -  ( X  mod  T ) )
11271126a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi (,) T )  -> -oo  <_  ( ( X  +  pi )  -  ( X  mod  T ) ) )
11281115, 1116, 1117, 1121, 1007, 1122, 1127limcresiooub 39874 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
( F  |`  (
( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) ) lim
CC  X )  =  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
11291114, 1128eqtr2d 2657 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  (
( F  |`  ( -oo (,) X ) ) lim
CC  X )  =  ( ( x  e.  ( ( ( X  +  pi )  -  ( X  mod  T ) ) (,) X ) 
|->  -u 1 ) lim CC  X ) )
11301012, 1019, 11293eltr4d 2716 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi (,) T )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
11311004, 1130syl 17 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  -.  ( X  mod  T
)  =  pi )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
1132992, 1131pm2.61dan 832 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
1133962, 1132syl 17 . . . . . . . . . . . . . . . . . . 19  |-  ( ( -.  ( X  mod  T )  e.  ( 0 (,) pi )  /\  -.  ( X  mod  T
)  =  0 )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
1134930, 1133pm2.61dan 832 . . . . . . . . . . . . . . . . . 18  |-  ( -.  ( X  mod  T
)  e.  ( 0 (,) pi )  ->  if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X ) )
1135812, 1134pm2.61i 176 . . . . . . . . . . . . . . . . 17  |-  if ( ( X  mod  T
)  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  ( ( F  |`  ( -oo (,) X ) ) lim CC  X )
1136 eqid 2622 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  |->  1 )  =  ( x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) )  |->  1 )
1137 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) )  C_  RR
11381137a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( T. 
->  ( X (,) ( X  +  ( pi  -  ( X  mod  T
) ) ) ) 
C_  RR )
11391138, 206syl6ss 3615 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( T. 
->  ( X (,) ( X  +  ( pi  -  ( X  mod  T
) ) ) ) 
C_  CC )
11401136, 1139, 202, 817constlimc 39856 . . . . . . . . . . . . . . . . . . . . 21  |-  ( T. 
->  1  e.  (
( x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) )  |->  1 ) lim CC  X ) )
11411140trud 1493 . . . . . . . . . . . . . . . . . . . 20  |-  1  e.  ( ( x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T
) ) ) ) 
|->  1 ) lim CC  X
)
11421141a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  1  e.  ( ( x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T
) ) ) ) 
|->  1 ) lim CC  X
) )
1143104a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  F  =  ( x  e.  RR  |->  if ( ( x  mod  T )  <  pi ,  1 ,  -u 1 ) ) )
1144 oveq1 6657 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( x  =  X  ->  (
x  mod  T )  =  ( X  mod  T ) )
11451144breq1d 4663 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  =  X  ->  (
( x  mod  T
)  <  pi  <->  ( X  mod  T )  <  pi ) )
11461145ifbid 4108 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( x  =  X  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  if ( ( X  mod  T
)  <  pi , 
1 ,  -u 1
) )
11471146adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( X  mod  T
)  e.  ( 0 [,) pi )  /\  x  =  X )  ->  if ( ( x  mod  T )  < 
pi ,  1 , 
-u 1 )  =  if ( ( X  mod  T )  < 
pi ,  1 , 
-u 1 ) )
114822a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  X  e.  RR )
1149105, 106keepel 4155 . . . . . . . . . . . . . . . . . . . . . 22  |-  if ( ( X  mod  T
)  <  pi , 
1 ,  -u 1
)  e.  RR
11501149a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  if ( ( X  mod  T )  <  pi , 
1 ,  -u 1
)  e.  RR )
11511143, 1147, 1148, 1150fvmptd 6288 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  ( F `  X )  =  if ( ( X  mod  T )  < 
pi ,  1 , 
-u 1 ) )
1152 icoltub 39732 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( 0  e.  RR*  /\  pi  e.  RR*  /\  ( X  mod  T )  e.  ( 0 [,) pi ) )  ->  ( X  mod  T )  < 
pi )
1153151, 153, 1152mp3an12 1414 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  ( X  mod  T )  < 
pi )
11541153iftrued 4094 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  if ( ( X  mod  T )  <  pi , 
1 ,  -u 1
)  =  1 )
11551151, 1154eqtrd 2656 . . . . . . . . . . . . . . . . . . 19  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  ( F `  X )  =  1 )
1156361, 1138feqresmpt 6250 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( T. 
->  ( F  |`  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  =  ( x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) )  |->  ( F `  x ) ) )
11571156trud 1493 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( F  |`  ( X (,) ( X  +  ( pi  -  ( X  mod  T
) ) ) ) )  =  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  |->  ( F `  x ) )
1158 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  x  e.  RR )
11591158, 107, 145sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( F `  x )  =  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
11601159adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  e.  ( 0 [,) pi )  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  -> 
( F `  x
)  =  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )
116122a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  X  e.  RR )
11621158, 1161resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( x  -  X )  e.  RR )
1163133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  T  e.  RR+ )
1164 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  0  e.  RR )
11651161rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  X  e.  RR* )
1166118, 765resubcli 10343 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( pi 
-  ( X  mod  T ) )  e.  RR
116722, 1166readdcli 10053 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( X  +  ( pi  -  ( X  mod  T ) ) )  e.  RR
11681167rexri 10097 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( X  +  ( pi  -  ( X  mod  T ) ) )  e.  RR*
11691168a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( X  +  ( pi  -  ( X  mod  T ) ) )  e.  RR* )
1170 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )
1171 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( X  e.  RR*  /\  ( X  +  ( pi  -  ( X  mod  T
) ) )  e. 
RR*  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  ->  X  <  x
)
11721165, 1169, 1170, 1171syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  X  <  x )
11731161, 1158posdifd 10614 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( X  <  x  <->  0  <  (
x  -  X ) ) )
11741172, 1173mpbid 222 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  0  <  ( x  -  X ) )
11751164, 1162, 1174ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  0  <_  ( x  -  X ) )
1176118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  pi  e.  RR )
1177120a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  T  e.  RR )
11781167a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( X  +  ( pi  -  ( X  mod  T ) ) )  e.  RR )
11791178, 1161resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  +  ( pi  -  ( X  mod  T
) ) )  -  X )  e.  RR )
1180 iooltub 39735 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( X  e.  RR*  /\  ( X  +  ( pi  -  ( X  mod  T
) ) )  e. 
RR*  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  ->  x  <  ( X  +  ( pi  -  ( X  mod  T
) ) ) )
11811165, 1169, 1170, 1180syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  x  <  ( X  +  ( pi 
-  ( X  mod  T ) ) ) )
11821158, 1178, 1161, 1181ltsub1dd 10639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( x  -  X )  <  (
( X  +  ( pi  -  ( X  mod  T ) ) )  -  X ) )
11831166recni 10052 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( pi 
-  ( X  mod  T ) )  e.  CC
1184 pncan2 10288 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( ( X  e.  CC  /\  ( pi  -  ( X  mod  T ) )  e.  CC )  -> 
( ( X  +  ( pi  -  ( X  mod  T ) ) )  -  X )  =  ( pi  -  ( X  mod  T ) ) )
118523, 1183, 1184mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( X  +  ( pi 
-  ( X  mod  T ) ) )  -  X )  =  ( pi  -  ( X  mod  T ) )
1186 subge02 10544 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( pi  e.  RR  /\  ( X  mod  T )  e.  RR )  -> 
( 0  <_  ( X  mod  T )  <->  ( pi  -  ( X  mod  T
) )  <_  pi ) )
1187118, 765, 1186mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( 0  <_  ( X  mod  T )  <->  ( pi  -  ( X  mod  T ) )  <_  pi )
1188948, 1187mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( pi 
-  ( X  mod  T ) )  <_  pi
11891185, 1188eqbrtri 4674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( X  +  ( pi 
-  ( X  mod  T ) ) )  -  X )  <_  pi
11901189a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  +  ( pi  -  ( X  mod  T
) ) )  -  X )  <_  pi )
11911162, 1179, 1176, 1182, 1190ltletrd 10197 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( x  -  X )  <  pi )
1192185a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  pi  <  T )
11931162, 1176, 1177, 1191, 1192lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( x  -  X )  <  T
)
1194 modid 12695 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( ( ( x  -  X )  e.  RR  /\  T  e.  RR+ )  /\  ( 0  <_  (
x  -  X )  /\  ( x  -  X )  <  T
) )  ->  (
( x  -  X
)  mod  T )  =  ( x  -  X ) )
11951162, 1163, 1175, 1193, 1194syl22anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( (
x  -  X )  mod  T )  =  ( x  -  X
) )
11961195oveq2d 6666 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( ( x  -  X )  mod  T
) )  =  ( ( X  mod  T
)  +  ( x  -  X ) ) )
11971196oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( (
( X  mod  T
)  +  ( ( x  -  X )  mod  T ) )  mod  T )  =  ( ( ( X  mod  T )  +  ( x  -  X
) )  mod  T
) )
1198765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( X  mod  T )  e.  RR )
11991198, 1162readdcld 10069 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  e.  RR )
12001161, 1161resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( X  -  X )  e.  RR )
12011198, 1200readdcld 10069 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( X  -  X
) )  e.  RR )
120223subidi 10352 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( X  -  X )  =  0
12031202oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( X  mod  T )  +  ( X  -  X ) )  =  ( ( X  mod  T )  +  0 )
12041034addid1i 10223 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( X  mod  T )  +  0 )  =  ( X  mod  T
)
12051203, 1204eqtr2i 2645 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( X  mod  T )  =  ( ( X  mod  T )  +  ( X  -  X ) )
1206948, 1205breqtri 4678 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  0  <_  ( ( X  mod  T )  +  ( X  -  X ) )
12071206a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  0  <_  ( ( X  mod  T
)  +  ( X  -  X ) ) )
12081161, 1158, 1161, 1172ltsub1dd 10639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( X  -  X )  <  (
x  -  X ) )
12091200, 1162, 1198, 1208ltadd2dd 10196 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( X  -  X
) )  <  (
( X  mod  T
)  +  ( x  -  X ) ) )
12101164, 1201, 1199, 1207, 1209lelttrd 10195 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  0  <  ( ( X  mod  T
)  +  ( x  -  X ) ) )
12111164, 1199, 1210ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  0  <_  ( ( X  mod  T
)  +  ( x  -  X ) ) )
12121162, 1179, 1198, 1182ltadd2dd 10196 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  <  (
( X  mod  T
)  +  ( ( X  +  ( pi 
-  ( X  mod  T ) ) )  -  X ) ) )
12131185oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( X  mod  T )  +  ( ( X  +  ( pi  -  ( X  mod  T ) ) )  -  X
) )  =  ( ( X  mod  T
)  +  ( pi 
-  ( X  mod  T ) ) )
12141034, 52pncan3i 10358 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( X  mod  T )  +  ( pi  -  ( X  mod  T ) ) )  =  pi
12151213, 1214eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( X  mod  T )  +  ( ( X  +  ( pi  -  ( X  mod  T ) ) )  -  X
) )  =  pi
12161212, 1215syl6breq 4694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  <  pi )
12171199, 1176, 1177, 1216, 1192lttrd 10198 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  <  T
)
1218 modid 12695 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( ( ( ( ( X  mod  T )  +  ( x  -  X
) )  e.  RR  /\  T  e.  RR+ )  /\  ( 0  <_  (
( X  mod  T
)  +  ( x  -  X ) )  /\  ( ( X  mod  T )  +  ( x  -  X
) )  <  T
) )  ->  (
( ( X  mod  T )  +  ( x  -  X ) )  mod  T )  =  ( ( X  mod  T )  +  ( x  -  X ) ) )
12191199, 1163, 1211, 1217, 1218syl22anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( (
( X  mod  T
)  +  ( x  -  X ) )  mod  T )  =  ( ( X  mod  T )  +  ( x  -  X ) ) )
12201197, 1219eqtr2d 2657 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  =  ( ( ( X  mod  T )  +  ( ( x  -  X )  mod  T ) )  mod  T ) )
1221 modaddabs 12708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( X  e.  RR  /\  ( x  -  X
)  e.  RR  /\  T  e.  RR+ )  -> 
( ( ( X  mod  T )  +  ( ( x  -  X )  mod  T
) )  mod  T
)  =  ( ( X  +  ( x  -  X ) )  mod  T ) )
12221161, 1162, 1163, 1221syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( (
( X  mod  T
)  +  ( ( x  -  X )  mod  T ) )  mod  T )  =  ( ( X  +  ( x  -  X
) )  mod  T
) )
122323a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  X  e.  CC )
12241158recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  x  e.  CC )
12251223, 1224pncan3d 10395 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( X  +  ( x  -  X ) )  =  x )
12261225oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( ( X  +  ( x  -  X ) )  mod 
T )  =  ( x  mod  T ) )
12271220, 1222, 12263eqtrrd 2661 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( x  e.  ( X (,) ( X  +  (
pi  -  ( X  mod  T ) ) ) )  ->  ( x  mod  T )  =  ( ( X  mod  T
)  +  ( x  -  X ) ) )
12281227adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  -> 
( x  mod  T
)  =  ( ( X  mod  T )  +  ( x  -  X ) ) )
12291216adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  -> 
( ( X  mod  T )  +  ( x  -  X ) )  <  pi )
12301228, 1229eqbrtrd 4675 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  <  pi  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  -> 
( x  mod  T
)  <  pi )
12311153, 1230sylan 488 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( X  mod  T
)  e.  ( 0 [,) pi )  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  -> 
( x  mod  T
)  <  pi )
12321231iftrued 4094 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  e.  ( 0 [,) pi )  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  1 )
12331160, 1232eqtrd 2656 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( X  mod  T
)  e.  ( 0 [,) pi )  /\  x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) )  -> 
( F `  x
)  =  1 )
12341233mpteq2dva 4744 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  (
x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) )  |->  ( F `
 x ) )  =  ( x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T
) ) ) ) 
|->  1 ) )
12351157, 1234syl5req 2669 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  (
x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) )  |->  1 )  =  ( F  |`  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) ) )
12361235oveq1d 6665 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  (
( x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) )  |->  1 ) lim CC  X )  =  ( ( F  |`  ( X (,) ( X  +  ( pi  -  ( X  mod  T
) ) ) ) ) lim CC  X ) )
1237208a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  F : RR --> CC )
12381168a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  ( X  +  ( pi  -  ( X  mod  T
) ) )  e. 
RR* )
12391166a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  (
pi  -  ( X  mod  T ) )  e.  RR )
1240765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  ( X  mod  T )  e.  RR )
1241118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  pi  e.  RR )
12421240, 1241posdifd 10614 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  (
( X  mod  T
)  <  pi  <->  0  <  ( pi  -  ( X  mod  T ) ) ) )
12431153, 1242mpbid 222 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  0  <  ( pi  -  ( X  mod  T ) ) )
12441239, 1243elrpd 11869 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  (
pi  -  ( X  mod  T ) )  e.  RR+ )
12451148, 1244ltaddrpd 11905 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  X  <  ( X  +  ( pi  -  ( X  mod  T ) ) ) )
12461137a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) )  C_  RR )
1247374a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  -> +oo  e.  RR* )
1248 ltpnf 11954 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  +  ( pi 
-  ( X  mod  T ) ) )  e.  RR  ->  ( X  +  ( pi  -  ( X  mod  T ) ) )  < +oo )
1249 xrltle 11982 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  +  ( pi  -  ( X  mod  T ) ) )  e.  RR*  /\ +oo  e.  RR* )  ->  (
( X  +  ( pi  -  ( X  mod  T ) ) )  < +oo  ->  ( X  +  ( pi 
-  ( X  mod  T ) ) )  <_ +oo ) )
12501168, 374, 1249mp2an 708 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  +  ( pi 
-  ( X  mod  T ) ) )  < +oo  ->  ( X  +  ( pi  -  ( X  mod  T ) ) )  <_ +oo )
12511167, 1248, 1250mp2b 10 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( X  +  ( pi  -  ( X  mod  T ) ) )  <_ +oo
12521251a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  ( X  +  ( pi  -  ( X  mod  T
) ) )  <_ +oo )
12531237, 1148, 1238, 1245, 1246, 1247, 1252limcresioolb 39875 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  (
( F  |`  ( X (,) ( X  +  ( pi  -  ( X  mod  T ) ) ) ) ) lim CC  X )  =  ( ( F  |`  ( X (,) +oo ) ) lim
CC  X ) )
12541236, 1253eqtr2d 2657 . . . . . . . . . . . . . . . . . . 19  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  (
( F  |`  ( X (,) +oo ) ) lim
CC  X )  =  ( ( x  e.  ( X (,) ( X  +  ( pi  -  ( X  mod  T
) ) ) ) 
|->  1 ) lim CC  X
) )
12551142, 1155, 12543eltr4d 2716 . . . . . . . . . . . . . . . . . 18  |-  ( ( X  mod  T )  e.  ( 0 [,) pi )  ->  ( F `  X )  e.  ( ( F  |`  ( X (,) +oo )
) lim CC  X )
)
1256153a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( -.  ( X  mod  T
)  e.  ( 0 [,) pi )  ->  pi  e.  RR* )
1257932a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( -.  ( X  mod  T
)  e.  ( 0 [,) pi )  ->  T  e.  RR* )
1258934a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( -.  ( X  mod  T
)  e.  ( 0 [,) pi )  -> 
( X  mod  T
)  e.  RR* )
1259151a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( -.  ( X  mod  T )  e.  ( 0 [,) pi )  /\  -.  pi  <_  ( X  mod  T ) )  -> 
0  e.  RR* )
1260153a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( -.  ( X  mod  T )  e.  ( 0 [,) pi )  /\  -.  pi  <_  ( X  mod  T ) )  ->  pi  e.  RR* )
1261934a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( -.  ( X  mod  T )  e.  ( 0 [,) pi )  /\  -.  pi  <_  ( X  mod  T ) )  -> 
( X  mod  T
)  e.  RR* )
1262948a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( -.  ( X  mod  T )  e.  ( 0 [,) pi )  /\  -.  pi  <_  ( X  mod  T ) )  -> 
0  <_  ( X  mod  T ) )
1263765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( -.  pi  <_  ( X  mod  T )  ->  ( X  mod  T )  e.  RR )
1264118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( -.  pi  <_  ( X  mod  T )  ->  pi  e.  RR )
12651263, 1264ltnled 10184 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( -.  pi  <_  ( X  mod  T )  ->  (
( X  mod  T
)  <  pi  <->  -.  pi  <_  ( X  mod  T
) ) )
12661265ibir 257 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -.  pi  <_  ( X  mod  T )  ->  ( X  mod  T )  < 
pi )
12671266adantl 482 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( -.  ( X  mod  T )  e.  ( 0 [,) pi )  /\  -.  pi  <_  ( X  mod  T ) )  -> 
( X  mod  T
)  <  pi )
12681259, 1260, 1261, 1262, 1267elicod 12224 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  ( X  mod  T )  e.  ( 0 [,) pi )  /\  -.  pi  <_  ( X  mod  T ) )  -> 
( X  mod  T
)  e.  ( 0 [,) pi ) )
1269 simpl 473 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( -.  ( X  mod  T )  e.  ( 0 [,) pi )  /\  -.  pi  <_  ( X  mod  T ) )  ->  -.  ( X  mod  T
)  e.  ( 0 [,) pi ) )
12701268, 1269condan 835 . . . . . . . . . . . . . . . . . . . 20  |-  ( -.  ( X  mod  T
)  e.  ( 0 [,) pi )  ->  pi  <_  ( X  mod  T ) )
1271960a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( -.  ( X  mod  T
)  e.  ( 0 [,) pi )  -> 
( X  mod  T
)  <  T )
12721256, 1257, 1258, 1270, 1271elicod 12224 . . . . . . . . . . . . . . . . . . 19  |-  ( -.  ( X  mod  T
)  e.  ( 0 [,) pi )  -> 
( X  mod  T
)  e.  ( pi
[,) T ) )
1273 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  |->  -u 1 )  =  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  |->  -u
1 )
1274 ioossre 12235 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  C_  RR
12751274a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) 
C_  RR )
12761275, 206syl6ss 3615 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( T. 
->  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) 
C_  CC )
12771273, 1276, 304, 817constlimc 39856 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( T. 
->  -u 1  e.  ( ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  |->  -u
1 ) lim CC  X
) )
12781277trud 1493 . . . . . . . . . . . . . . . . . . . . 21  |-  -u 1  e.  ( ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) 
|->  -u 1 ) lim CC  X )
12791278a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  -u 1  e.  ( ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) 
|->  -u 1 ) lim CC  X ) )
1280 1ex 10035 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  1  e.  _V
1281106elexi 3213 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  -u 1  e.  _V
12821280, 1281ifex 4156 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  if ( ( X  mod  T
)  <  pi , 
1 ,  -u 1
)  e.  _V
12831146, 104, 1282fvmpt 6282 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( X  e.  RR  ->  ( F `  X )  =  if ( ( X  mod  T )  < 
pi ,  1 , 
-u 1 ) )
128422, 1283ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( F `
 X )  =  if ( ( X  mod  T )  < 
pi ,  1 , 
-u 1 )
12851284a1i 11 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( F `  X )  =  if ( ( X  mod  T )  < 
pi ,  1 , 
-u 1 ) )
1286118a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  pi  e.  RR )
1287765a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( X  mod  T )  e.  RR )
12881286, 1287, 998lensymd 10188 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  -.  ( X  mod  T )  <  pi )
12891288iffalsed 4097 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  if ( ( X  mod  T )  <  pi , 
1 ,  -u 1
)  =  -u 1
)
12901285, 1289eqtrd 2656 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( F `  X )  =  -u 1 )
1291361, 1275feqresmpt 6250 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( T. 
->  ( F  |`  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  =  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  |->  ( F `  x ) ) )
12921291trud 1493 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( F  |`  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  =  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  |->  ( F `  x ) )
1293 elioore 12205 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  x  e.  RR )
12941293, 107, 145sylancl 694 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( F `  x )  =  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
) )
12951294adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  -> 
( F `  x
)  =  if ( ( x  mod  T
)  <  pi , 
1 ,  -u 1
) )
1296118a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  pi  e.  RR )
129722a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  X  e.  RR )
12981293, 1297resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( x  -  X )  e.  RR )
1299133a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  T  e.  RR+ )
1300 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  0  e.  RR )
13011297rexrd 10089 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  X  e.  RR* )
1302120, 765resubcli 10343 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40  |-  ( T  -  ( X  mod  T ) )  e.  RR
130322, 1302readdcli 10053 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( X  +  ( T  -  ( X  mod  T ) ) )  e.  RR
13041303rexri 10097 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( X  +  ( T  -  ( X  mod  T ) ) )  e.  RR*
13051304a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( X  +  ( T  -  ( X  mod  T ) ) )  e.  RR* )
1306 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )
1307 ioogtlb 39717 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( X  e.  RR*  /\  ( X  +  ( T  -  ( X  mod  T ) ) )  e. 
RR*  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  X  <  x
)
13081301, 1305, 1306, 1307syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  X  <  x )
13091297, 1293posdifd 10614 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( X  <  x  <->  0  <  (
x  -  X ) ) )
13101308, 1309mpbid 222 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  0  <  ( x  -  X ) )
13111300, 1298, 1310ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  0  <_  ( x  -  X ) )
13121303a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( X  +  ( T  -  ( X  mod  T ) ) )  e.  RR )
13131312, 1297resubcld 10458 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  +  ( T  -  ( X  mod  T ) ) )  -  X )  e.  RR )
1314120a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  T  e.  RR )
1315 iooltub 39735 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( X  e.  RR*  /\  ( X  +  ( T  -  ( X  mod  T ) ) )  e. 
RR*  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  x  <  ( X  +  ( T  -  ( X  mod  T ) ) ) )
13161301, 1305, 1306, 1315syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  x  <  ( X  +  ( T  -  ( X  mod  T ) ) ) )
13171293, 1312, 1297, 1316ltsub1dd 10639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( x  -  X )  <  (
( X  +  ( T  -  ( X  mod  T ) ) )  -  X ) )
13181302recni 10052 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( T  -  ( X  mod  T ) )  e.  CC
1319 pncan2 10288 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( ( X  e.  CC  /\  ( T  -  ( X  mod  T ) )  e.  CC )  -> 
( ( X  +  ( T  -  ( X  mod  T ) ) )  -  X )  =  ( T  -  ( X  mod  T ) ) )
132023, 1318, 1319mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( ( X  +  ( T  -  ( X  mod  T ) ) )  -  X )  =  ( T  -  ( X  mod  T ) )
1321 subge02 10544 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39  |-  ( ( T  e.  RR  /\  ( X  mod  T )  e.  RR )  -> 
( 0  <_  ( X  mod  T )  <->  ( T  -  ( X  mod  T ) )  <_  T
) )
1322120, 765, 1321mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38  |-  ( 0  <_  ( X  mod  T )  <->  ( T  -  ( X  mod  T ) )  <_  T )
1323948, 1322mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37  |-  ( T  -  ( X  mod  T ) )  <_  T
13241320, 1323eqbrtri 4674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36  |-  ( ( X  +  ( T  -  ( X  mod  T ) ) )  -  X )  <_  T
13251324a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  +  ( T  -  ( X  mod  T ) ) )  -  X )  <_  T
)
13261298, 1313, 1314, 1317, 1325ltletrd 10197 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( x  -  X )  <  T
)
13271298, 1299, 1311, 1326, 1194syl22anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( (
x  -  X )  mod  T )  =  ( x  -  X
) )
13281327oveq2d 6666 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( ( x  -  X )  mod  T
) )  =  ( ( X  mod  T
)  +  ( x  -  X ) ) )
13291328oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( (
( X  mod  T
)  +  ( ( x  -  X )  mod  T ) )  mod  T )  =  ( ( ( X  mod  T )  +  ( x  -  X
) )  mod  T
) )
1330 readdcl 10019 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( ( X  mod  T
)  e.  RR  /\  ( x  -  X
)  e.  RR )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  e.  RR )
1331765, 1298, 1330sylancr 695 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  e.  RR )
1332765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( X  mod  T )  e.  RR )
1333948a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  0  <_  ( X  mod  T ) )
13341332, 1298, 1333, 1310addgegt0d 10601 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  0  <  ( ( X  mod  T
)  +  ( x  -  X ) ) )
13351300, 1331, 1334ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  0  <_  ( ( X  mod  T
)  +  ( x  -  X ) ) )
13361298, 1313, 1332, 1317ltadd2dd 10196 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  <  (
( X  mod  T
)  +  ( ( X  +  ( T  -  ( X  mod  T ) ) )  -  X ) ) )
13371320oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( X  mod  T )  +  ( ( X  +  ( T  -  ( X  mod  T ) ) )  -  X
) )  =  ( ( X  mod  T
)  +  ( T  -  ( X  mod  T ) ) )
13381034, 121pncan3i 10358 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34  |-  ( ( X  mod  T )  +  ( T  -  ( X  mod  T ) ) )  =  T
13391337, 1338eqtri 2644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33  |-  ( ( X  mod  T )  +  ( ( X  +  ( T  -  ( X  mod  T ) ) )  -  X
) )  =  T
13401336, 1339syl6breq 4694 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  <  T
)
13411331, 1299, 1335, 1340, 1218syl22anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( (
( X  mod  T
)  +  ( x  -  X ) )  mod  T )  =  ( ( X  mod  T )  +  ( x  -  X ) ) )
13421329, 1341eqtr2d 2657 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  =  ( ( ( X  mod  T )  +  ( ( x  -  X )  mod  T ) )  mod  T ) )
13431297, 1298, 1299, 1221syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( (
( X  mod  T
)  +  ( ( x  -  X )  mod  T ) )  mod  T )  =  ( ( X  +  ( x  -  X
) )  mod  T
) )
134423a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  X  e.  CC )
13451293recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  x  e.  CC )
13461344, 1345pncan3d 10395 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( X  +  ( x  -  X ) )  =  x )
13471346oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  +  ( x  -  X ) )  mod 
T )  =  ( x  mod  T ) )
13481342, 1343, 13473eqtrd 2660 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( ( X  mod  T )  +  ( x  -  X
) )  =  ( x  mod  T ) )
13491348adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  -> 
( ( X  mod  T )  +  ( x  -  X ) )  =  ( x  mod  T ) )
13501331adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  -> 
( ( X  mod  T )  +  ( x  -  X ) )  e.  RR )
13511349, 1350eqeltrrd 2702 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  -> 
( x  mod  T
)  e.  RR )
1352765a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  -> 
( X  mod  T
)  e.  RR )
1353998adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  pi  <_  ( X  mod  T ) )
13541298, 1310elrpd 11869 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( x  -  X )  e.  RR+ )
13551332, 1354ltaddrpd 11905 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  ->  ( X  mod  T )  <  (
( X  mod  T
)  +  ( x  -  X ) ) )
13561355adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  -> 
( X  mod  T
)  <  ( ( X  mod  T )  +  ( x  -  X
) ) )
13571296, 1352, 1350, 1353, 1356lelttrd 10195 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  pi  <  ( ( X  mod  T )  +  ( x  -  X
) ) )
13581296, 1350, 1357ltled 10185 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  pi  <_  ( ( X  mod  T )  +  ( x  -  X
) ) )
13591358, 1349breqtrd 4679 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  pi  <_  ( x  mod  T ) )
13601296, 1351, 1359lensymd 10188 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  -.  ( x  mod  T
)  <  pi )
13611360iffalsed 4097 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  ->  if ( ( x  mod  T )  <  pi , 
1 ,  -u 1
)  =  -u 1
)
13621295, 1361eqtrd 2656 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( X  mod  T
)  e.  ( pi
[,) T )  /\  x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) )  -> 
( F `  x
)  =  -u 1
)
13631362mpteq2dva 4744 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  (
x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  |->  ( F `
 x ) )  =  ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) 
|->  -u 1 ) )
13641292, 1363syl5req 2669 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  (
x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  |->  -u 1
)  =  ( F  |`  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) ) )
13651364oveq1d 6665 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  (
( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  |->  -u
1 ) lim CC  X
)  =  ( ( F  |`  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) ) lim CC  X ) )
1366208a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  F : RR --> CC )
136722a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  X  e.  RR )
13681304a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( X  +  ( T  -  ( X  mod  T ) ) )  e. 
RR* )
13691302a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( T  -  ( X  mod  T ) )  e.  RR )
1370960a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( X  mod  T )  < 
T )
1371120a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  T  e.  RR )
13721287, 1371posdifd 10614 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  (
( X  mod  T
)  <  T  <->  0  <  ( T  -  ( X  mod  T ) ) ) )
13731370, 1372mpbid 222 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  0  <  ( T  -  ( X  mod  T ) ) )
13741369, 1373elrpd 11869 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( T  -  ( X  mod  T ) )  e.  RR+ )
13751367, 1374ltaddrpd 11905 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  X  <  ( X  +  ( T  -  ( X  mod  T ) ) ) )
13761274a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) )  C_  RR )
1377374a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  -> +oo  e.  RR* )
1378 ltpnf 11954 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  +  ( T  -  ( X  mod  T ) ) )  e.  RR  ->  ( X  +  ( T  -  ( X  mod  T ) ) )  < +oo )
1379 xrltle 11982 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( X  +  ( T  -  ( X  mod  T ) ) )  e.  RR*  /\ +oo  e.  RR* )  ->  (
( X  +  ( T  -  ( X  mod  T ) ) )  < +oo  ->  ( X  +  ( T  -  ( X  mod  T ) ) )  <_ +oo ) )
13801304, 374, 1379mp2an 708 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( X  +  ( T  -  ( X  mod  T ) ) )  < +oo  ->  ( X  +  ( T  -  ( X  mod  T ) ) )  <_ +oo )
13811303, 1378, 1380mp2b 10 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( X  +  ( T  -  ( X  mod  T ) ) )  <_ +oo
13821381a1i 11 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( X  +  ( T  -  ( X  mod  T ) ) )  <_ +oo )
13831366, 1367, 1368, 1375, 1376, 1377, 1382limcresioolb 39875 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  (
( F  |`  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) ) lim CC  X )  =  ( ( F  |`  ( X (,) +oo ) ) lim
CC  X ) )
13841365, 1383eqtr2d 2657 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  (
( F  |`  ( X (,) +oo ) ) lim
CC  X )  =  ( ( x  e.  ( X (,) ( X  +  ( T  -  ( X  mod  T ) ) ) ) 
|->  -u 1 ) lim CC  X ) )
13851279, 1290, 13843eltr4d 2716 . . . . . . . . . . . . . . . . . . 19  |-  ( ( X  mod  T )  e.  ( pi [,) T )  ->  ( F `  X )  e.  ( ( F  |`  ( X (,) +oo )
) lim CC  X )
)
13861272, 1385syl 17 . . . . . . . . . . . . . . . . . 18  |-  ( -.  ( X  mod  T
)  e.  ( 0 [,) pi )  -> 
( F `  X
)  e.  ( ( F  |`  ( X (,) +oo ) ) lim CC  X ) )
13871255, 1386pm2.61i 176 . . . . . . . . . . . . . . . . 17  |-  ( F `
 X )  e.  ( ( F  |`  ( X (,) +oo )
) lim CC  X )
1388 id 22 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN0  ->  n  e. 
NN0 )
1389110, 104, 1388sqwvfoura 40445 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN0  ->  ( S. ( -u pi (,) pi ) ( ( F `
 x )  x.  ( cos `  (
n  x.  x ) ) )  _d x  /  pi )  =  0 )
13901389eqcomd 2628 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN0  ->  0  =  ( S. ( -u pi (,) pi ) ( ( F `  x
)  x.  ( cos `  ( n  x.  x
) ) )  _d x  /  pi ) )
13911390mpteq2ia 4740 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN0  |->  0 )  =  ( n  e. 
NN0  |->  ( S. (
-u pi (,) pi ) ( ( F `
 x )  x.  ( cos `  (
n  x.  x ) ) )  _d x  /  pi ) )
1392 id 22 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  n  e.  NN )
1393110, 104, 1392sqwvfourb 40446 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  ( S. ( -u pi (,) pi ) ( ( F `
 x )  x.  ( sin `  (
n  x.  x ) ) )  _d x  /  pi )  =  if ( 2  ||  n ,  0 , 
( 4  /  (
n  x.  pi ) ) ) )
13941393eqcomd 2628 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN  ->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  =  ( S. ( -u pi (,) pi ) ( ( F `
 x )  x.  ( sin `  (
n  x.  x ) ) )  _d x  /  pi ) )
13951394mpteq2ia 4740 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) ) )  =  ( n  e.  NN  |->  ( S. ( -u pi (,) pi ) ( ( F `
 x )  x.  ( sin `  (
n  x.  x ) ) )  _d x  /  pi ) )
1396 nnnn0 11299 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( n  e.  NN  ->  n  e.  NN0 )
1397 0red 10041 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( n  e.  NN  ->  0  e.  RR )
1398 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( n  e.  NN0  |->  0 )  =  ( n  e. 
NN0  |->  0 )
13991398fvmpt2 6291 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( n  e.  NN0  /\  0  e.  RR )  ->  ( ( n  e. 
NN0  |->  0 ) `  n )  =  0 )
14001396, 1397, 1399syl2anc 693 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( n  e.  NN  ->  (
( n  e.  NN0  |->  0 ) `  n
)  =  0 )
14011400oveq1d 6665 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  e.  NN  ->  (
( ( n  e. 
NN0  |->  0 ) `  n )  x.  ( cos `  ( n  x.  X ) ) )  =  ( 0  x.  ( cos `  (
n  x.  X ) ) ) )
140274coscld 14861 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( n  e.  NN  ->  ( cos `  ( n  x.  X ) )  e.  CC )
14031402mul02d 10234 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  e.  NN  ->  (
0  x.  ( cos `  ( n  x.  X
) ) )  =  0 )
14041401, 1403eqtrd 2656 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  (
( ( n  e. 
NN0  |->  0 ) `  n )  x.  ( cos `  ( n  x.  X ) ) )  =  0 )
1405 ovex 6678 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( 4  /  ( n  x.  pi ) )  e. 
_V
140689, 1405ifex 4156 . . . . . . . . . . . . . . . . . . . . . 22  |-  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  e.  _V
1407 eqid 2622 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) ) )  =  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) ) )
14081407fvmpt2 6291 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( n  e.  NN  /\  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  e.  _V )  ->  ( ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( 4  / 
( n  x.  pi ) ) ) ) `
 n )  =  if ( 2  ||  n ,  0 , 
( 4  /  (
n  x.  pi ) ) ) )
14091406, 1408mpan2 707 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  e.  NN  ->  (
( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) ) ) `  n
)  =  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) ) )
14101409oveq1d 6665 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  (
( ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( 4  / 
( n  x.  pi ) ) ) ) `
 n )  x.  ( sin `  (
n  x.  X ) ) )  =  ( if ( 2  ||  n ,  0 , 
( 4  /  (
n  x.  pi ) ) )  x.  ( sin `  ( n  x.  X ) ) ) )
14111404, 1410oveq12d 6668 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  (
( ( ( n  e.  NN0  |->  0 ) `
 n )  x.  ( cos `  (
n  x.  X ) ) )  +  ( ( ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( 4  / 
( n  x.  pi ) ) ) ) `
 n )  x.  ( sin `  (
n  x.  X ) ) ) )  =  ( 0  +  ( if ( 2  ||  n ,  0 , 
( 4  /  (
n  x.  pi ) ) )  x.  ( sin `  ( n  x.  X ) ) ) ) )
141260, 72ifcld 4131 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  e.  NN  ->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  e.  CC )
14131412, 75mulcld 10060 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  e.  NN  ->  ( if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  x.  ( sin `  ( n  x.  X
) ) )  e.  CC )
14141413addid2d 10237 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  (
0  +  ( if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  x.  ( sin `  ( n  x.  X
) ) ) )  =  ( if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  x.  ( sin `  (
n  x.  X ) ) ) )
1415 iftrue 4092 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( 2 
||  n  ->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  =  0 )
14161415oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( 2 
||  n  ->  ( if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  x.  ( sin `  ( n  x.  X
) ) )  =  ( 0  x.  ( sin `  ( n  x.  X ) ) ) )
141775mul02d 10234 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( n  e.  NN  ->  (
0  x.  ( sin `  ( n  x.  X
) ) )  =  0 )
14181416, 1417sylan9eqr 2678 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  NN  /\  2  ||  n )  -> 
( if ( 2 
||  n ,  0 ,  ( 4  / 
( n  x.  pi ) ) )  x.  ( sin `  (
n  x.  X ) ) )  =  0 )
1419 iftrue 4092 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( 2 
||  n  ->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) )  =  0 )
14201419eqcomd 2628 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( 2 
||  n  ->  0  =  if ( 2  ||  n ,  0 , 
( ( 4  / 
( n  x.  pi ) )  x.  ( sin `  ( n  x.  X ) ) ) ) )
14211420adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  NN  /\  2  ||  n )  -> 
0  =  if ( 2  ||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) )
14221418, 1421eqtrd 2656 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  NN  /\  2  ||  n )  -> 
( if ( 2 
||  n ,  0 ,  ( 4  / 
( n  x.  pi ) ) )  x.  ( sin `  (
n  x.  X ) ) )  =  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) )
1423 iffalse 4095 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -.  2  ||  n  ->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  =  ( 4  /  ( n  x.  pi ) ) )
14241423oveq1d 6665 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( -.  2  ||  n  -> 
( if ( 2 
||  n ,  0 ,  ( 4  / 
( n  x.  pi ) ) )  x.  ( sin `  (
n  x.  X ) ) )  =  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) )
14251424adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  NN  /\  -.  2  ||  n )  ->  ( if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  x.  ( sin `  (
n  x.  X ) ) )  =  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) )
1426 iffalse 4095 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( -.  2  ||  n  ->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) )  =  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) )
14271426eqcomd 2628 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( -.  2  ||  n  -> 
( ( 4  / 
( n  x.  pi ) )  x.  ( sin `  ( n  x.  X ) ) )  =  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) )
14281427adantl 482 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  NN  /\  -.  2  ||  n )  ->  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) )  =  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) )
14291425, 1428eqtrd 2656 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  NN  /\  -.  2  ||  n )  ->  ( if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  x.  ( sin `  (
n  x.  X ) ) )  =  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) )
14301422, 1429pm2.61dan 832 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  ( if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) )  x.  ( sin `  ( n  x.  X
) ) )  =  if ( 2  ||  n ,  0 , 
( ( 4  / 
( n  x.  pi ) )  x.  ( sin `  ( n  x.  X ) ) ) ) )
14311411, 1414, 14303eqtrrd 2661 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN  ->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) )  =  ( ( ( ( n  e.  NN0  |->  0 ) `  n
)  x.  ( cos `  ( n  x.  X
) ) )  +  ( ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) ) ) `  n )  x.  ( sin `  (
n  x.  X ) ) ) ) )
14321431mpteq2ia 4740 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) )  =  ( n  e.  NN  |->  ( ( ( ( n  e.  NN0  |->  0 ) `  n
)  x.  ( cos `  ( n  x.  X
) ) )  +  ( ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( 4  /  ( n  x.  pi ) ) ) ) `  n )  x.  ( sin `  (
n  x.  X ) ) ) ) )
1433109, 110, 147, 148, 329, 603, 674, 753, 22, 1135, 1387, 1391, 1395, 1432fourierclim 40441 . . . . . . . . . . . . . . . 16  |-  seq 1
(  +  ,  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) )  ~~>  ( ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X
) )  /  2
)  -  ( ( ( n  e.  NN0  |->  0 ) `  0
)  /  2 ) )
1434 0nn0 11307 . . . . . . . . . . . . . . . . . . . . 21  |-  0  e.  NN0
1435 eqidd 2623 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( n  =  0  ->  0  =  0 )
14361435, 1398, 89fvmpt 6282 . . . . . . . . . . . . . . . . . . . . 21  |-  ( 0  e.  NN0  ->  ( ( n  e.  NN0  |->  0 ) `
 0 )  =  0 )
14371434, 1436ax-mp 5 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  NN0  |->  0 ) `
 0 )  =  0
14381437oveq1i 6660 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( n  e.  NN0  |->  0 ) `  0
)  /  2 )  =  ( 0  / 
2 )
143928recni 10052 . . . . . . . . . . . . . . . . . . . 20  |-  2  e.  CC
144067, 129gtneii 10149 . . . . . . . . . . . . . . . . . . . 20  |-  2  =/=  0
14411439, 1440div0i 10759 . . . . . . . . . . . . . . . . . . 19  |-  ( 0  /  2 )  =  0
14421438, 1441eqtri 2644 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( n  e.  NN0  |->  0 ) `  0
)  /  2 )  =  0
14431442oveq2i 6661 . . . . . . . . . . . . . . . . 17  |-  ( ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X
) )  /  2
)  -  ( ( ( n  e.  NN0  |->  0 ) `  0
)  /  2 ) )  =  ( ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X
) )  /  2
)  -  0 )
1444202trud 1493 . . . . . . . . . . . . . . . . . . . . 21  |-  1  e.  CC
14451444, 1009keepel 4155 . . . . . . . . . . . . . . . . . . . 20  |-  if ( ( X  mod  T
)  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  e.  CC
14461149recni 10052 . . . . . . . . . . . . . . . . . . . . 21  |-  if ( ( X  mod  T
)  <  pi , 
1 ,  -u 1
)  e.  CC
14471284, 1446eqeltri 2697 . . . . . . . . . . . . . . . . . . . 20  |-  ( F `
 X )  e.  CC
14481445, 1447addcli 10044 . . . . . . . . . . . . . . . . . . 19  |-  ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  +  ( F `
 X ) )  e.  CC
14491448, 1439, 1440divcli 10767 . . . . . . . . . . . . . . . . . 18  |-  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X ) )  /  2 )  e.  CC
14501449subid1i 10353 . . . . . . . . . . . . . . . . 17  |-  ( ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X
) )  /  2
)  -  0 )  =  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  +  ( F `
 X ) )  /  2 )
14511443, 1450eqtri 2644 . . . . . . . . . . . . . . . 16  |-  ( ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X
) )  /  2
)  -  ( ( ( n  e.  NN0  |->  0 ) `  0
)  /  2 ) )  =  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X ) )  /  2 )
14521433, 1451breqtri 4678 . . . . . . . . . . . . . . 15  |-  seq 1
(  +  ,  ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) )  ~~>  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X ) )  /  2 )
14531452a1i 11 . . . . . . . . . . . . . 14  |-  ( T. 
->  seq 1 (  +  ,  ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) )  ~~>  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  +  ( F `
 X ) )  /  2 ) )
145479, 103, 1453sumnnodd 39862 . . . . . . . . . . . . 13  |-  ( T. 
->  (  seq 1
(  +  ,  ( k  e.  NN  |->  ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  ( ( 2  x.  k )  -  1 ) ) ) )  ~~>  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X ) )  /  2 )  /\  sum_ k  e.  NN  ( ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) `
 k )  = 
sum_ k  e.  NN  ( ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) `
 ( ( 2  x.  k )  - 
1 ) ) ) )
14551454trud 1493 . . . . . . . . . . . 12  |-  (  seq 1 (  +  , 
( k  e.  NN  |->  ( ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) `
 ( ( 2  x.  k )  - 
1 ) ) ) )  ~~>  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  +  ( F `
 X ) )  /  2 )  /\  sum_ k  e.  NN  (
( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  k )  =  sum_ k  e.  NN  ( ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) `
 ( ( 2  x.  k )  - 
1 ) ) )
14561455simpli 474 . . . . . . . . . . 11  |-  seq 1
(  +  ,  ( k  e.  NN  |->  ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  ( ( 2  x.  k )  -  1 ) ) ) )  ~~>  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X ) )  /  2 )
1457 breq2 4657 . . . . . . . . . . . . . . . . . 18  |-  ( n  =  ( ( 2  x.  k )  - 
1 )  ->  (
2  ||  n  <->  2  ||  ( ( 2  x.  k )  -  1 ) ) )
1458 oveq1 6657 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  =  ( ( 2  x.  k )  - 
1 )  ->  (
n  x.  pi )  =  ( ( ( 2  x.  k )  -  1 )  x.  pi ) )
14591458oveq2d 6666 . . . . . . . . . . . . . . . . . . 19  |-  ( n  =  ( ( 2  x.  k )  - 
1 )  ->  (
4  /  ( n  x.  pi ) )  =  ( 4  / 
( ( ( 2  x.  k )  - 
1 )  x.  pi ) ) )
1460 oveq1 6657 . . . . . . . . . . . . . . . . . . . 20  |-  ( n  =  ( ( 2  x.  k )  - 
1 )  ->  (
n  x.  X )  =  ( ( ( 2  x.  k )  -  1 )  x.  X ) )
14611460fveq2d 6195 . . . . . . . . . . . . . . . . . . 19  |-  ( n  =  ( ( 2  x.  k )  - 
1 )  ->  ( sin `  ( n  x.  X ) )  =  ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) ) )
14621459, 1461oveq12d 6668 . . . . . . . . . . . . . . . . . 18  |-  ( n  =  ( ( 2  x.  k )  - 
1 )  ->  (
( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) )  =  ( ( 4  / 
( ( ( 2  x.  k )  - 
1 )  x.  pi ) )  x.  ( sin `  ( ( ( 2  x.  k )  -  1 )  x.  X ) ) ) )
14631457, 1462ifbieq2d 4111 . . . . . . . . . . . . . . . . 17  |-  ( n  =  ( ( 2  x.  k )  - 
1 )  ->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) )  =  if ( 2 
||  ( ( 2  x.  k )  - 
1 ) ,  0 ,  ( ( 4  /  ( ( ( 2  x.  k )  -  1 )  x.  pi ) )  x.  ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) ) ) ) )
14641463adantl 482 . . . . . . . . . . . . . . . 16  |-  ( ( k  e.  NN  /\  n  =  ( (
2  x.  k )  -  1 ) )  ->  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) )  =  if ( 2  ||  ( ( 2  x.  k )  -  1 ) ,  0 ,  ( ( 4  / 
( ( ( 2  x.  k )  - 
1 )  x.  pi ) )  x.  ( sin `  ( ( ( 2  x.  k )  -  1 )  x.  X ) ) ) ) )
1465 elnnz 11387 . . . . . . . . . . . . . . . . 17  |-  ( ( ( 2  x.  k
)  -  1 )  e.  NN  <->  ( (
( 2  x.  k
)  -  1 )  e.  ZZ  /\  0  <  ( ( 2  x.  k )  -  1 ) ) )
146620, 48, 1465sylanbrc 698 . . . . . . . . . . . . . . . 16  |-  ( k  e.  NN  ->  (
( 2  x.  k
)  -  1 )  e.  NN )
1467 ovex 6678 . . . . . . . . . . . . . . . . . 18  |-  ( ( 4  /  ( ( ( 2  x.  k
)  -  1 )  x.  pi ) )  x.  ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) ) )  e.  _V
146889, 1467ifex 4156 . . . . . . . . . . . . . . . . 17  |-  if ( 2  ||  ( ( 2  x.  k )  -  1 ) ,  0 ,  ( ( 4  /  ( ( ( 2  x.  k
)  -  1 )  x.  pi ) )  x.  ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) ) ) )  e. 
_V
14691468a1i 11 . . . . . . . . . . . . . . . 16  |-  ( k  e.  NN  ->  if ( 2  ||  (
( 2  x.  k
)  -  1 ) ,  0 ,  ( ( 4  /  (
( ( 2  x.  k )  -  1 )  x.  pi ) )  x.  ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) ) ) )  e.  _V )
147080, 1464, 1466, 1469fvmptd 6288 . . . . . . . . . . . . . . 15  |-  ( k  e.  NN  ->  (
( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  ( ( 2  x.  k )  -  1 ) )  =  if ( 2 
||  ( ( 2  x.  k )  - 
1 ) ,  0 ,  ( ( 4  /  ( ( ( 2  x.  k )  -  1 )  x.  pi ) )  x.  ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) ) ) ) )
1471 dvdsmul1 15003 . . . . . . . . . . . . . . . . . . 19  |-  ( ( 2  e.  ZZ  /\  k  e.  ZZ )  ->  2  ||  ( 2  x.  k ) )
147215, 17, 1471sylancr 695 . . . . . . . . . . . . . . . . . 18  |-  ( k  e.  NN  ->  2  ||  ( 2  x.  k
) )
147318zcnd 11483 . . . . . . . . . . . . . . . . . . . 20  |-  ( k  e.  NN  ->  (
2  x.  k )  e.  CC )
1474 1cnd 10056 . . . . . . . . . . . . . . . . . . . 20  |-  ( k  e.  NN  ->  1  e.  CC )
14751473, 1474npcand 10396 . . . . . . . . . . . . . . . . . . 19  |-  ( k  e.  NN  ->  (
( ( 2  x.  k )  -  1 )  +  1 )  =  ( 2  x.  k ) )
14761475eqcomd 2628 . . . . . . . . . . . . . . . . . 18  |-  ( k  e.  NN  ->  (
2  x.  k )  =  ( ( ( 2  x.  k )  -  1 )  +  1 ) )
14771472, 1476breqtrd 4679 . . . . . . . . . . . . . . . . 17  |-  ( k  e.  NN  ->  2  ||  ( ( ( 2  x.  k )  - 
1 )  +  1 ) )
1478 oddp1even 15068 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( 2  x.  k
)  -  1 )  e.  ZZ  ->  ( -.  2  ||  ( ( 2  x.  k )  -  1 )  <->  2  ||  ( ( ( 2  x.  k )  - 
1 )  +  1 ) ) )
147920, 1478syl 17 . . . . . . . . . . . . . . . . 17  |-  ( k  e.  NN  ->  ( -.  2  ||  ( ( 2  x.  k )  -  1 )  <->  2  ||  ( ( ( 2  x.  k )  - 
1 )  +  1 ) ) )
14801477, 1479mpbird 247 . . . . . . . . . . . . . . . 16  |-  ( k  e.  NN  ->  -.  2  ||  ( ( 2  x.  k )  - 
1 ) )
14811480iffalsed 4097 . . . . . . . . . . . . . . 15  |-  ( k  e.  NN  ->  if ( 2  ||  (
( 2  x.  k
)  -  1 ) ,  0 ,  ( ( 4  /  (
( ( 2  x.  k )  -  1 )  x.  pi ) )  x.  ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) ) ) )  =  ( ( 4  /  ( ( ( 2  x.  k )  -  1 )  x.  pi ) )  x.  ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) ) ) )
148252a1i 11 . . . . . . . . . . . . . . . . . . . 20  |-  ( k  e.  NN  ->  pi  e.  CC )
148321, 1482mulcomd 10061 . . . . . . . . . . . . . . . . . . 19  |-  ( k  e.  NN  ->  (
( ( 2  x.  k )  -  1 )  x.  pi )  =  ( pi  x.  ( ( 2  x.  k )  -  1 ) ) )
14841483oveq2d 6666 . . . . . . . . . . . . . . . . . 18  |-  ( k  e.  NN  ->  (
4  /  ( ( ( 2  x.  k
)  -  1 )  x.  pi ) )  =  ( 4  / 
( pi  x.  (
( 2  x.  k
)  -  1 ) ) ) )
148554a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( k  e.  NN  ->  4  e.  CC )
148669a1i 11 . . . . . . . . . . . . . . . . . . 19  |-  ( k  e.  NN  ->  pi  =/=  0 )
14871485, 1482, 21, 1486, 49divdiv1d 10832 . . . . . . . . . . . . . . . . . 18  |-  ( k  e.  NN  ->  (
( 4  /  pi )  /  ( ( 2  x.  k )  - 
1 ) )  =  ( 4  /  (
pi  x.  ( (
2  x.  k )  -  1 ) ) ) )
14881484, 1487eqtr4d 2659 . . . . . . . . . . . . . . . . 17  |-  ( k  e.  NN  ->  (
4  /  ( ( ( 2  x.  k
)  -  1 )  x.  pi ) )  =  ( ( 4  /  pi )  / 
( ( 2  x.  k )  -  1 ) ) )
14891488oveq1d 6665 . . . . . . . . . . . . . . . 16  |-  ( k  e.  NN  ->  (
( 4  /  (
( ( 2  x.  k )  -  1 )  x.  pi ) )  x.  ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) ) )  =  ( ( ( 4  /  pi )  / 
( ( 2  x.  k )  -  1 ) )  x.  ( sin `  ( ( ( 2  x.  k )  -  1 )  x.  X ) ) ) )
14901485, 1482, 1486divcld 10801 . . . . . . . . . . . . . . . . 17  |-  ( k  e.  NN  ->  (
4  /  pi )  e.  CC )
14911490, 21, 26, 49div32d 10824 . . . . . . . . . . . . . . . 16  |-  ( k  e.  NN  ->  (
( ( 4  /  pi )  /  (
( 2  x.  k
)  -  1 ) )  x.  ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) ) )  =  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) ) )
14921489, 1491eqtrd 2656 . . . . . . . . . . . . . . 15  |-  ( k  e.  NN  ->  (
( 4  /  (
( ( 2  x.  k )  -  1 )  x.  pi ) )  x.  ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) ) )  =  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) ) )
14931470, 1481, 14923eqtrd 2660 . . . . . . . . . . . . . 14  |-  ( k  e.  NN  ->  (
( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  ( ( 2  x.  k )  -  1 ) )  =  ( ( 4  /  pi )  x.  ( ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) ) )
14941493mpteq2ia 4740 . . . . . . . . . . . . 13  |-  ( k  e.  NN  |->  ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  ( ( 2  x.  k )  -  1 ) ) )  =  ( k  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) ) )
1495 oveq2 6658 . . . . . . . . . . . . . . . . . . 19  |-  ( k  =  n  ->  (
2  x.  k )  =  ( 2  x.  n ) )
14961495oveq1d 6665 . . . . . . . . . . . . . . . . . 18  |-  ( k  =  n  ->  (
( 2  x.  k
)  -  1 )  =  ( ( 2  x.  n )  - 
1 ) )
14971496oveq1d 6665 . . . . . . . . . . . . . . . . 17  |-  ( k  =  n  ->  (
( ( 2  x.  k )  -  1 )  x.  X )  =  ( ( ( 2  x.  n )  -  1 )  x.  X ) )
14981497fveq2d 6195 . . . . . . . . . . . . . . . 16  |-  ( k  =  n  ->  ( sin `  ( ( ( 2  x.  k )  -  1 )  x.  X ) )  =  ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) ) )
14991498, 1496oveq12d 6668 . . . . . . . . . . . . . . 15  |-  ( k  =  n  ->  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) )  =  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) )
15001499oveq2d 6666 . . . . . . . . . . . . . 14  |-  ( k  =  n  ->  (
( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  k )  -  1 )  x.  X ) )  / 
( ( 2  x.  k )  -  1 ) ) )  =  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )
15011500cbvmptv 4750 . . . . . . . . . . . . 13  |-  ( k  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) ) )  =  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )
15021494, 1501eqtri 2644 . . . . . . . . . . . 12  |-  ( k  e.  NN  |->  ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  ( ( 2  x.  k )  -  1 ) ) )  =  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) ) )
1503 seqeq3 12806 . . . . . . . . . . . 12  |-  ( ( k  e.  NN  |->  ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  ( ( 2  x.  k )  -  1 ) ) )  =  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) ) )  ->  seq 1 (  +  , 
( k  e.  NN  |->  ( ( n  e.  NN  |->  if ( 2 
||  n ,  0 ,  ( ( 4  /  ( n  x.  pi ) )  x.  ( sin `  (
n  x.  X ) ) ) ) ) `
 ( ( 2  x.  k )  - 
1 ) ) ) )  =  seq 1
(  +  ,  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  -  1 )  x.  X ) )  / 
( ( 2  x.  n )  -  1 ) ) ) ) ) )
15041502, 1503ax-mp 5 . . . . . . . . . . 11  |-  seq 1
(  +  ,  ( k  e.  NN  |->  ( ( n  e.  NN  |->  if ( 2  ||  n ,  0 ,  ( ( 4  /  (
n  x.  pi ) )  x.  ( sin `  ( n  x.  X
) ) ) ) ) `  ( ( 2  x.  k )  -  1 ) ) ) )  =  seq 1 (  +  , 
( n  e.  NN  |->  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) )
1505 fouriersw.y . . . . . . . . . . . . 13  |-  Y  =  if ( ( X  mod  pi )  =  0 ,  0 ,  ( F `  X
) )
1506110, 104, 22, 1505fourierswlem 40447 . . . . . . . . . . . 12  |-  Y  =  ( ( if ( ( X  mod  T
)  e.  ( 0 (,] pi ) ,  1 ,  -u 1
)  +  ( F `
 X ) )  /  2 )
15071506eqcomi 2631 . . . . . . . . . . 11  |-  ( ( if ( ( X  mod  T )  e.  ( 0 (,] pi ) ,  1 ,  -u 1 )  +  ( F `  X ) )  /  2 )  =  Y
15081456, 1504, 15073brtr3i 4682 . . . . . . . . . 10  |-  seq 1
(  +  ,  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  -  1 )  x.  X ) )  / 
( ( 2  x.  n )  -  1 ) ) ) ) )  ~~>  Y
15091508a1i 11 . . . . . . . . 9  |-  ( T. 
->  seq 1 (  +  ,  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) )  ~~>  Y )
1510 eqid 2622 . . . . . . . . . . . 12  |-  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) ) )  =  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )
151161, 65, 70divcld 10801 . . . . . . . . . . . . 13  |-  ( n  e.  NN  ->  (
4  /  pi )  e.  CC )
15121439a1i 11 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN  ->  2  e.  CC )
15131512, 62mulcld 10060 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  ->  (
2  x.  n )  e.  CC )
1514 id 22 . . . . . . . . . . . . . . . . . 18  |-  ( ( 2  x.  n )  e.  CC  ->  (
2  x.  n )  e.  CC )
1515 1cnd 10056 . . . . . . . . . . . . . . . . . 18  |-  ( ( 2  x.  n )  e.  CC  ->  1  e.  CC )
15161514, 1515subcld 10392 . . . . . . . . . . . . . . . . 17  |-  ( ( 2  x.  n )  e.  CC  ->  (
( 2  x.  n
)  -  1 )  e.  CC )
15171513, 1516syl 17 . . . . . . . . . . . . . . . 16  |-  ( n  e.  NN  ->  (
( 2  x.  n
)  -  1 )  e.  CC )
15181517, 73mulcld 10060 . . . . . . . . . . . . . . 15  |-  ( n  e.  NN  ->  (
( ( 2  x.  n )  -  1 )  x.  X )  e.  CC )
15191518sincld 14860 . . . . . . . . . . . . . 14  |-  ( n  e.  NN  ->  ( sin `  ( ( ( 2  x.  n )  -  1 )  x.  X ) )  e.  CC )
152028a1i 11 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  ->  2  e.  RR )
1521 nnre 11027 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  ->  n  e.  RR )
15221520, 1521remulcld 10070 . . . . . . . . . . . . . . . 16  |-  ( n  e.  NN  ->  (
2  x.  n )  e.  RR )
15231522recnd 10068 . . . . . . . . . . . . . . 15  |-  ( n  e.  NN  ->  (
2  x.  n )  e.  CC )
1524 1cnd 10056 . . . . . . . . . . . . . . 15  |-  ( n  e.  NN  ->  1  e.  CC )
15251523, 1524subcld 10392 . . . . . . . . . . . . . 14  |-  ( n  e.  NN  ->  (
( 2  x.  n
)  -  1 )  e.  CC )
1526 1red 10055 . . . . . . . . . . . . . . . 16  |-  ( n  e.  NN  ->  1  e.  RR )
152735, 1520syl5eqel 2705 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  ->  (
2  x.  1 )  e.  RR )
1528 1lt2 11194 . . . . . . . . . . . . . . . . . . 19  |-  1  <  2
15291528a1i 11 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN  ->  1  <  2 )
15301529, 35syl6breqr 4695 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  ->  1  <  ( 2  x.  1 ) )
153143a1i 11 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN  ->  0  <_  2 )
1532 nnge1 11046 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  NN  ->  1  <_  n )
15331526, 1521, 1520, 1531, 1532lemul2ad 10964 . . . . . . . . . . . . . . . . 17  |-  ( n  e.  NN  ->  (
2  x.  1 )  <_  ( 2  x.  n ) )
15341526, 1527, 1522, 1530, 1533ltletrd 10197 . . . . . . . . . . . . . . . 16  |-  ( n  e.  NN  ->  1  <  ( 2  x.  n
) )
15351526, 1534gtned 10172 . . . . . . . . . . . . . . 15  |-  ( n  e.  NN  ->  (
2  x.  n )  =/=  1 )
15361523, 1524, 1535subne0d 10401 . . . . . . . . . . . . . 14  |-  ( n  e.  NN  ->  (
( 2  x.  n
)  -  1 )  =/=  0 )
15371519, 1525, 1536divcld 10801 . . . . . . . . . . . . 13  |-  ( n  e.  NN  ->  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) )  e.  CC )
15381511, 1537mulcld 10060 . . . . . . . . . . . 12  |-  ( n  e.  NN  ->  (
( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  -  1 )  x.  X ) )  / 
( ( 2  x.  n )  -  1 ) ) )  e.  CC )
15391510, 1538fmpti 6383 . . . . . . . . . . 11  |-  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) ) ) : NN --> CC
15401539a1i 11 . . . . . . . . . 10  |-  ( T. 
->  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) : NN --> CC )
15411540ffvelrnda 6359 . . . . . . . . 9  |-  ( ( T.  /\  k  e.  NN )  ->  (
( n  e.  NN  |->  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) `  k
)  e.  CC )
1542 divcan6 10732 . . . . . . . . . . . . . . 15  |-  ( ( ( pi  e.  CC  /\  pi  =/=  0 )  /\  ( 4  e.  CC  /\  4  =/=  0 ) )  -> 
( ( pi  / 
4 )  x.  (
4  /  pi ) )  =  1 )
154352, 69, 54, 56, 1542mp4an 709 . . . . . . . . . . . . . 14  |-  ( ( pi  /  4 )  x.  ( 4  /  pi ) )  =  1
15441543eqcomi 2631 . . . . . . . . . . . . 13  |-  1  =  ( ( pi 
/  4 )  x.  ( 4  /  pi ) )
15451544oveq1i 6660 . . . . . . . . . . . 12  |-  ( 1  x.  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )  =  ( ( ( pi  / 
4 )  x.  (
4  /  pi ) )  x.  ( ( sin `  ( ( ( 2  x.  k
)  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  - 
1 ) ) )
154650mulid2d 10058 . . . . . . . . . . . 12  |-  ( k  e.  NN  ->  (
1  x.  ( ( sin `  ( ( ( 2  x.  k
)  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  - 
1 ) ) )  =  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )
154756a1i 11 . . . . . . . . . . . . . 14  |-  ( k  e.  NN  ->  4  =/=  0 )
15481482, 1485, 1547divcld 10801 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  (
pi  /  4 )  e.  CC )
15491548, 1490, 50mulassd 10063 . . . . . . . . . . . 12  |-  ( k  e.  NN  ->  (
( ( pi  / 
4 )  x.  (
4  /  pi ) )  x.  ( ( sin `  ( ( ( 2  x.  k
)  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  - 
1 ) ) )  =  ( ( pi 
/  4 )  x.  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) ) ) )
15501545, 1546, 15493eqtr3a 2680 . . . . . . . . . . 11  |-  ( k  e.  NN  ->  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) )  =  ( ( pi 
/  4 )  x.  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) ) ) )
1551 eqidd 2623 . . . . . . . . . . . . . 14  |-  ( k  e.  NN  ->  (
n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  -  1 )  x.  X ) )  / 
( ( 2  x.  n )  -  1 ) ) ) )  =  ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) )
15528oveq2d 6666 . . . . . . . . . . . . . . 15  |-  ( n  =  k  ->  (
( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  -  1 )  x.  X ) )  / 
( ( 2  x.  n )  -  1 ) ) )  =  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) ) )
15531552adantl 482 . . . . . . . . . . . . . 14  |-  ( ( k  e.  NN  /\  n  =  k )  ->  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) )  =  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) ) )
15541492, 1467syl6eqelr 2710 . . . . . . . . . . . . . 14  |-  ( k  e.  NN  ->  (
( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  k )  -  1 )  x.  X ) )  / 
( ( 2  x.  k )  -  1 ) ) )  e. 
_V )
15551551, 1553, 10, 1554fvmptd 6288 . . . . . . . . . . . . 13  |-  ( k  e.  NN  ->  (
( n  e.  NN  |->  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) `  k
)  =  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) ) )
15561555oveq2d 6666 . . . . . . . . . . . 12  |-  ( k  e.  NN  ->  (
( pi  /  4
)  x.  ( ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  n )  -  1 )  x.  X ) )  / 
( ( 2  x.  n )  -  1 ) ) ) ) `
 k ) )  =  ( ( pi 
/  4 )  x.  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) ) ) )
15571556eqcomd 2628 . . . . . . . . . . 11  |-  ( k  e.  NN  ->  (
( pi  /  4
)  x.  ( ( 4  /  pi )  x.  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) ) )  =  ( ( pi  / 
4 )  x.  (
( n  e.  NN  |->  ( ( 4  /  pi )  x.  (
( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) `  k
) ) )
155813, 1550, 15573eqtrd 2660 . . . . . . . . . 10  |-  ( k  e.  NN  ->  (
( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) `  k )  =  ( ( pi 
/  4 )  x.  ( ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) `  k
) ) )
15591558adantl 482 . . . . . . . . 9  |-  ( ( T.  /\  k  e.  NN )  ->  (
( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) `  k )  =  ( ( pi 
/  4 )  x.  ( ( n  e.  NN  |->  ( ( 4  /  pi )  x.  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) `  k
) ) )
15601, 2, 58, 1509, 1541, 1559isermulc2 14388 . . . . . . . 8  |-  ( T. 
->  seq 1 (  +  ,  ( n  e.  NN  |->  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) ) )  ~~>  ( ( pi  /  4 )  x.  Y ) )
1561 climrel 14223 . . . . . . . . 9  |-  Rel  ~~>
15621561releldmi 5362 . . . . . . . 8  |-  (  seq 1 (  +  , 
( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )  ~~>  ( ( pi  /  4 )  x.  Y )  ->  seq 1 (  +  , 
( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )  e.  dom  ~~>  )
15631560, 1562syl 17 . . . . . . 7  |-  ( T. 
->  seq 1 (  +  ,  ( n  e.  NN  |->  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) ) )  e. 
dom 
~~>  )
15641, 2, 14, 51, 1563isumclim2 14489 . . . . . 6  |-  ( T. 
->  seq 1 (  +  ,  ( n  e.  NN  |->  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) ) )  ~~>  sum_ k  e.  NN  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )
15651564trud 1493 . . . . 5  |-  seq 1
(  +  ,  ( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )  ~~>  sum_ k  e.  NN  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) )
15661560trud 1493 . . . . 5  |-  seq 1
(  +  ,  ( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )  ~~>  ( ( pi  /  4 )  x.  Y )
1567 climuni 14283 . . . . 5  |-  ( (  seq 1 (  +  ,  ( n  e.  NN  |->  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) ) )  ~~>  sum_ k  e.  NN  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) )  /\  seq 1
(  +  ,  ( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )  ~~>  ( ( pi  /  4 )  x.  Y ) )  ->  sum_ k  e.  NN  ( ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) )  =  ( ( pi 
/  4 )  x.  Y ) )
15681565, 1566, 1567mp2an 708 . . . 4  |-  sum_ k  e.  NN  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) )  =  ( ( pi  /  4 )  x.  Y )
15691568oveq2i 6661 . . 3  |-  ( ( 4  /  pi )  x.  sum_ k  e.  NN  ( ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) )  =  ( ( 4  /  pi )  x.  ( ( pi 
/  4 )  x.  Y ) )
157054, 52, 69divcli 10767 . . . 4  |-  ( 4  /  pi )  e.  CC
157152, 54, 56divcli 10767 . . . 4  |-  ( pi 
/  4 )  e.  CC
15721284, 1149eqeltri 2697 . . . . . . 7  |-  ( F `
 X )  e.  RR
157367, 1572keepel 4155 . . . . . 6  |-  if ( ( X  mod  pi )  =  0 , 
0 ,  ( F `
 X ) )  e.  RR
15741505, 1573eqeltri 2697 . . . . 5  |-  Y  e.  RR
15751574recni 10052 . . . 4  |-  Y  e.  CC
15761570, 1571, 1575mulassi 10049 . . 3  |-  ( ( ( 4  /  pi )  x.  ( pi  /  4 ) )  x.  Y )  =  ( ( 4  /  pi )  x.  ( (
pi  /  4 )  x.  Y ) )
15771571, 1570, 1543mulcomli 10047 . . . . 5  |-  ( ( 4  /  pi )  x.  ( pi  / 
4 ) )  =  1
15781577oveq1i 6660 . . . 4  |-  ( ( ( 4  /  pi )  x.  ( pi  /  4 ) )  x.  Y )  =  ( 1  x.  Y )
15791575mulid2i 10043 . . . 4  |-  ( 1  x.  Y )  =  Y
15801578, 1579eqtri 2644 . . 3  |-  ( ( ( 4  /  pi )  x.  ( pi  /  4 ) )  x.  Y )  =  Y
15811569, 1576, 15803eqtr2i 2650 . 2  |-  ( ( 4  /  pi )  x.  sum_ k  e.  NN  ( ( sin `  (
( ( 2  x.  k )  -  1 )  x.  X ) )  /  ( ( 2  x.  k )  -  1 ) ) )  =  Y
1582 fouriersw.z . . . 4  |-  S  =  ( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) )
1583 seqeq3 12806 . . . 4  |-  ( S  =  ( n  e.  NN  |->  ( ( sin `  ( ( ( 2  x.  n )  - 
1 )  x.  X
) )  /  (
( 2  x.  n
)  -  1 ) ) )  ->  seq 1 (  +  ,  S )  =  seq 1 (  +  , 
( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) ) )
15841582, 1583ax-mp 5 . . 3  |-  seq 1
(  +  ,  S
)  =  seq 1
(  +  ,  ( n  e.  NN  |->  ( ( sin `  (
( ( 2  x.  n )  -  1 )  x.  X ) )  /  ( ( 2  x.  n )  -  1 ) ) ) )
15851584, 1566eqbrtri 4674 . 2  |-  seq 1
(  +  ,  S
)  ~~>  ( ( pi 
/  4 )  x.  Y )
15861581, 1585pm3.2i 471 1  |-  ( ( ( 4  /  pi )  x.  sum_ k  e.  NN  ( ( sin `  ( ( ( 2  x.  k )  - 
1 )  x.  X
) )  /  (
( 2  x.  k
)  -  1 ) ) )  =  Y  /\  seq 1 (  +  ,  S )  ~~>  ( ( pi  / 
4 )  x.  Y
) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 196    \/ wo 383    /\ wa 384    /\ w3a 1037    = wceq 1483   T. wtru 1484    e. wcel 1990    =/= wne 2794   _Vcvv 3200    \ cdif 3571    u. cun 3572    i^i cin 3573    C_ wss 3574   (/)c0 3915   ifcif 4086   {csn 4177   {cpr 4179   U.cuni 4436   class class class wbr 4653    |-> cmpt 4729   dom cdm 5114   ran crn 5115    |` cres 5116   -->wf 5884   ` cfv 5888  (class class class)co 6650   Fincfn 7955   CCcc 9934   RRcr 9935   0cc0 9936   1c1 9937    + caddc 9939    x. cmul 9941   +oocpnf 10071   -oocmnf 10072   RR*cxr 10073    < clt 10074    <_ cle 10075    - cmin 10266   -ucneg 10267    / cdiv 10684   NNcn 11020   2c2 11070   4c4 11072   NN0cn0 11292   ZZcz 11377   RR+crp 11832   (,)cioo 12175   (,]cioc 12176   [,)cico 12177    mod cmo 12668    seqcseq 12801    ~~> cli 14215   sum_csu 14416   sincsin 14794   cosccos 14795   picpi 14797    || cdvds 14983   ↾t crest 16081   TopOpenctopn 16082   topGenctg 16098  ℂfldccnfld 19746   Topctop 20698   intcnt 20821   limPtclp 20938    CnP ccnp 21029   -cn->ccncf 22679   S.citg 23387   lim CC climc 23626    _D cdv 23627
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-inf2 8538  ax-cc 9257  ax-cnex 9992  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013  ax-pre-sup 10014  ax-addf 10015  ax-mulf 10016
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-iin 4523  df-disj 4621  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-of 6897  df-ofr 6898  df-om 7066  df-1st 7168  df-2nd 7169  df-supp 7296  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-2o 7561  df-oadd 7564  df-omul 7565  df-er 7742  df-map 7859  df-pm 7860  df-ixp 7909  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-fsupp 8276  df-fi 8317  df-sup 8348  df-inf 8349  df-oi 8415  df-card 8765  df-acn 8768  df-cda 8990  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-4 11081  df-5 11082  df-6 11083  df-7 11084  df-8 11085  df-9 11086  df-n0 11293  df-xnn0 11364  df-z 11378  df-dec 11494  df-uz 11688  df-q 11789  df-rp 11833  df-xneg 11946  df-xadd 11947  df-xmul 11948  df-ioo 12179  df-ioc 12180  df-ico 12181  df-icc 12182  df-fz 12327  df-fzo 12466  df-fl 12593  df-mod 12669  df-seq 12802  df-exp 12861  df-fac 13061  df-bc 13090  df-hash 13118  df-shft 13807  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-limsup 14202  df-clim 14219  df-rlim 14220  df-sum 14417  df-ef 14798  df-sin 14800  df-cos 14801  df-pi 14803  df-dvds 14984  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-t1 21118  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: (None)
  Copyright terms: Public domain W3C validator