Metamath Proof Explorer


Theorem isxmet

Description: Express the predicate " D is an extended metric." (Contributed by Mario Carneiro, 20-Aug-2015)

Ref Expression
Assertion isxmet XAD∞MetXD:X×X*xXyXxDy=0x=yzXxDyzDx+𝑒zDy

Proof

Step Hyp Ref Expression
1 elex XAXV
2 xpeq12 t=Xt=Xt×t=X×X
3 2 anidms t=Xt×t=X×X
4 3 oveq2d t=X*t×t=*X×X
5 raleq t=Xztxdyzdx+𝑒zdyzXxdyzdx+𝑒zdy
6 5 anbi2d t=Xxdy=0x=yztxdyzdx+𝑒zdyxdy=0x=yzXxdyzdx+𝑒zdy
7 6 raleqbi1dv t=Xytxdy=0x=yztxdyzdx+𝑒zdyyXxdy=0x=yzXxdyzdx+𝑒zdy
8 7 raleqbi1dv t=Xxtytxdy=0x=yztxdyzdx+𝑒zdyxXyXxdy=0x=yzXxdyzdx+𝑒zdy
9 4 8 rabeqbidv t=Xd*t×t|xtytxdy=0x=yztxdyzdx+𝑒zdy=d*X×X|xXyXxdy=0x=yzXxdyzdx+𝑒zdy
10 df-xmet ∞Met=tVd*t×t|xtytxdy=0x=yztxdyzdx+𝑒zdy
11 ovex *X×XV
12 11 rabex d*X×X|xXyXxdy=0x=yzXxdyzdx+𝑒zdyV
13 9 10 12 fvmpt XV∞MetX=d*X×X|xXyXxdy=0x=yzXxdyzdx+𝑒zdy
14 1 13 syl XA∞MetX=d*X×X|xXyXxdy=0x=yzXxdyzdx+𝑒zdy
15 14 eleq2d XAD∞MetXDd*X×X|xXyXxdy=0x=yzXxdyzdx+𝑒zdy
16 oveq d=Dxdy=xDy
17 16 eqeq1d d=Dxdy=0xDy=0
18 17 bibi1d d=Dxdy=0x=yxDy=0x=y
19 oveq d=Dzdx=zDx
20 oveq d=Dzdy=zDy
21 19 20 oveq12d d=Dzdx+𝑒zdy=zDx+𝑒zDy
22 16 21 breq12d d=Dxdyzdx+𝑒zdyxDyzDx+𝑒zDy
23 22 ralbidv d=DzXxdyzdx+𝑒zdyzXxDyzDx+𝑒zDy
24 18 23 anbi12d d=Dxdy=0x=yzXxdyzdx+𝑒zdyxDy=0x=yzXxDyzDx+𝑒zDy
25 24 2ralbidv d=DxXyXxdy=0x=yzXxdyzdx+𝑒zdyxXyXxDy=0x=yzXxDyzDx+𝑒zDy
26 25 elrab Dd*X×X|xXyXxdy=0x=yzXxdyzdx+𝑒zdyD*X×XxXyXxDy=0x=yzXxDyzDx+𝑒zDy
27 15 26 bitrdi XAD∞MetXD*X×XxXyXxDy=0x=yzXxDyzDx+𝑒zDy
28 xrex *V
29 sqxpexg XAX×XV
30 elmapg *VX×XVD*X×XD:X×X*
31 28 29 30 sylancr XAD*X×XD:X×X*
32 31 anbi1d XAD*X×XxXyXxDy=0x=yzXxDyzDx+𝑒zDyD:X×X*xXyXxDy=0x=yzXxDyzDx+𝑒zDy
33 27 32 bitrd XAD∞MetXD:X×X*xXyXxDy=0x=yzXxDyzDx+𝑒zDy