Users' Mathboxes Mathbox for Brendan Leahy < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ftc1anclem7 Structured version   Unicode version

Theorem ftc1anclem7 30064
Description: Lemma for ftc1anc 30066. (Contributed by Brendan Leahy, 13-May-2018.)
Hypotheses
Ref Expression
ftc1anc.g  |-  G  =  ( x  e.  ( A [,] B ) 
|->  S. ( A (,) x ) ( F `
 t )  _d t )
ftc1anc.a  |-  ( ph  ->  A  e.  RR )
ftc1anc.b  |-  ( ph  ->  B  e.  RR )
ftc1anc.le  |-  ( ph  ->  A  <_  B )
ftc1anc.s  |-  ( ph  ->  ( A (,) B
)  C_  D )
ftc1anc.d  |-  ( ph  ->  D  C_  RR )
ftc1anc.i  |-  ( ph  ->  F  e.  L^1 )
ftc1anc.f  |-  ( ph  ->  F : D --> CC )
Assertion
Ref Expression
ftc1anclem7  |-  ( ( ( ( ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  E. r  e.  ( ran  f  u.  ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B
)  /\  w  e.  ( A [,] B )  /\  u  <_  w
) )  /\  ( abs `  ( w  -  u ) )  < 
( ( y  / 
2 )  /  (
2  x.  sup (
( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )
) ) )  -> 
( ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )  +  ( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) ) )  < 
( ( y  / 
2 )  +  ( y  /  2 ) ) )
Distinct variable groups:    f, g,
r, t, u, w, x, y, A    B, f, g, r, t, u, w, x, y    D, f, g, r, t, u, w, x, y    f, F, g, r, t, u, w, x, y    ph, f,
g, r, t, u, w, x, y    f, G, g, r, u, w, y
Allowed substitution hints:    G( x, t)

Proof of Theorem ftc1anclem7
StepHypRef Expression
1 i1ff 21949 . . . . . . . . . . 11  |-  ( f  e.  dom  S.1  ->  f : RR --> RR )
21ffvelrnda 6012 . . . . . . . . . 10  |-  ( ( f  e.  dom  S.1  /\  x  e.  RR )  ->  ( f `  x )  e.  RR )
32recnd 9620 . . . . . . . . 9  |-  ( ( f  e.  dom  S.1  /\  x  e.  RR )  ->  ( f `  x )  e.  CC )
4 ax-icn 9549 . . . . . . . . . 10  |-  _i  e.  CC
5 i1ff 21949 . . . . . . . . . . . 12  |-  ( g  e.  dom  S.1  ->  g : RR --> RR )
65ffvelrnda 6012 . . . . . . . . . . 11  |-  ( ( g  e.  dom  S.1  /\  x  e.  RR )  ->  ( g `  x )  e.  RR )
76recnd 9620 . . . . . . . . . 10  |-  ( ( g  e.  dom  S.1  /\  x  e.  RR )  ->  ( g `  x )  e.  CC )
8 mulcl 9574 . . . . . . . . . 10  |-  ( ( _i  e.  CC  /\  ( g `  x
)  e.  CC )  ->  ( _i  x.  ( g `  x
) )  e.  CC )
94, 7, 8sylancr 663 . . . . . . . . 9  |-  ( ( g  e.  dom  S.1  /\  x  e.  RR )  ->  ( _i  x.  ( g `  x
) )  e.  CC )
10 addcl 9572 . . . . . . . . 9  |-  ( ( ( f `  x
)  e.  CC  /\  ( _i  x.  (
g `  x )
)  e.  CC )  ->  ( ( f `
 x )  +  ( _i  x.  (
g `  x )
) )  e.  CC )
113, 9, 10syl2an 477 . . . . . . . 8  |-  ( ( ( f  e.  dom  S.1 
/\  x  e.  RR )  /\  ( g  e. 
dom  S.1  /\  x  e.  RR ) )  -> 
( ( f `  x )  +  ( _i  x.  ( g `
 x ) ) )  e.  CC )
1211anandirs 829 . . . . . . 7  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  x  e.  RR )  ->  (
( f `  x
)  +  ( _i  x.  ( g `  x ) ) )  e.  CC )
13 reex 9581 . . . . . . . . 9  |-  RR  e.  _V
1413a1i 11 . . . . . . . 8  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  RR  e.  _V )
152adantlr 714 . . . . . . . 8  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  x  e.  RR )  ->  (
f `  x )  e.  RR )
16 ovex 6305 . . . . . . . . 9  |-  ( _i  x.  ( g `  x ) )  e. 
_V
1716a1i 11 . . . . . . . 8  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  x  e.  RR )  ->  (
_i  x.  ( g `  x ) )  e. 
_V )
181feqmptd 5907 . . . . . . . . 9  |-  ( f  e.  dom  S.1  ->  f  =  ( x  e.  RR  |->  ( f `  x ) ) )
1918adantr 465 . . . . . . . 8  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  f  =  ( x  e.  RR  |->  ( f `  x ) ) )
2013a1i 11 . . . . . . . . . 10  |-  ( g  e.  dom  S.1  ->  RR  e.  _V )
214a1i 11 . . . . . . . . . 10  |-  ( ( g  e.  dom  S.1  /\  x  e.  RR )  ->  _i  e.  CC )
22 fconstmpt 5029 . . . . . . . . . . 11  |-  ( RR 
X.  { _i }
)  =  ( x  e.  RR  |->  _i )
2322a1i 11 . . . . . . . . . 10  |-  ( g  e.  dom  S.1  ->  ( RR  X.  { _i } )  =  ( x  e.  RR  |->  _i ) )
245feqmptd 5907 . . . . . . . . . 10  |-  ( g  e.  dom  S.1  ->  g  =  ( x  e.  RR  |->  ( g `  x ) ) )
2520, 21, 6, 23, 24offval2 6537 . . . . . . . . 9  |-  ( g  e.  dom  S.1  ->  ( ( RR  X.  {
_i } )  oF  x.  g )  =  ( x  e.  RR  |->  ( _i  x.  ( g `  x
) ) ) )
2625adantl 466 . . . . . . . 8  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( ( RR 
X.  { _i }
)  oF  x.  g )  =  ( x  e.  RR  |->  ( _i  x.  ( g `
 x ) ) ) )
2714, 15, 17, 19, 26offval2 6537 . . . . . . 7  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( f  oF  +  ( ( RR  X.  { _i } )  oF  x.  g ) )  =  ( x  e.  RR  |->  ( ( f `
 x )  +  ( _i  x.  (
g `  x )
) ) ) )
28 absf 13144 . . . . . . . . 9  |-  abs : CC
--> RR
2928a1i 11 . . . . . . . 8  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  abs : CC --> RR )
3029feqmptd 5907 . . . . . . 7  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  abs  =  (
t  e.  CC  |->  ( abs `  t ) ) )
31 fveq2 5852 . . . . . . 7  |-  ( t  =  ( ( f `
 x )  +  ( _i  x.  (
g `  x )
) )  ->  ( abs `  t )  =  ( abs `  (
( f `  x
)  +  ( _i  x.  ( g `  x ) ) ) ) )
3212, 27, 30, 31fmptco 6045 . . . . . 6  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( abs  o.  ( f  oF  +  ( ( RR 
X.  { _i }
)  oF  x.  g ) ) )  =  ( x  e.  RR  |->  ( abs `  (
( f `  x
)  +  ( _i  x.  ( g `  x ) ) ) ) ) )
33 ftc1anclem3 30060 . . . . . 6  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( abs  o.  ( f  oF  +  ( ( RR 
X.  { _i }
)  oF  x.  g ) ) )  e.  dom  S.1 )
3432, 33eqeltrrd 2530 . . . . 5  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( x  e.  RR  |->  ( abs `  (
( f `  x
)  +  ( _i  x.  ( g `  x ) ) ) ) )  e.  dom  S.1 )
35 ioombl 21841 . . . . 5  |-  ( u (,) w )  e. 
dom  vol
36 fveq2 5852 . . . . . . . . . . . 12  |-  ( x  =  t  ->  (
f `  x )  =  ( f `  t ) )
37 fveq2 5852 . . . . . . . . . . . . 13  |-  ( x  =  t  ->  (
g `  x )  =  ( g `  t ) )
3837oveq2d 6293 . . . . . . . . . . . 12  |-  ( x  =  t  ->  (
_i  x.  ( g `  x ) )  =  ( _i  x.  (
g `  t )
) )
3936, 38oveq12d 6295 . . . . . . . . . . 11  |-  ( x  =  t  ->  (
( f `  x
)  +  ( _i  x.  ( g `  x ) ) )  =  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) )
4039fveq2d 5856 . . . . . . . . . 10  |-  ( x  =  t  ->  ( abs `  ( ( f `
 x )  +  ( _i  x.  (
g `  x )
) ) )  =  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )
41 eqid 2441 . . . . . . . . . 10  |-  ( x  e.  RR  |->  ( abs `  ( ( f `  x )  +  ( _i  x.  ( g `
 x ) ) ) ) )  =  ( x  e.  RR  |->  ( abs `  ( ( f `  x )  +  ( _i  x.  ( g `  x
) ) ) ) )
42 fvex 5862 . . . . . . . . . 10  |-  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) )  e.  _V
4340, 41, 42fvmpt 5937 . . . . . . . . 9  |-  ( t  e.  RR  ->  (
( x  e.  RR  |->  ( abs `  ( ( f `  x )  +  ( _i  x.  ( g `  x
) ) ) ) ) `  t )  =  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )
4443eqcomd 2449 . . . . . . . 8  |-  ( t  e.  RR  ->  ( abs `  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) )  =  ( ( x  e.  RR  |->  ( abs `  (
( f `  x
)  +  ( _i  x.  ( g `  x ) ) ) ) ) `  t
) )
4544ifeq1d 3940 . . . . . . 7  |-  ( t  e.  RR  ->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 )  =  if ( t  e.  ( u (,) w ) ,  ( ( x  e.  RR  |->  ( abs `  ( ( f `  x )  +  ( _i  x.  ( g `  x
) ) ) ) ) `  t ) ,  0 ) )
4645mpteq2ia 4515 . . . . . 6  |-  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  =  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( ( x  e.  RR  |->  ( abs `  (
( f `  x
)  +  ( _i  x.  ( g `  x ) ) ) ) ) `  t
) ,  0 ) )
4746i1fres 21978 . . . . 5  |-  ( ( ( x  e.  RR  |->  ( abs `  ( ( f `  x )  +  ( _i  x.  ( g `  x
) ) ) ) )  e.  dom  S.1  /\  ( u (,) w
)  e.  dom  vol )  ->  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) )  e.  dom  S.1 )
4834, 35, 47sylancl 662 . . . 4  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) )  e.  dom  S.1 )
49 breq2 4437 . . . . . . 7  |-  ( ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) )  =  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 )  -> 
( 0  <_  ( abs `  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) )  <->  0  <_  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )
50 breq2 4437 . . . . . . 7  |-  ( 0  =  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 )  -> 
( 0  <_  0  <->  0  <_  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) ) )
51 elioore 11563 . . . . . . . 8  |-  ( t  e.  ( u (,) w )  ->  t  e.  RR )
52 eleq1 2513 . . . . . . . . . . . 12  |-  ( x  =  t  ->  (
x  e.  RR  <->  t  e.  RR ) )
5352anbi2d 703 . . . . . . . . . . 11  |-  ( x  =  t  ->  (
( ( f  e. 
dom  S.1  /\  g  e. 
dom  S.1 )  /\  x  e.  RR )  <->  ( (
f  e.  dom  S.1  /\  g  e.  dom  S.1 )  /\  t  e.  RR ) ) )
5439eleq1d 2510 . . . . . . . . . . 11  |-  ( x  =  t  ->  (
( ( f `  x )  +  ( _i  x.  ( g `
 x ) ) )  e.  CC  <->  ( (
f `  t )  +  ( _i  x.  ( g `  t
) ) )  e.  CC ) )
5553, 54imbi12d 320 . . . . . . . . . 10  |-  ( x  =  t  ->  (
( ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  /\  x  e.  RR )  ->  ( ( f `
 x )  +  ( _i  x.  (
g `  x )
) )  e.  CC ) 
<->  ( ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  /\  t  e.  RR )  ->  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) )  e.  CC ) ) )
5655, 12chvarv 1998 . . . . . . . . 9  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  t  e.  RR )  ->  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) )  e.  CC )
5756absge0d 13249 . . . . . . . 8  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  t  e.  RR )  ->  0  <_  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )
5851, 57sylan2 474 . . . . . . 7  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  t  e.  ( u (,) w
) )  ->  0  <_  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )
59 0le0 10626 . . . . . . . 8  |-  0  <_  0
6059a1i 11 . . . . . . 7  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  -.  t  e.  ( u (,) w
) )  ->  0  <_  0 )
6149, 50, 58, 60ifbothda 3957 . . . . . 6  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  0  <_  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )
6261ralrimivw 2856 . . . . 5  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  A. t  e.  RR  0  <_  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) )
63 ax-resscn 9547 . . . . . . . 8  |-  RR  C_  CC
6463a1i 11 . . . . . . 7  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  RR  C_  CC )
65 c0ex 9588 . . . . . . . . . 10  |-  0  e.  _V
6642, 65ifex 3991 . . . . . . . . 9  |-  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 )  e.  _V
67 eqid 2441 . . . . . . . . 9  |-  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  =  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )
6866, 67fnmpti 5695 . . . . . . . 8  |-  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  Fn  RR
6968a1i 11 . . . . . . 7  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) )  Fn  RR )
7064, 690pledm 21946 . . . . . 6  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( 0p  oR  <_  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  <->  ( RR  X.  { 0 } )  oR  <_  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) ) )
7165a1i 11 . . . . . . 7  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  t  e.  RR )  ->  0  e.  _V )
7266a1i 11 . . . . . . 7  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  t  e.  RR )  ->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 )  e.  _V )
73 fconstmpt 5029 . . . . . . . 8  |-  ( RR 
X.  { 0 } )  =  ( t  e.  RR  |->  0 )
7473a1i 11 . . . . . . 7  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( RR  X.  { 0 } )  =  ( t  e.  RR  |->  0 ) )
75 eqidd 2442 . . . . . . 7  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) )  =  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) ) )
7614, 71, 72, 74, 75ofrfval2 6538 . . . . . 6  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( ( RR 
X.  { 0 } )  oR  <_ 
( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  <->  A. t  e.  RR  0  <_  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) ) )
7770, 76bitrd 253 . . . . 5  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( 0p  oR  <_  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  <->  A. t  e.  RR  0  <_  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) ) )
7862, 77mpbird 232 . . . 4  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  0p  oR  <_  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) ) )
79 itg2itg1 22009 . . . . 5  |-  ( ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  e.  dom  S.1  /\  0p  oR  <_  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) ) )  ->  ( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )  =  ( S.1 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) ) )
80 itg1cl 21958 . . . . . 6  |-  ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  e.  dom  S.1  ->  ( S.1 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )  e.  RR )
8180adantr 465 . . . . 5  |-  ( ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  e.  dom  S.1  /\  0p  oR  <_  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) ) )  ->  ( S.1 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )  e.  RR )
8279, 81eqeltrd 2529 . . . 4  |-  ( ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) )  e.  dom  S.1  /\  0p  oR  <_  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ,  0 ) ) )  ->  ( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )  e.  RR )
8348, 78, 82syl2anc 661 . . 3  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )  e.  RR )
8483ad6antlr 736 . 2  |-  ( ( ( ( ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  E. r  e.  ( ran  f  u.  ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B
)  /\  w  e.  ( A [,] B )  /\  u  <_  w
) )  /\  ( abs `  ( w  -  u ) )  < 
( ( y  / 
2 )  /  (
2  x.  sup (
( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )
) ) )  -> 
( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )  e.  RR )
85 simplll 757 . . . . 5  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  E. r  e.  ( ran  f  u.  ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  ->  ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) ) )
86 ftc1anc.a . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  A  e.  RR )
8786rexrd 9641 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  A  e.  RR* )
88 ftc1anc.b . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  B  e.  RR )
8988rexrd 9641 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  B  e.  RR* )
9087, 89jca 532 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  ( A  e.  RR*  /\  B  e.  RR* )
)
91 df-icc 11540 . . . . . . . . . . . . . . . . . . . . . 22  |-  [,]  =  ( x  e.  RR* ,  y  e.  RR*  |->  { t  e.  RR*  |  (
x  <_  t  /\  t  <_  y ) } )
9291elixx3g 11546 . . . . . . . . . . . . . . . . . . . . 21  |-  ( u  e.  ( A [,] B )  <->  ( ( A  e.  RR*  /\  B  e.  RR*  /\  u  e. 
RR* )  /\  ( A  <_  u  /\  u  <_  B ) ) )
9392simprbi 464 . . . . . . . . . . . . . . . . . . . 20  |-  ( u  e.  ( A [,] B )  ->  ( A  <_  u  /\  u  <_  B ) )
9493simpld 459 . . . . . . . . . . . . . . . . . . 19  |-  ( u  e.  ( A [,] B )  ->  A  <_  u )
9591elixx3g 11546 . . . . . . . . . . . . . . . . . . . . 21  |-  ( w  e.  ( A [,] B )  <->  ( ( A  e.  RR*  /\  B  e.  RR*  /\  w  e. 
RR* )  /\  ( A  <_  w  /\  w  <_  B ) ) )
9695simprbi 464 . . . . . . . . . . . . . . . . . . . 20  |-  ( w  e.  ( A [,] B )  ->  ( A  <_  w  /\  w  <_  B ) )
9796simprd 463 . . . . . . . . . . . . . . . . . . 19  |-  ( w  e.  ( A [,] B )  ->  w  <_  B )
9894, 97anim12i 566 . . . . . . . . . . . . . . . . . 18  |-  ( ( u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) )  -> 
( A  <_  u  /\  w  <_  B ) )
99 ioossioo 11620 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( A  e.  RR*  /\  B  e.  RR* )  /\  ( A  <_  u  /\  w  <_  B ) )  ->  ( u (,) w )  C_  ( A (,) B ) )
10090, 98, 99syl2an 477 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  ( u  e.  ( A [,] B
)  /\  w  e.  ( A [,] B ) ) )  ->  (
u (,) w ) 
C_  ( A (,) B ) )
101 ftc1anc.s . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  ( A (,) B
)  C_  D )
102101adantr 465 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  ( u  e.  ( A [,] B
)  /\  w  e.  ( A [,] B ) ) )  ->  ( A (,) B )  C_  D )
103100, 102sstrd 3496 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  ( u  e.  ( A [,] B
)  /\  w  e.  ( A [,] B ) ) )  ->  (
u (,) w ) 
C_  D )
1041033adantr3 1156 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  ( u  e.  ( A [,] B
)  /\  w  e.  ( A [,] B )  /\  u  <_  w
) )  ->  (
u (,) w ) 
C_  D )
105104sselda 3486 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
t  e.  D )
106 ftc1anc.f . . . . . . . . . . . . . . . 16  |-  ( ph  ->  F : D --> CC )
107106ffvelrnda 6012 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  t  e.  D )  ->  ( F `  t )  e.  CC )
108107adantlr 714 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  D )  ->  ( F `  t
)  e.  CC )
109105, 108syldan 470 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
( F `  t
)  e.  CC )
110109adantllr 718 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
( F `  t
)  e.  CC )
11156adantll 713 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  RR )  ->  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) )  e.  CC )
11251, 111sylan2 474 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  ( u (,) w
) )  ->  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) )  e.  CC )
113112adantlr 714 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) )  e.  CC )
114110, 113subcld 9931 . . . . . . . . . . 11  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) )  e.  CC )
115114abscld 13241 . . . . . . . . . 10  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) )  e.  RR )
116115rexrd 9641 . . . . . . . . 9  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) )  e.  RR* )
117114absge0d 13249 . . . . . . . . 9  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
0  <_  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ) )
118 elxrge0 11633 . . . . . . . . 9  |-  ( ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  e.  ( 0 [,] +oo )  <->  ( ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )  e.  RR*  /\  0  <_  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ) ) )
119116, 117, 118sylanbrc 664 . . . . . . . 8  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  ( u (,) w ) )  -> 
( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) )  e.  ( 0 [,] +oo ) )
120 0e0iccpnf 11635 . . . . . . . . 9  |-  0  e.  ( 0 [,] +oo )
121120a1i 11 . . . . . . . 8  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  -.  t  e.  (
u (,) w ) )  ->  0  e.  ( 0 [,] +oo ) )
122119, 121ifclda 3954 . . . . . . 7  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  ->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 )  e.  ( 0 [,] +oo ) )
123122adantr 465 . . . . . 6  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  /\  t  e.  RR )  ->  if ( t  e.  ( u (,) w
) ,  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ) ,  0 )  e.  ( 0 [,] +oo ) )
124 eqid 2441 . . . . . 6  |-  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) )  =  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) )
125123, 124fmptd 6036 . . . . 5  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  -> 
( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) : RR --> ( 0 [,] +oo ) )
12685, 125sylan 471 . . . 4  |-  ( ( ( ( ( (
ph  /\  ( f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) ) ) )  <  ( y  /  2 ) )  /\  E. r  e.  ( ran  f  u. 
ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  -> 
( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) : RR --> ( 0 [,] +oo ) )
127 rpre 11230 . . . . . 6  |-  ( y  e.  RR+  ->  y  e.  RR )
128127rehalfcld 10786 . . . . 5  |-  ( y  e.  RR+  ->  ( y  /  2 )  e.  RR )
129128ad2antlr 726 . . . 4  |-  ( ( ( ( ( (
ph  /\  ( f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) ) ) )  <  ( y  /  2 ) )  /\  E. r  e.  ( ran  f  u. 
ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  -> 
( y  /  2
)  e.  RR )
130 simpll 753 . . . . . . . . 9  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  ->  ( ph  /\  ( f  e. 
dom  S.1  /\  g  e. 
dom  S.1 ) ) )
131103sselda 3486 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  ( u (,) w ) )  ->  t  e.  D )
132131adantllr 718 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  ( u (,) w ) )  ->  t  e.  D )
133107adantlr 714 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  ( F `  t )  e.  CC )
134 ftc1anc.d . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ph  ->  D  C_  RR )
135134sselda 3486 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  t  e.  D )  ->  t  e.  RR )
136135adantlr 714 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  t  e.  RR )
137136, 111syldan 470 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) )  e.  CC )
138133, 137subcld 9931 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) )  e.  CC )
139138abscld 13241 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  ( abs `  ( ( F `
 t )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) )  e.  RR )
140139rexrd 9641 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  ( abs `  ( ( F `
 t )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) )  e. 
RR* )
141140adantlr 714 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  D
)  ->  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )  e.  RR* )
142132, 141syldan 470 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  ( u (,) w ) )  ->  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )  e.  RR* )
143138absge0d 13249 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  0  <_  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
144143adantlr 714 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  D
)  ->  0  <_  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) )
145132, 144syldan 470 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  ( u (,) w ) )  ->  0  <_  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) )
146142, 145, 118sylanbrc 664 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  ( u (,) w ) )  ->  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )  e.  ( 0 [,] +oo )
)
147120a1i 11 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  -.  t  e.  ( u (,) w
) )  ->  0  e.  ( 0 [,] +oo ) )
148146, 147ifclda 3954 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 )  e.  ( 0 [,] +oo ) )
149148adantr 465 . . . . . . . . . . 11  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  RR )  ->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 )  e.  ( 0 [,] +oo ) )
150149, 124fmptd 6036 . . . . . . . . . 10  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 ) ) : RR --> ( 0 [,] +oo ) )
151 itg2cl 22005 . . . . . . . . . 10  |-  ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) : RR --> ( 0 [,] +oo )  -> 
( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  e.  RR* )
152150, 151syl 16 . . . . . . . . 9  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  e.  RR* )
153130, 152sylan 471 . . . . . . . 8  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  e.  RR* )
154 0cnd 9587 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  -.  t  e.  D )  ->  0  e.  CC )
155107, 154ifclda 3954 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  if ( t  e.  D ,  ( F `
 t ) ,  0 )  e.  CC )
156 subcl 9819 . . . . . . . . . . . . . . . 16  |-  ( ( if ( t  e.  D ,  ( F `
 t ) ,  0 )  e.  CC  /\  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) )  e.  CC )  ->  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) )  e.  CC )
157155, 56, 156syl2an 477 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  ( (
f  e.  dom  S.1  /\  g  e.  dom  S.1 )  /\  t  e.  RR ) )  ->  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) )  e.  CC )
158157anassrs 648 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  RR )  ->  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) )  e.  CC )
159158abscld 13241 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  RR )  ->  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  e.  RR )
160159rexrd 9641 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  RR )  ->  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  e.  RR* )
161158absge0d 13249 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  RR )  ->  0  <_  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
162 elxrge0 11633 . . . . . . . . . . . 12  |-  ( ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) )  e.  ( 0 [,] +oo )  <->  ( ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  e.  RR*  /\  0  <_  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )
163160, 161, 162sylanbrc 664 . . . . . . . . . . 11  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  RR )  ->  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  e.  ( 0 [,] +oo ) )
164 eqid 2441 . . . . . . . . . . 11  |-  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) ) )  =  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
165163, 164fmptd 6036 . . . . . . . . . 10  |-  ( (
ph  /\  ( f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  -> 
( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) : RR --> ( 0 [,] +oo ) )
166 itg2cl 22005 . . . . . . . . . 10  |-  ( ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) : RR --> ( 0 [,] +oo )  ->  ( S.2 `  (
t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  e. 
RR* )
167165, 166syl 16 . . . . . . . . 9  |-  ( (
ph  /\  ( f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  -> 
( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) ) ) )  e.  RR* )
168167ad3antrrr 729 . . . . . . . 8  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  e. 
RR* )
169 rphalfcl 11248 . . . . . . . . . 10  |-  ( y  e.  RR+  ->  ( y  /  2 )  e.  RR+ )
170169rpxrd 11261 . . . . . . . . 9  |-  ( y  e.  RR+  ->  ( y  /  2 )  e. 
RR* )
171170ad2antlr 726 . . . . . . . 8  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( y  / 
2 )  e.  RR* )
172165adantr 465 . . . . . . . . . 10  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) : RR --> ( 0 [,] +oo ) )
173 breq1 4436 . . . . . . . . . . . . 13  |-  ( ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  =  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 )  -> 
( ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) )  <_  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) )  <->  if (
t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 )  <_  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )
174 breq1 4436 . . . . . . . . . . . . 13  |-  ( 0  =  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 )  -> 
( 0  <_  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  <-> 
if ( t  e.  ( u (,) w
) ,  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ) ,  0 )  <_  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) ) ) )
175139leidd 10120 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  ( abs `  ( ( F `
 t )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) )  <_ 
( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
176 iftrue 3928 . . . . . . . . . . . . . . . . . . . 20  |-  ( t  e.  D  ->  if ( t  e.  D ,  ( F `  t ) ,  0 )  =  ( F `
 t ) )
177176oveq1d 6292 . . . . . . . . . . . . . . . . . . 19  |-  ( t  e.  D  ->  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) )  =  ( ( F `
 t )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) )
178177fveq2d 5856 . . . . . . . . . . . . . . . . . 18  |-  ( t  e.  D  ->  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  =  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
179178adantl 466 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) )  =  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
180175, 179breqtrrd 4459 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  t  e.  D )  ->  ( abs `  ( ( F `
 t )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) )  <_ 
( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
181180adantlr 714 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  D
)  ->  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )  <_  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) )
182132, 181syldan 470 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  ( u (,) w ) )  ->  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )  <_  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) )
183182adantlr 714 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  RR )  /\  t  e.  ( u (,) w ) )  ->  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )  <_  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) )
184161adantlr 714 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  RR )  ->  0  <_  ( abs `  ( if ( t  e.  D , 
( F `  t
) ,  0 )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) )
185184adantr 465 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  RR )  /\  -.  t  e.  ( u (,) w
) )  ->  0  <_  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
186173, 174, 183, 185ifbothda 3957 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  /\  t  e.  RR )  ->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 )  <_ 
( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
187186ralrimiva 2855 . . . . . . . . . . 11  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  A. t  e.  RR  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 )  <_  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )
18813a1i 11 . . . . . . . . . . . . 13  |-  ( ph  ->  RR  e.  _V )
189 fvex 5862 . . . . . . . . . . . . . . 15  |-  ( abs `  ( ( F `  t )  -  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) )  e.  _V
190189, 65ifex 3991 . . . . . . . . . . . . . 14  |-  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 )  e.  _V
191190a1i 11 . . . . . . . . . . . . 13  |-  ( (
ph  /\  t  e.  RR )  ->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 )  e.  _V )
192 fvex 5862 . . . . . . . . . . . . . 14  |-  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) )  e. 
_V
193192a1i 11 . . . . . . . . . . . . 13  |-  ( (
ph  /\  t  e.  RR )  ->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) )  e. 
_V )
194 eqidd 2442 . . . . . . . . . . . . 13  |-  ( ph  ->  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) )  =  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )
195 eqidd 2442 . . . . . . . . . . . . 13  |-  ( ph  ->  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )  =  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )
196188, 191, 193, 194, 195ofrfval2 6538 . . . . . . . . . . . 12  |-  ( ph  ->  ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 ) )  oR  <_  (
t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )  <->  A. t  e.  RR  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 )  <_ 
( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )
197196ad2antrr 725 . . . . . . . . . . 11  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) )  oR  <_ 
( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) )  <->  A. t  e.  RR  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 )  <_ 
( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )
198187, 197mpbird 232 . . . . . . . . . 10  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 ) )  oR  <_  (
t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )
199 itg2le 22012 . . . . . . . . . 10  |-  ( ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) : RR --> ( 0 [,] +oo )  /\  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) : RR --> ( 0 [,] +oo )  /\  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  ( ( F `  t )  -  ( ( f `
 t )  +  ( _i  x.  (
g `  t )
) ) ) ) ,  0 ) )  oR  <_  (
t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  -> 
( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) ) )
200150, 172, 198, 199syl3anc 1227 . . . . . . . . 9  |-  ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) ) )
201130, 200sylan 471 . . . . . . . 8  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) ) )
202 simpllr 758 . . . . . . . 8  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )
203153, 168, 171, 201, 202xrlelttrd 11367 . . . . . . 7  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <  (
y  /  2 ) )
204 xrltle 11359 . . . . . . . 8  |-  ( ( ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  e.  RR*  /\  ( y  /  2
)  e.  RR* )  ->  ( ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <  (
y  /  2 )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  (
y  /  2 ) ) )
205153, 171, 204syl2anc 661 . . . . . . 7  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( ( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <  (
y  /  2 )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  (
y  /  2 ) ) )
206203, 205mpd 15 . . . . . 6  |-  ( ( ( ( ( ph  /\  ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  y  e.  RR+ )  /\  (
u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  (
y  /  2 ) )
207206adantllr 718 . . . . 5  |-  ( ( ( ( ( (
ph  /\  ( f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) ) ) )  <  ( y  /  2 ) )  /\  E. r  e.  ( ran  f  u. 
ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B )  /\  w  e.  ( A [,] B ) ) )  ->  ( S.2 `  (
t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  (
y  /  2 ) )
2082073adantr3 1156 . . . 4  |-  ( ( ( ( ( (
ph  /\  ( f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) ) ) )  <  ( y  /  2 ) )  /\  E. r  e.  ( ran  f  u. 
ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  -> 
( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  (
y  /  2 ) )
209 itg2lecl 22011 . . . 4  |-  ( ( ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) : RR --> ( 0 [,] +oo )  /\  ( y  /  2
)  e.  RR  /\  ( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  <_  (
y  /  2 ) )  ->  ( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  e.  RR )
210126, 129, 208, 209syl3anc 1227 . . 3  |-  ( ( ( ( ( (
ph  /\  ( f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `
 t ) ) ) ) ) ) )  <  ( y  /  2 ) )  /\  E. r  e.  ( ran  f  u. 
ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B )  /\  w  e.  ( A [,] B )  /\  u  <_  w ) )  -> 
( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  e.  RR )
211210adantr 465 . 2  |-  ( ( ( ( ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  E. r  e.  ( ran  f  u.  ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B
)  /\  w  e.  ( A [,] B )  /\  u  <_  w
) )  /\  ( abs `  ( w  -  u ) )  < 
( ( y  / 
2 )  /  (
2  x.  sup (
( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )
) ) )  -> 
( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( F `  t
)  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ,  0 ) ) )  e.  RR )
212128ad3antlr 730 . 2  |-  ( ( ( ( ( ( ( ph  /\  (
f  e.  dom  S.1  /\  g  e.  dom  S.1 ) )  /\  ( S.2 `  ( t  e.  RR  |->  ( abs `  ( if ( t  e.  D ,  ( F `  t ) ,  0 )  -  ( ( f `  t )  +  ( _i  x.  ( g `  t
) ) ) ) ) ) )  < 
( y  /  2
) )  /\  E. r  e.  ( ran  f  u.  ran  g ) r  =/=  0 )  /\  y  e.  RR+ )  /\  ( u  e.  ( A [,] B
)  /\  w  e.  ( A [,] B )  /\  u  <_  w
) )  /\  ( abs `  ( w  -  u ) )  < 
( ( y  / 
2 )  /  (
2  x.  sup (
( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )
) ) )  -> 
( y  /  2
)  e.  RR )
21383adantr 465 . . . . . . . 8  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  E. r  e.  ( ran  f  u. 
ran  g ) r  =/=  0 )  -> 
( S.2 `  ( t  e.  RR  |->  if ( t  e.  ( u (,) w ) ,  ( abs `  (
( f `  t
)  +  ( _i  x.  ( g `  t ) ) ) ) ,  0 ) ) )  e.  RR )
214 2rp 11229 . . . . . . . . 9  |-  2  e.  RR+
215 imassrn 5334 . . . . . . . . . . . . . . . 16  |-  ( abs " ( ran  f  u.  ran  g ) ) 
C_  ran  abs
216 frn 5723 . . . . . . . . . . . . . . . . 17  |-  ( abs
: CC --> RR  ->  ran 
abs  C_  RR )
21728, 216ax-mp 5 . . . . . . . . . . . . . . . 16  |-  ran  abs  C_  RR
218215, 217sstri 3495 . . . . . . . . . . . . . . 15  |-  ( abs " ( ran  f  u.  ran  g ) ) 
C_  RR
219218a1i 11 . . . . . . . . . . . . . 14  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( abs " ( ran  f  u.  ran  g ) )  C_  RR )
220 frn 5723 . . . . . . . . . . . . . . . . . . . 20  |-  ( f : RR --> RR  ->  ran  f  C_  RR )
2211, 220syl 16 . . . . . . . . . . . . . . . . . . 19  |-  ( f  e.  dom  S.1  ->  ran  f  C_  RR )
222221adantr 465 . . . . . . . . . . . . . . . . . 18  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ran  f  C_  RR )
223 frn 5723 . . . . . . . . . . . . . . . . . . . 20  |-  ( g : RR --> RR  ->  ran  g  C_  RR )
2245, 223syl 16 . . . . . . . . . . . . . . . . . . 19  |-  ( g  e.  dom  S.1  ->  ran  g  C_  RR )
225224adantl 466 . . . . . . . . . . . . . . . . . 18  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ran  g  C_  RR )
226222, 225unssd 3662 . . . . . . . . . . . . . . . . 17  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( ran  f  u.  ran  g )  C_  RR )
227226, 63syl6ss 3498 . . . . . . . . . . . . . . . 16  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( ran  f  u.  ran  g )  C_  CC )
228 i1f0rn 21955 . . . . . . . . . . . . . . . . . 18  |-  ( f  e.  dom  S.1  ->  0  e.  ran  f )
229 elun1 3653 . . . . . . . . . . . . . . . . . 18  |-  ( 0  e.  ran  f  -> 
0  e.  ( ran  f  u.  ran  g
) )
230228, 229syl 16 . . . . . . . . . . . . . . . . 17  |-  ( f  e.  dom  S.1  ->  0  e.  ( ran  f  u.  ran  g ) )
231230adantr 465 . . . . . . . . . . . . . . . 16  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  0  e.  ( ran  f  u.  ran  g ) )
232 ffn 5717 . . . . . . . . . . . . . . . . . 18  |-  ( abs
: CC --> RR  ->  abs 
Fn  CC )
23328, 232ax-mp 5 . . . . . . . . . . . . . . . . 17  |-  abs  Fn  CC
234 fnfvima 6131 . . . . . . . . . . . . . . . . 17  |-  ( ( abs  Fn  CC  /\  ( ran  f  u.  ran  g )  C_  CC  /\  0  e.  ( ran  f  u.  ran  g
) )  ->  ( abs `  0 )  e.  ( abs " ( ran  f  u.  ran  g ) ) )
235233, 234mp3an1 1310 . . . . . . . . . . . . . . . 16  |-  ( ( ( ran  f  u. 
ran  g )  C_  CC  /\  0  e.  ( ran  f  u.  ran  g ) )  -> 
( abs `  0
)  e.  ( abs " ( ran  f  u.  ran  g ) ) )
236227, 231, 235syl2anc 661 . . . . . . . . . . . . . . 15  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( abs `  0
)  e.  ( abs " ( ran  f  u.  ran  g ) ) )
237 ne0i 3773 . . . . . . . . . . . . . . 15  |-  ( ( abs `  0 )  e.  ( abs " ( ran  f  u.  ran  g ) )  -> 
( abs " ( ran  f  u.  ran  g ) )  =/=  (/) )
238236, 237syl 16 . . . . . . . . . . . . . 14  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( abs " ( ran  f  u.  ran  g ) )  =/=  (/) )
239 ffun 5719 . . . . . . . . . . . . . . . . 17  |-  ( abs
: CC --> RR  ->  Fun 
abs )
24028, 239ax-mp 5 . . . . . . . . . . . . . . . 16  |-  Fun  abs
241 i1frn 21950 . . . . . . . . . . . . . . . . 17  |-  ( f  e.  dom  S.1  ->  ran  f  e.  Fin )
242 i1frn 21950 . . . . . . . . . . . . . . . . 17  |-  ( g  e.  dom  S.1  ->  ran  g  e.  Fin )
243 unfi 7785 . . . . . . . . . . . . . . . . 17  |-  ( ( ran  f  e.  Fin  /\ 
ran  g  e.  Fin )  ->  ( ran  f  u.  ran  g )  e. 
Fin )
244241, 242, 243syl2an 477 . . . . . . . . . . . . . . . 16  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( ran  f  u.  ran  g )  e. 
Fin )
245 imafi 7811 . . . . . . . . . . . . . . . 16  |-  ( ( Fun  abs  /\  ( ran  f  u.  ran  g )  e.  Fin )  ->  ( abs " ( ran  f  u.  ran  g ) )  e. 
Fin )
246240, 244, 245sylancr 663 . . . . . . . . . . . . . . 15  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( abs " ( ran  f  u.  ran  g ) )  e. 
Fin )
247 fimaxre2 10492 . . . . . . . . . . . . . . 15  |-  ( ( ( abs " ( ran  f  u.  ran  g ) )  C_  RR  /\  ( abs " ( ran  f  u.  ran  g ) )  e. 
Fin )  ->  E. x  e.  RR  A. y  e.  ( abs " ( ran  f  u.  ran  g ) ) y  <_  x )
248218, 246, 247sylancr 663 . . . . . . . . . . . . . 14  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  E. x  e.  RR  A. y  e.  ( abs " ( ran  f  u.  ran  g ) ) y  <_  x )
249 suprcl 10504 . . . . . . . . . . . . . 14  |-  ( ( ( abs " ( ran  f  u.  ran  g ) )  C_  RR  /\  ( abs " ( ran  f  u.  ran  g ) )  =/=  (/)  /\  E. x  e.  RR  A. y  e.  ( abs " ( ran  f  u.  ran  g ) ) y  <_  x )  ->  sup ( ( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )  e.  RR )
250219, 238, 248, 249syl3anc 1227 . . . . . . . . . . . . 13  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  sup ( ( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )  e.  RR )
251250adantr 465 . . . . . . . . . . . 12  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  ( r  e.  ( ran  f  u.  ran  g )  /\  r  =/=  0 ) )  ->  sup ( ( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )  e.  RR )
252 0red 9595 . . . . . . . . . . . . 13  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  ( r  e.  ( ran  f  u.  ran  g )  /\  r  =/=  0 ) )  ->  0  e.  RR )
253227sselda 3486 . . . . . . . . . . . . . . 15  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  r  e.  ( ran  f  u. 
ran  g ) )  ->  r  e.  CC )
254253abscld 13241 . . . . . . . . . . . . . 14  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  r  e.  ( ran  f  u. 
ran  g ) )  ->  ( abs `  r
)  e.  RR )
255254adantrr 716 . . . . . . . . . . . . 13  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  ( r  e.  ( ran  f  u.  ran  g )  /\  r  =/=  0 ) )  ->  ( abs `  r
)  e.  RR )
256 absgt0 13131 . . . . . . . . . . . . . . . 16  |-  ( r  e.  CC  ->  (
r  =/=  0  <->  0  <  ( abs `  r
) ) )
257253, 256syl 16 . . . . . . . . . . . . . . 15  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  r  e.  ( ran  f  u. 
ran  g ) )  ->  ( r  =/=  0  <->  0  <  ( abs `  r ) ) )
258257biimpa 484 . . . . . . . . . . . . . 14  |-  ( ( ( ( f  e. 
dom  S.1  /\  g  e. 
dom  S.1 )  /\  r  e.  ( ran  f  u. 
ran  g ) )  /\  r  =/=  0
)  ->  0  <  ( abs `  r ) )
259258anasss 647 . . . . . . . . . . . . 13  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  ( r  e.  ( ran  f  u.  ran  g )  /\  r  =/=  0 ) )  ->  0  <  ( abs `  r ) )
260219, 238, 2483jca 1175 . . . . . . . . . . . . . . . 16  |-  ( ( f  e.  dom  S.1  /\  g  e.  dom  S.1 )  ->  ( ( abs " ( ran  f  u.  ran  g ) ) 
C_  RR  /\  ( abs " ( ran  f  u.  ran  g ) )  =/=  (/)  /\  E. x  e.  RR  A. y  e.  ( abs " ( ran  f  u.  ran  g ) ) y  <_  x ) )
261260adantr 465 . . . . . . . . . . . . . . 15  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  r  e.  ( ran  f  u. 
ran  g ) )  ->  ( ( abs " ( ran  f  u.  ran  g ) ) 
C_  RR  /\  ( abs " ( ran  f  u.  ran  g ) )  =/=  (/)  /\  E. x  e.  RR  A. y  e.  ( abs " ( ran  f  u.  ran  g ) ) y  <_  x ) )
262 fnfvima 6131 . . . . . . . . . . . . . . . . 17  |-  ( ( abs  Fn  CC  /\  ( ran  f  u.  ran  g )  C_  CC  /\  r  e.  ( ran  f  u.  ran  g
) )  ->  ( abs `  r )  e.  ( abs " ( ran  f  u.  ran  g ) ) )
263233, 262mp3an1 1310 . . . . . . . . . . . . . . . 16  |-  ( ( ( ran  f  u. 
ran  g )  C_  CC  /\  r  e.  ( ran  f  u.  ran  g ) )  -> 
( abs `  r
)  e.  ( abs " ( ran  f  u.  ran  g ) ) )
264227, 263sylan 471 . . . . . . . . . . . . . . 15  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  r  e.  ( ran  f  u. 
ran  g ) )  ->  ( abs `  r
)  e.  ( abs " ( ran  f  u.  ran  g ) ) )
265 suprub 10505 . . . . . . . . . . . . . . 15  |-  ( ( ( ( abs " ( ran  f  u.  ran  g ) )  C_  RR  /\  ( abs " ( ran  f  u.  ran  g ) )  =/=  (/)  /\  E. x  e.  RR  A. y  e.  ( abs " ( ran  f  u.  ran  g ) ) y  <_  x )  /\  ( abs `  r )  e.  ( abs " ( ran  f  u.  ran  g ) ) )  ->  ( abs `  r
)  <_  sup (
( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )
)
266261, 264, 265syl2anc 661 . . . . . . . . . . . . . 14  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\  r  e.  ( ran  f  u. 
ran  g ) )  ->  ( abs `  r
)  <_  sup (
( abs " ( ran  f  u.  ran  g ) ) ,  RR ,  <  )
)
267266adantrr 716 . . . . . . . . . . . . 13  |-  ( ( ( f  e.  dom  S.1 
/\  g  e.  dom  S.1 )  /\