ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  xmetres2 Unicode version
Theorem xmetres2 14547
Description: Restriction of an extended metric. (Contributed by Mario Carneiro, 20-Aug-2015.)
Assertion
Ref Expression
xmetres2 |- ( ( D e. ( *Met ` X ) /\ R C_ X ) -> ( D |` ( R X. R ) ) e. ( *Met ` R ) )
Proof of Theorem xmetres2
Dummy variables x y z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 xmetrel 14511 . . . . 5 |- Rel *Met
2 relelfvdm 5586 . . . . 5 |- ( ( Rel *Met /\ D e. ( *Met ` X ) ) -> X e. dom *Met )
31, 2mpan 424 . . . 4 |- ( D e. ( *Met ` X ) -> X e. dom *Met )
43adantr 276 . . 3 |- ( ( D e. ( *Met ` X ) /\ R C_ X ) -> X e. dom *Met )
5 simpr 110 . . 3 |- ( ( D e. ( *Met ` X ) /\ R C_ X ) -> R C_ X )
64, 5ssexd 4169 . 2 |- ( ( D e. ( *Met ` X ) /\ R C_ X ) -> R e. _V )
7 xmetf 14518 . . . 4 |- ( D e. ( *Met ` X ) -> D : ( X X. X ) --> RR* )
87adantr 276 . . 3 |- ( ( D e. ( *Met ` X ) /\ R C_ X ) -> D : ( X X. X ) --> RR* )
9 xpss12 4766 . . . 4 |- ( ( R C_ X /\ R C_ X ) -> ( R X. R ) C_ ( X X. X ) )
105, 9sylancom 420 . . 3 |- ( ( D e. ( *Met ` X ) /\ R C_ X ) -> ( R X. R ) C_ ( X X. X ) )
118, 10fssresd 5430 . 2 |- ( ( D e. ( *Met ` X ) /\ R C_ X ) -> ( D |` ( R X. R ) ) : ( R X. R ) --> RR* )
12 ovres 6058 . . . . 5 |- ( ( x e. R /\ y e. R ) -> ( x ( D |` ( R X. R ) ) y ) = ( x D y ) )
1312adantl 277 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> ( x ( D |` ( R X. R ) ) y ) = ( x D y ) )
1413eqeq1d 2202 . . 3 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> ( ( x ( D |` ( R X. R ) ) y ) = 0 <-> ( x D y ) = 0 ) )
15 simpll 527 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> D e. ( *Met ` X ) )
16 simplr 528 . . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> R C_ X )
17 simprl 529 . . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> x e. R )
1816, 17sseldd 3180 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> x e. X )
19 simprr 531 . . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> y e. R )
2016, 19sseldd 3180 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> y e. X )
21 xmeteq0 14527 . . . 4 |- ( ( D e. ( *Met ` X ) /\ x e. X /\ y e. X ) -> ( ( x D y ) = 0 <-> x = y ) )
2215, 18, 20, 21syl3anc 1249 . . 3 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> ( ( x D y ) = 0 <-> x = y ) )
2314, 22bitrd 188 . 2 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R ) ) -> ( ( x ( D |` ( R X. R ) ) y ) = 0 <-> x = y ) )
24 simpll 527 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> D e. ( *Met ` X ) )
25 simplr 528 . . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> R C_ X )
26 simpr3 1007 . . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> z e. R )
2725, 26sseldd 3180 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> z e. X )
28183adantr3 1160 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> x e. X )
29203adantr3 1160 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> y e. X )
30 xmettri2 14529 . . . 4 |- ( ( D e. ( *Met ` X ) /\ ( z e. X /\ x e. X /\ y e. X ) ) -> ( x D y ) <_ ( ( z D x ) +e ( z D y ) ) )
3124, 27, 28, 29, 30syl13anc 1251 . . 3 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> ( x D y ) <_ ( ( z D x ) +e ( z D y ) ) )
32133adantr3 1160 . . 3 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> ( x ( D |` ( R X. R ) ) y ) = ( x D y ) )
33 simpr1 1005 . . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> x e. R )
3426, 33ovresd 6059 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> ( z ( D |` ( R X. R ) ) x ) = ( z D x ) )
35 simpr2 1006 . . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> y e. R )
3626, 35ovresd 6059 . . . 4 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> ( z ( D |` ( R X. R ) ) y ) = ( z D y ) )
3734, 36oveq12d 5936 . . 3 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> ( ( z ( D |` ( R X. R ) ) x ) +e ( z ( D |` ( R X. R ) ) y ) ) = ( ( z D x ) +e ( z D y ) ) )
3831, 32, 373brtr4d 4061 . 2 |- ( ( ( D e. ( *Met ` X ) /\ R C_ X ) /\ ( x e. R /\ y e. R /\ z e. R ) ) -> ( x ( D |` ( R X. R ) ) y ) <_ ( ( z ( D |` ( R X. R ) ) x ) +e ( z ( D |` ( R X. R ) ) y ) ) )
396, 11, 23, 38isxmetd 14515 1 |- ( ( D e. ( *Met ` X ) /\ R C_ X ) -> ( D |` ( R X. R ) ) e. ( *Met ` R ) )
Colors of variables: wff set class
Syntax hints:   -> wi 4   /\ wa 104   <-> wb 105   /\ w3a 980   = wceq 1364   e. wcel 2164   C_ wss 3153   class class class wbr 4029   X. cxp 4657   dom cdm 4659   |` cres 4661   Rel wrel 4664   -->wf 5250   ` cfv 5254  (class class class)co 5918   0cc0 7872   RR*cxr 8053   <_ cle 8055   +ecxad 9836   *Metcxmet 14032
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-13 2166  ax-14 2167  ax-ext 2175  ax-sep 4147  ax-pow 4203  ax-pr 4238  ax-un 4464  ax-setind 4569  ax-cnex 7963  ax-resscn 7964
This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-fal 1370  df-nf 1472  df-sb 1774  df-eu 2045  df-mo 2046  df-clab 2180  df-cleq 2186  df-clel 2189  df-nfc 2325  df-ne 2365  df-ral 2477  df-rex 2478  df-rab 2481  df-v 2762  df-sbc 2986  df-csb 3081  df-dif 3155  df-un 3157  df-in 3159  df-ss 3166  df-pw 3603  df-sn 3624  df-pr 3625  df-op 3627  df-uni 3836  df-iun 3914  df-br 4030  df-opab 4091  df-mpt 4092  df-id 4324  df-xp 4665  df-rel 4666  df-cnv 4667  df-co 4668  df-dm 4669  df-rn 4670  df-res 4671  df-ima 4672  df-iota 5215  df-fun 5256  df-fn 5257  df-f 5258  df-fv 5262  df-ov 5921  df-oprab 5922  df-mpo 5923  df-1st 6193  df-2nd 6194  df-map 6704  df-pnf 8056  df-mnf 8057  df-xr 8058  df-xmet 14040
This theorem is referenced by:  metres2  14549  xmetres  14550  xmetresbl  14608  metrest  14674  divcnap  14723  cncfmet  14747  limcimolemlt  14818  cnplimcim  14821  cnplimclemr  14823  limccnpcntop  14829  limccnp2cntop  14831
  Copyright terms: Public domain W3C validator