MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  xrsxmet Structured version   Visualization version   Unicode version

Theorem xrsxmet 22612
Description: The metric on the extended reals is a proper extended metric. (Contributed by Mario Carneiro, 4-Sep-2015.)
Hypothesis
Ref Expression
xrsxmet.1  |-  D  =  ( dist `  RR*s
)
Assertion
Ref Expression
xrsxmet  |-  D  e.  ( *Met `  RR* )

Proof of Theorem xrsxmet
Dummy variables  x  y  z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 xrex 11829 . . . 4  |-  RR*  e.  _V
21a1i 11 . . 3  |-  ( T. 
->  RR*  e.  _V )
3 id 22 . . . . . . . 8  |-  ( y  e.  RR*  ->  y  e. 
RR* )
4 xnegcl 12044 . . . . . . . 8  |-  ( x  e.  RR*  ->  -e
x  e.  RR* )
5 xaddcl 12070 . . . . . . . 8  |-  ( ( y  e.  RR*  /\  -e
x  e.  RR* )  ->  ( y +e  -e x )  e. 
RR* )
63, 4, 5syl2anr 495 . . . . . . 7  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
y +e  -e x )  e. 
RR* )
7 xnegcl 12044 . . . . . . . 8  |-  ( y  e.  RR*  ->  -e
y  e.  RR* )
8 xaddcl 12070 . . . . . . . 8  |-  ( ( x  e.  RR*  /\  -e
y  e.  RR* )  ->  ( x +e  -e y )  e. 
RR* )
97, 8sylan2 491 . . . . . . 7  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
x +e  -e y )  e. 
RR* )
106, 9ifcld 4131 . . . . . 6  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  e.  RR* )
1110rgen2a 2977 . . . . 5  |-  A. x  e.  RR*  A. y  e. 
RR*  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  e.  RR*
12 xrsxmet.1 . . . . . . 7  |-  D  =  ( dist `  RR*s
)
1312xrsds 19789 . . . . . 6  |-  D  =  ( x  e.  RR* ,  y  e.  RR*  |->  if ( x  <_  y , 
( y +e  -e x ) ,  ( x +e  -e y ) ) )
1413fmpt2 7237 . . . . 5  |-  ( A. x  e.  RR*  A. y  e.  RR*  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  e.  RR*  <->  D : ( RR*  X. 
RR* ) --> RR* )
1511, 14mpbi 220 . . . 4  |-  D :
( RR*  X.  RR* ) --> RR*
1615a1i 11 . . 3  |-  ( T. 
->  D : ( RR*  X. 
RR* ) --> RR* )
17 breq2 4657 . . . . . 6  |-  ( ( y +e  -e x )  =  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  ->  ( 0  <_ 
( y +e  -e x )  <->  0  <_  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e
y ) ) ) )
18 breq2 4657 . . . . . 6  |-  ( ( x +e  -e y )  =  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  ->  ( 0  <_ 
( x +e  -e y )  <->  0  <_  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e
y ) ) ) )
19 xsubge0 12091 . . . . . . . 8  |-  ( ( y  e.  RR*  /\  x  e.  RR* )  ->  (
0  <_  ( y +e  -e x )  <->  x  <_  y ) )
2019ancoms 469 . . . . . . 7  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
0  <_  ( y +e  -e x )  <->  x  <_  y ) )
2120biimpar 502 . . . . . 6  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  <_  y )  ->  0  <_  (
y +e  -e x ) )
22 xrletri 11984 . . . . . . . 8  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
x  <_  y  \/  y  <_  x ) )
2322orcanai 952 . . . . . . 7  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  -.  x  <_  y
)  ->  y  <_  x )
24 xsubge0 12091 . . . . . . . 8  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
0  <_  ( x +e  -e y )  <->  y  <_  x
) )
2524biimpar 502 . . . . . . 7  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  y  <_  x )  ->  0  <_  (
x +e  -e y ) )
2623, 25syldan 487 . . . . . 6  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  -.  x  <_  y
)  ->  0  <_  ( x +e  -e y ) )
2717, 18, 21, 26ifbothda 4123 . . . . 5  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  0  <_  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) ) )
2812xrsdsval 19790 . . . . 5  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
x D y )  =  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) ) )
2927, 28breqtrrd 4681 . . . 4  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  0  <_  ( x D y ) )
3029adantl 482 . . 3  |-  ( ( T.  /\  ( x  e.  RR*  /\  y  e.  RR* ) )  -> 
0  <_  ( x D y ) )
3129biantrud 528 . . . . 5  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
( x D y )  <_  0  <->  ( (
x D y )  <_  0  /\  0  <_  ( x D y ) ) ) )
3228, 10eqeltrd 2701 . . . . . 6  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
x D y )  e.  RR* )
33 0xr 10086 . . . . . 6  |-  0  e.  RR*
34 xrletri3 11985 . . . . . 6  |-  ( ( ( x D y )  e.  RR*  /\  0  e.  RR* )  ->  (
( x D y )  =  0  <->  (
( x D y )  <_  0  /\  0  <_  ( x D y ) ) ) )
3532, 33, 34sylancl 694 . . . . 5  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
( x D y )  =  0  <->  (
( x D y )  <_  0  /\  0  <_  ( x D y ) ) ) )
36 simpr 477 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =  y )  ->  x  =  y )
37 simplr 792 . . . . . . . . . . . . 13  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
x D y )  =  0 )
38 0re 10040 . . . . . . . . . . . . 13  |-  0  e.  RR
3937, 38syl6eqel 2709 . . . . . . . . . . . 12  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
x D y )  e.  RR )
4012xrsdsreclb 19793 . . . . . . . . . . . . . 14  |-  ( ( x  e.  RR*  /\  y  e.  RR*  /\  x  =/=  y )  ->  (
( x D y )  e.  RR  <->  ( x  e.  RR  /\  y  e.  RR ) ) )
41403expa 1265 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( (
x D y )  e.  RR  <->  ( x  e.  RR  /\  y  e.  RR ) ) )
4241adantlr 751 . . . . . . . . . . . 12  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
( x D y )  e.  RR  <->  ( x  e.  RR  /\  y  e.  RR ) ) )
4339, 42mpbid 222 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
x  e.  RR  /\  y  e.  RR )
)
4443simpld 475 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  x  e.  RR )
4544recnd 10068 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  x  e.  CC )
4643simprd 479 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  y  e.  RR )
4746recnd 10068 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  y  e.  CC )
48 rexsub 12064 . . . . . . . . . . 11  |-  ( ( x  e.  RR  /\  y  e.  RR )  ->  ( x +e  -e y )  =  ( x  -  y
) )
4943, 48syl 17 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
x +e  -e y )  =  ( x  -  y
) )
5028eqeq1d 2624 . . . . . . . . . . . . 13  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
( x D y )  =  0  <->  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  0 ) )
5150biimpa 501 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  ->  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  0 )
5251adantr 481 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  0 )
53 xneg11 12046 . . . . . . . . . . . . . . 15  |-  ( ( ( y +e  -e x )  e. 
RR*  /\  0  e.  RR* )  ->  (  -e
( y +e  -e x )  = 
-e 0  <->  (
y +e  -e x )  =  0 ) )
546, 33, 53sylancl 694 . . . . . . . . . . . . . 14  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (  -e ( y +e  -e x )  =  -e 0  <->  ( y +e  -e x )  =  0 ) )
55 simpr 477 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  y  e.  RR* )
564adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  -e
x  e.  RR* )
57 xnegdi 12078 . . . . . . . . . . . . . . . . 17  |-  ( ( y  e.  RR*  /\  -e
x  e.  RR* )  -> 
-e ( y +e  -e
x )  =  ( 
-e y +e  -e  -e x ) )
5855, 56, 57syl2anc 693 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  -e
( y +e  -e x )  =  (  -e y +e  -e  -e x ) )
59 xnegneg 12045 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  RR*  ->  -e  -e x  =  x )
6059adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  -e  -e x  =  x )
6160oveq2d 6666 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (  -e y +e  -e  -e x )  =  (  -e y +e
x ) )
627adantl 482 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  -e
y  e.  RR* )
63 simpl 473 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  x  e.  RR* )
64 xaddcom 12071 . . . . . . . . . . . . . . . . 17  |-  ( ( 
-e y  e. 
RR*  /\  x  e.  RR* )  ->  (  -e
y +e x )  =  ( x +e  -e
y ) )
6562, 63, 64syl2anc 693 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (  -e y +e
x )  =  ( x +e  -e y ) )
6658, 61, 653eqtrd 2660 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  -e
( y +e  -e x )  =  ( x +e  -e y ) )
67 xneg0 12043 . . . . . . . . . . . . . . . 16  |-  -e 0  =  0
6867a1i 11 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  -e 0  =  0 )
6966, 68eqeq12d 2637 . . . . . . . . . . . . . 14  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (  -e ( y +e  -e x )  =  -e 0  <->  ( x +e  -e y )  =  0 ) )
7054, 69bitr3d 270 . . . . . . . . . . . . 13  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
( y +e  -e x )  =  0  <->  ( x +e  -e y )  =  0 ) )
7170ad2antrr 762 . . . . . . . . . . . 12  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
( y +e  -e x )  =  0  <->  ( x +e  -e y )  =  0 ) )
72 biidd 252 . . . . . . . . . . . 12  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
( x +e  -e y )  =  0  <->  ( x +e  -e y )  =  0 ) )
73 eqeq1 2626 . . . . . . . . . . . . . 14  |-  ( ( y +e  -e x )  =  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  ->  ( ( y +e  -e
x )  =  0  <-> 
if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  =  0 ) )
7473bibi1d 333 . . . . . . . . . . . . 13  |-  ( ( y +e  -e x )  =  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  ->  ( ( ( y +e  -e x )  =  0  <->  ( x +e  -e y )  =  0 )  <-> 
( if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  0  <->  ( x +e  -e y )  =  0 ) ) )
75 eqeq1 2626 . . . . . . . . . . . . . 14  |-  ( ( x +e  -e y )  =  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  ->  ( ( x +e  -e
y )  =  0  <-> 
if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  =  0 ) )
7675bibi1d 333 . . . . . . . . . . . . 13  |-  ( ( x +e  -e y )  =  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  ->  ( ( ( x +e  -e y )  =  0  <->  ( x +e  -e y )  =  0 )  <-> 
( if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  0  <->  ( x +e  -e y )  =  0 ) ) )
7774, 76ifboth 4124 . . . . . . . . . . . 12  |-  ( ( ( ( y +e  -e x )  =  0  <->  (
x +e  -e y )  =  0 )  /\  (
( x +e  -e y )  =  0  <->  ( x +e  -e y )  =  0 ) )  ->  ( if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  0  <->  ( x +e  -e y )  =  0 ) )
7871, 72, 77syl2anc 693 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  ( if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e
y ) )  =  0  <->  ( x +e  -e y )  =  0 ) )
7952, 78mpbid 222 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
x +e  -e y )  =  0 )
8049, 79eqtr3d 2658 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  (
x  -  y )  =  0 )
8145, 47, 80subeq0d 10400 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  /\  x  =/=  y )  ->  x  =  y )
8236, 81pm2.61dane 2881 . . . . . . 7  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  ( x D y )  =  0 )  ->  x  =  y )
8382ex 450 . . . . . 6  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
( x D y )  =  0  ->  x  =  y )
)
8412xrsdsval 19790 . . . . . . . . . 10  |-  ( ( y  e.  RR*  /\  y  e.  RR* )  ->  (
y D y )  =  if ( y  <_  y ,  ( y +e  -e y ) ,  ( y +e  -e y ) ) )
8584anidms 677 . . . . . . . . 9  |-  ( y  e.  RR*  ->  ( y D y )  =  if ( y  <_ 
y ,  ( y +e  -e
y ) ,  ( y +e  -e y ) ) )
86 xrleid 11983 . . . . . . . . . 10  |-  ( y  e.  RR*  ->  y  <_ 
y )
8786iftrued 4094 . . . . . . . . 9  |-  ( y  e.  RR*  ->  if ( y  <_  y , 
( y +e  -e y ) ,  ( y +e  -e y ) )  =  ( y +e  -e y ) )
88 xnegid 12069 . . . . . . . . 9  |-  ( y  e.  RR*  ->  ( y +e  -e
y )  =  0 )
8985, 87, 883eqtrd 2660 . . . . . . . 8  |-  ( y  e.  RR*  ->  ( y D y )  =  0 )
9089adantl 482 . . . . . . 7  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
y D y )  =  0 )
91 oveq1 6657 . . . . . . . 8  |-  ( x  =  y  ->  (
x D y )  =  ( y D y ) )
9291eqeq1d 2624 . . . . . . 7  |-  ( x  =  y  ->  (
( x D y )  =  0  <->  (
y D y )  =  0 ) )
9390, 92syl5ibrcom 237 . . . . . 6  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
x  =  y  -> 
( x D y )  =  0 ) )
9483, 93impbid 202 . . . . 5  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
( x D y )  =  0  <->  x  =  y ) )
9531, 35, 943bitr2d 296 . . . 4  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
( x D y )  <_  0  <->  x  =  y ) )
9695adantl 482 . . 3  |-  ( ( T.  /\  ( x  e.  RR*  /\  y  e.  RR* ) )  -> 
( ( x D y )  <_  0  <->  x  =  y ) )
97 simplrr 801 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( z D y )  e.  RR )
9897leidd 10594 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( z D y )  <_  ( z D y ) )
99 simpr 477 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  z  =  x )
10099oveq1d 6665 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( z D y )  =  ( x D y ) )
10199oveq1d 6665 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( z D x )  =  ( x D x ) )
102 simpll1 1100 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  x  e.  RR* )
103 oveq12 6659 . . . . . . . . . . . . 13  |-  ( ( y  =  x  /\  y  =  x )  ->  ( y D y )  =  ( x D x ) )
104103anidms 677 . . . . . . . . . . . 12  |-  ( y  =  x  ->  (
y D y )  =  ( x D x ) )
105104eqeq1d 2624 . . . . . . . . . . 11  |-  ( y  =  x  ->  (
( y D y )  =  0  <->  (
x D x )  =  0 ) )
106105, 89vtoclga 3272 . . . . . . . . . 10  |-  ( x  e.  RR*  ->  ( x D x )  =  0 )
107102, 106syl 17 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( x D x )  =  0 )
108101, 107eqtrd 2656 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( z D x )  =  0 )
109108oveq1d 6665 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( ( z D x )  +  ( z D y ) )  =  ( 0  +  ( z D y ) ) )
11097recnd 10068 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( z D y )  e.  CC )
111110addid2d 10237 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( 0  +  ( z D y ) )  =  ( z D y ) )
112109, 111eqtr2d 2657 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( z D y )  =  ( ( z D x )  +  ( z D y ) ) )
11398, 100, 1123brtr3d 4684 . . . . 5  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  x )  ->  ( x D y )  <_  ( (
z D x )  +  ( z D y ) ) )
114 simpr 477 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  z  =  y )
115114oveq1d 6665 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( z D x )  =  ( y D x ) )
116 simplrl 800 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( z D x )  e.  RR )
117115, 116eqeltrrd 2702 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( y D x )  e.  RR )
118117leidd 10594 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( y D x )  <_  ( y D x ) )
119 simpll1 1100 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  x  e.  RR* )
120 simpll2 1101 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  y  e.  RR* )
121 oveq2 6658 . . . . . . . . . 10  |-  ( x  =  y  ->  (
y D x )  =  ( y D y ) )
12291, 121eqtr4d 2659 . . . . . . . . 9  |-  ( x  =  y  ->  (
x D y )  =  ( y D x ) )
123122adantl 482 . . . . . . . 8  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =  y
)  ->  ( x D y )  =  ( y D x ) )
124 eqeq2 2633 . . . . . . . . . 10  |-  ( ( x +e  -e y )  =  if ( y  <_  x ,  ( x +e  -e y ) ,  ( y +e  -e
x ) )  -> 
( if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  ( x +e  -e y )  <->  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  =  if ( y  <_  x ,  ( x +e  -e y ) ,  ( y +e  -e x ) ) ) )
125 eqeq2 2633 . . . . . . . . . 10  |-  ( ( y +e  -e x )  =  if ( y  <_  x ,  ( x +e  -e y ) ,  ( y +e  -e
x ) )  -> 
( if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  ( y +e  -e x )  <->  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) )  =  if ( y  <_  x ,  ( x +e  -e y ) ,  ( y +e  -e x ) ) ) )
126 xrleloe 11977 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
x  <_  y  <->  ( x  <  y  \/  x  =  y ) ) )
127126adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( x  <_  y  <->  ( x  < 
y  \/  x  =  y ) ) )
128 simpr 477 . . . . . . . . . . . . . . . 16  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  x  =/=  y )
129128neneqd 2799 . . . . . . . . . . . . . . 15  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  -.  x  =  y )
130 biorf 420 . . . . . . . . . . . . . . . 16  |-  ( -.  x  =  y  -> 
( x  <  y  <->  ( x  =  y  \/  x  <  y ) ) )
131 orcom 402 . . . . . . . . . . . . . . . 16  |-  ( ( x  =  y  \/  x  <  y )  <-> 
( x  <  y  \/  x  =  y
) )
132130, 131syl6bb 276 . . . . . . . . . . . . . . 15  |-  ( -.  x  =  y  -> 
( x  <  y  <->  ( x  <  y  \/  x  =  y ) ) )
133129, 132syl 17 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( x  <  y  <->  ( x  < 
y  \/  x  =  y ) ) )
134 xrltnle 10105 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
x  <  y  <->  -.  y  <_  x ) )
135134adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( x  <  y  <->  -.  y  <_  x ) )
136127, 133, 1353bitr2d 296 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( x  <_  y  <->  -.  y  <_  x ) )
137136con2bid 344 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( y  <_  x  <->  -.  x  <_  y ) )
138137biimpa 501 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  x  =/=  y )  /\  y  <_  x )  ->  -.  x  <_  y )
139138iffalsed 4097 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  x  =/=  y )  /\  y  <_  x )  ->  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e y ) )  =  ( x +e  -e y ) )
140136biimpar 502 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  x  =/=  y )  /\  -.  y  <_  x )  ->  x  <_  y )
141140iftrued 4094 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* )  /\  x  =/=  y )  /\  -.  y  <_  x )  ->  if ( x  <_  y ,  ( y +e  -e x ) ,  ( x +e  -e
y ) )  =  ( y +e  -e x ) )
142124, 125, 139, 141ifbothda 4123 . . . . . . . . 9  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  if (
x  <_  y , 
( y +e  -e x ) ,  ( x +e  -e y ) )  =  if ( y  <_  x ,  ( x +e  -e y ) ,  ( y +e  -e x ) ) )
14328adantr 481 . . . . . . . . 9  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( x D y )  =  if ( x  <_ 
y ,  ( y +e  -e
x ) ,  ( x +e  -e y ) ) )
14412xrsdsval 19790 . . . . . . . . . . 11  |-  ( ( y  e.  RR*  /\  x  e.  RR* )  ->  (
y D x )  =  if ( y  <_  x ,  ( x +e  -e y ) ,  ( y +e  -e x ) ) )
145144ancoms 469 . . . . . . . . . 10  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
y D x )  =  if ( y  <_  x ,  ( x +e  -e y ) ,  ( y +e  -e x ) ) )
146145adantr 481 . . . . . . . . 9  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( y D x )  =  if ( y  <_  x ,  ( x +e  -e y ) ,  ( y +e  -e
x ) ) )
147142, 143, 1463eqtr4d 2666 . . . . . . . 8  |-  ( ( ( x  e.  RR*  /\  y  e.  RR* )  /\  x  =/=  y
)  ->  ( x D y )  =  ( y D x ) )
148123, 147pm2.61dane 2881 . . . . . . 7  |-  ( ( x  e.  RR*  /\  y  e.  RR* )  ->  (
x D y )  =  ( y D x ) )
149119, 120, 148syl2anc 693 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( x D y )  =  ( y D x ) )
150114oveq1d 6665 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( z D y )  =  ( y D y ) )
151120, 89syl 17 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( y D y )  =  0 )
152150, 151eqtrd 2656 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( z D y )  =  0 )
153115, 152oveq12d 6668 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( ( z D x )  +  ( z D y ) )  =  ( ( y D x )  +  0 ) )
154117recnd 10068 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( y D x )  e.  CC )
155154addid1d 10236 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( ( y D x )  +  0 )  =  ( y D x ) )
156153, 155eqtrd 2656 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( ( z D x )  +  ( z D y ) )  =  ( y D x ) )
157118, 149, 1563brtr4d 4685 . . . . 5  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  z  =  y )  ->  ( x D y )  <_  ( (
z D x )  +  ( z D y ) ) )
158 simplrl 800 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
z D x )  e.  RR )
159 simpll3 1102 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  z  e.  RR* )
160 simpll1 1100 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  x  e.  RR* )
161 simprl 794 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  z  =/=  x )
16212xrsdsreclb 19793 . . . . . . . . . . 11  |-  ( ( z  e.  RR*  /\  x  e.  RR*  /\  z  =/=  x )  ->  (
( z D x )  e.  RR  <->  ( z  e.  RR  /\  x  e.  RR ) ) )
163159, 160, 161, 162syl3anc 1326 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
( z D x )  e.  RR  <->  ( z  e.  RR  /\  x  e.  RR ) ) )
164158, 163mpbid 222 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
z  e.  RR  /\  x  e.  RR )
)
165164simprd 479 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  x  e.  RR )
166165recnd 10068 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  x  e.  CC )
167 simplrr 801 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
z D y )  e.  RR )
168 simpll2 1101 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  y  e.  RR* )
169 simprr 796 . . . . . . . . . . 11  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  z  =/=  y )
17012xrsdsreclb 19793 . . . . . . . . . . 11  |-  ( ( z  e.  RR*  /\  y  e.  RR*  /\  z  =/=  y )  ->  (
( z D y )  e.  RR  <->  ( z  e.  RR  /\  y  e.  RR ) ) )
171159, 168, 169, 170syl3anc 1326 . . . . . . . . . 10  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
( z D y )  e.  RR  <->  ( z  e.  RR  /\  y  e.  RR ) ) )
172167, 171mpbid 222 . . . . . . . . 9  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
z  e.  RR  /\  y  e.  RR )
)
173172simprd 479 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  y  e.  RR )
174173recnd 10068 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  y  e.  CC )
175164simpld 475 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  z  e.  RR )
176175recnd 10068 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  z  e.  CC )
177166, 174, 176abs3difd 14199 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  ( abs `  ( x  -  y ) )  <_ 
( ( abs `  (
x  -  z ) )  +  ( abs `  ( z  -  y
) ) ) )
17812xrsdsreval 19791 . . . . . . 7  |-  ( ( x  e.  RR  /\  y  e.  RR )  ->  ( x D y )  =  ( abs `  ( x  -  y
) ) )
179165, 173, 178syl2anc 693 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
x D y )  =  ( abs `  (
x  -  y ) ) )
18012xrsdsreval 19791 . . . . . . . . 9  |-  ( ( z  e.  RR  /\  x  e.  RR )  ->  ( z D x )  =  ( abs `  ( z  -  x
) ) )
181164, 180syl 17 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
z D x )  =  ( abs `  (
z  -  x ) ) )
182176, 166abssubd 14192 . . . . . . . 8  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  ( abs `  ( z  -  x ) )  =  ( abs `  (
x  -  z ) ) )
183181, 182eqtrd 2656 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
z D x )  =  ( abs `  (
x  -  z ) ) )
18412xrsdsreval 19791 . . . . . . . 8  |-  ( ( z  e.  RR  /\  y  e.  RR )  ->  ( z D y )  =  ( abs `  ( z  -  y
) ) )
185172, 184syl 17 . . . . . . 7  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
z D y )  =  ( abs `  (
z  -  y ) ) )
186183, 185oveq12d 6668 . . . . . 6  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
( z D x )  +  ( z D y ) )  =  ( ( abs `  ( x  -  z
) )  +  ( abs `  ( z  -  y ) ) ) )
187177, 179, 1863brtr4d 4685 . . . . 5  |-  ( ( ( ( x  e. 
RR*  /\  y  e.  RR* 
/\  z  e.  RR* )  /\  ( ( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  /\  ( z  =/=  x  /\  z  =/=  y
) )  ->  (
x D y )  <_  ( ( z D x )  +  ( z D y ) ) )
188113, 157, 187pm2.61da2ne 2882 . . . 4  |-  ( ( ( x  e.  RR*  /\  y  e.  RR*  /\  z  e.  RR* )  /\  (
( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  ->  ( x D y )  <_ 
( ( z D x )  +  ( z D y ) ) )
1891883adant1 1079 . . 3  |-  ( ( T.  /\  ( x  e.  RR*  /\  y  e.  RR*  /\  z  e. 
RR* )  /\  (
( z D x )  e.  RR  /\  ( z D y )  e.  RR ) )  ->  ( x D y )  <_ 
( ( z D x )  +  ( z D y ) ) )
1902, 16, 30, 96, 189isxmet2d 22132 . 2  |-  ( T. 
->  D  e.  ( *Met `  RR* )
)
191190trud 1493 1  |-  D  e.  ( *Met `  RR* )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    <-> wb 196    \/ wo 383    /\ wa 384    /\ w3a 1037    = wceq 1483   T. wtru 1484    e. wcel 1990    =/= wne 2794   A.wral 2912   _Vcvv 3200   ifcif 4086   class class class wbr 4653    X. cxp 5112   -->wf 5884   ` cfv 5888  (class class class)co 6650   RRcr 9935   0cc0 9936    + caddc 9939   RR*cxr 10073    < clt 10074    <_ cle 10075    - cmin 10266    -ecxne 11943   +ecxad 11944   abscabs 13974   distcds 15950   RR*scxrs 16160   *Metcxmt 19731
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-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  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
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  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-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-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-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-om 7066  df-1st 7168  df-2nd 7169  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-oadd 7564  df-er 7742  df-map 7859  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-sup 8348  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-4 11081  df-5 11082  df-6 11083  df-7 11084  df-8 11085  df-9 11086  df-n0 11293  df-z 11378  df-dec 11494  df-uz 11688  df-rp 11833  df-xneg 11946  df-xadd 11947  df-icc 12182  df-fz 12327  df-seq 12802  df-exp 12861  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-struct 15859  df-ndx 15860  df-slot 15861  df-base 15863  df-plusg 15954  df-mulr 15955  df-tset 15960  df-ple 15961  df-ds 15964  df-xrs 16162  df-xmet 19739
This theorem is referenced by:  xrsdsre  22613  xrsblre  22614  xrsmopn  22615  metdcnlem  22639  xmetdcn2  22640  xmetdcn  22641  metdscn  22659  metdscn2  22660
  Copyright terms: Public domain W3C validator