Theorem xmetresbl 15305

Description: An extended metric restricted to any ball (in particular the infinity ball) is a proper metric. Together with xmetec 15302, this shows that any extended metric space can be "factored" into the disjoint union of proper metric spaces, with points in the same region measured by that region's metric, and points in different regions being distance +oo from each other. (Contributed by Mario Carneiro, 23-Aug-2015.)

Hypothesis

Ref	Expression
xmetresbl.1	|- B = ( P ( ball ` D ) R )

Assertion

Ref	Expression
xmetresbl	|- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( D |` ( B X. B ) ) e. ( Met ` B ) )

Proof of Theorem xmetresbl

Dummy variables x y are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simp1 1024	. . 3 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> D e. ( *Met ` X ) )
2		xmetresbl.1	. . . 4 |- B = ( P ( ball ` D ) R )
3		blssm 15286	. . . 4 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( P ( ball ` D ) R ) C_ X )
4	2, 3	eqsstrid 3284	. . 3 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> B C_ X )
5		xmetres2 15244	. . 3 |- ( ( D e. ( *Met ` X ) /\ B C_ X ) -> ( D |` ( B X. B ) ) e. ( *Met ` B ) )
6	1, 4, 5	syl2anc 411	. 2 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( D |` ( B X. B ) ) e. ( *Met ` B ) )
7		xmetf 15215	. . . . . 6 |- ( D e. ( *Met ` X ) -> D : ( X X. X ) --> RR* )
8	1, 7	syl 14	. . . . 5 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> D : ( X X. X ) --> RR* )
9		xpss12 4857	. . . . . 6 |- ( ( B C_ X /\ B C_ X ) -> ( B X. B ) C_ ( X X. X ) )
10	4, 4, 9	syl2anc 411	. . . . 5 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( B X. B ) C_ ( X X. X ) )
11	8, 10	fssresd 5541	. . . 4 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( D |` ( B X. B ) ) : ( B X. B ) --> RR* )
12	11	ffnd 5509	. . 3 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( D |` ( B X. B ) ) Fn ( B X. B ) )
13		ovres 6194	. . . . . 6 |- ( ( x e. B /\ y e. B ) -> ( x ( D |` ( B X. B ) ) y ) = ( x D y ) )
14	13	adantl 277	. . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> ( x ( D |` ( B X. B ) ) y ) = ( x D y ) )
15		simpl1 1027	. . . . . . . . 9 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> D e. ( *Met ` X ) )
16		eqid 2232	. . . . . . . . . 10 |- ( `' D " RR ) = ( `' D " RR )
17	16	xmeter 15301	. . . . . . . . 9 |- ( D e. ( *Met ` X ) -> ( `' D " RR ) Er X )
18	15, 17	syl 14	. . . . . . . 8 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> ( `' D " RR ) Er X )
19	16	blssec 15303	. . . . . . . . . . . 12 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( P ( ball ` D ) R ) C_ [ P ] ( `' D " RR ) )
20	2, 19	eqsstrid 3284	. . . . . . . . . . 11 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> B C_ [ P ] ( `' D " RR ) )
21	20	sselda 3238	. . . . . . . . . 10 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ x e. B ) -> x e. [ P ] ( `' D " RR ) )
22	21	adantrr 479	. . . . . . . . 9 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> x e. [ P ] ( `' D " RR ) )
23		simpl2 1028	. . . . . . . . . 10 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> P e. X )
24		elecg 6807	. . . . . . . . . 10 |- ( ( x e. [ P ] ( `' D " RR ) /\ P e. X ) -> ( x e. [ P ] ( `' D " RR ) <-> P ( `' D " RR ) x ) )
25	22, 23, 24	syl2anc 411	. . . . . . . . 9 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> ( x e. [ P ] ( `' D " RR ) <-> P ( `' D " RR ) x ) )
26	22, 25	mpbid 147	. . . . . . . 8 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> P ( `' D " RR ) x )
27	20	sselda 3238	. . . . . . . . . 10 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ y e. B ) -> y e. [ P ] ( `' D " RR ) )
28	27	adantrl 478	. . . . . . . . 9 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> y e. [ P ] ( `' D " RR ) )
29		elecg 6807	. . . . . . . . . 10 |- ( ( y e. [ P ] ( `' D " RR ) /\ P e. X ) -> ( y e. [ P ] ( `' D " RR ) <-> P ( `' D " RR ) y ) )
30	28, 23, 29	syl2anc 411	. . . . . . . . 9 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> ( y e. [ P ] ( `' D " RR ) <-> P ( `' D " RR ) y ) )
31	28, 30	mpbid 147	. . . . . . . 8 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> P ( `' D " RR ) y )
32	18, 26, 31	ertr3d 6785	. . . . . . 7 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> x ( `' D " RR ) y )
33	16	xmeterval 15300	. . . . . . . 8 |- ( D e. ( *Met ` X ) -> ( x ( `' D " RR ) y <-> ( x e. X /\ y e. X /\ ( x D y ) e. RR ) ) )
34	15, 33	syl 14	. . . . . . 7 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> ( x ( `' D " RR ) y <-> ( x e. X /\ y e. X /\ ( x D y ) e. RR ) ) )
35	32, 34	mpbid 147	. . . . . 6 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> ( x e. X /\ y e. X /\ ( x D y ) e. RR ) )
36	35	simp3d 1038	. . . . 5 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> ( x D y ) e. RR )
37	14, 36	eqeltrd 2309	. . . 4 |- ( ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) /\ ( x e. B /\ y e. B ) ) -> ( x ( D |` ( B X. B ) ) y ) e. RR )
38	37	ralrimivva 2624	. . 3 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> A. x e. B A. y e. B ( x ( D |` ( B X. B ) ) y ) e. RR )
39		ffnov 6157	. . 3 |- ( ( D |` ( B X. B ) ) : ( B X. B ) --> RR <-> ( ( D |` ( B X. B ) ) Fn ( B X. B ) /\ A. x e. B A. y e. B ( x ( D |` ( B X. B ) ) y ) e. RR ) )
40	12, 38, 39	sylanbrc 417	. 2 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( D |` ( B X. B ) ) : ( B X. B ) --> RR )
41		ismet2 15219	. 2 |- ( ( D |` ( B X. B ) ) e. ( Met ` B ) <-> ( ( D |` ( B X. B ) ) e. ( *Met ` B ) /\ ( D |` ( B X. B ) ) : ( B X. B ) --> RR ) )
42	6, 40, 41	sylanbrc 417	1 |- ( ( D e. ( *Met ` X ) /\ P e. X /\ R e. RR* ) -> ( D |` ( B X. B ) ) e. ( Met ` B ) )

Syntax hints:   -> wi 4   /\ wa 104   <-> wb 105   /\ w3a 1005   = wceq 1398   e. wcel 2203   A.wral 2520   C_ wss 3211   class class class wbr 4109   X. cxp 4747   `'ccnv 4748   |` cres 4751   "cima 4752   Fn wfn 5347   -->wf 5348   ` cfv 5352  (class class class)co 6050   Er wer 6764   [cec 6765   RRcr 8126   RR*cxr 8307   *Metcxmet 14684   Metcmet 14685   ballcbl 14686

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 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2205  ax-14 2206  ax-ext 2214  ax-sep 4228  ax-pow 4287  ax-pr 4322  ax-un 4554  ax-setind 4659  ax-cnex 8218  ax-resscn 8219  ax-1cn 8220  ax-1re 8221  ax-icn 8222  ax-addcl 8223  ax-addrcl 8224  ax-mulcl 8225  ax-mulrcl 8226  ax-addcom 8227  ax-mulcom 8228  ax-addass 8229  ax-mulass 8230  ax-distr 8231  ax-i2m1 8232  ax-0lt1 8233  ax-1rid 8234  ax-0id 8235  ax-rnegex 8236  ax-precex 8237  ax-cnre 8238  ax-pre-ltirr 8239  ax-pre-ltwlin 8240  ax-pre-lttrn 8241  ax-pre-apti 8242  ax-pre-ltadd 8243  ax-pre-mulgt0 8244

This theorem depends on definitions:  df-bi 117  df-stab 839  df-dc 843  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1812  df-eu 2083  df-mo 2084  df-clab 2219  df-cleq 2225  df-clel 2228  df-nfc 2373  df-ne 2413  df-nel 2508  df-ral 2525  df-rex 2526  df-reu 2527  df-rab 2529  df-v 2815  df-sbc 3043  df-csb 3139  df-dif 3213  df-un 3215  df-in 3217  df-ss 3224  df-if 3621  df-pw 3671  df-sn 3695  df-pr 3696  df-op 3698  df-uni 3915  df-iun 3993  df-br 4110  df-opab 4172  df-mpt 4173  df-id 4414  df-po 4417  df-iso 4418  df-xp 4755  df-rel 4756  df-cnv 4757  df-co 4758  df-dm 4759  df-rn 4760  df-res 4761  df-ima 4762  df-iota 5312  df-fun 5354  df-fn 5355  df-f 5356  df-fv 5360  df-riota 6003  df-ov 6053  df-oprab 6054  df-mpo 6055  df-1st 6334  df-2nd 6335  df-er 6767  df-ec 6769  df-map 6884  df-pnf 8310  df-mnf 8311  df-xr 8312  df-ltxr 8313  df-le 8314  df-sub 8446  df-neg 8447  df-2 9296  df-xneg 10105  df-xadd 10106  df-psmet 14691  df-xmet 14692  df-met 14693  df-bl 14694

This theorem is referenced by: (None)