Metamath Proof Explorer


Theorem ismet

Description: Express the predicate " D is a metric." (Contributed by NM, 25-Aug-2006) (Revised by Mario Carneiro, 14-Aug-2015)

Ref Expression
Assertion ismet XADMetXD:X×XxXyXxDy=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=Xt×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=Xdt×t|xtytxdy=0x=yztxdyzdx+zdy=dX×X|xXyXxdy=0x=yzXxdyzdx+zdy
10 df-met Met=tVdt×t|xtytxdy=0x=yztxdyzdx+zdy
11 ovex X×XV
12 11 rabex dX×X|xXyXxdy=0x=yzXxdyzdx+zdyV
13 9 10 12 fvmpt XVMetX=dX×X|xXyXxdy=0x=yzXxdyzdx+zdy
14 1 13 syl XAMetX=dX×X|xXyXxdy=0x=yzXxdyzdx+zdy
15 14 eleq2d XADMetXDdX×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 DdX×X|xXyXxdy=0x=yzXxdyzdx+zdyDX×XxXyXxDy=0x=yzXxDyzDx+zDy
27 15 26 bitrdi XADMetXDX×XxXyXxDy=0x=yzXxDyzDx+zDy
28 reex V
29 sqxpexg XAX×XV
30 elmapg VX×XVDX×XD:X×X
31 28 29 30 sylancr XADX×XD:X×X
32 31 anbi1d XADX×XxXyXxDy=0x=yzXxDyzDx+zDyD:X×XxXyXxDy=0x=yzXxDyzDx+zDy
33 27 32 bitrd XADMetXD:X×XxXyXxDy=0x=yzXxDyzDx+zDy