Metamath Proof Explorer


Theorem pstmval

Description: Value of the metric induced by a pseudometric D . (Contributed by Thierry Arnoux, 7-Feb-2018)

Ref Expression
Hypothesis pstmval.1 ˙=~MetD
Assertion pstmval DPsMetXpstoMetD=aX/˙,bX/˙z|xaybz=xDy

Proof

Step Hyp Ref Expression
1 pstmval.1 ˙=~MetD
2 df-pstm pstoMet=dranPsMetadomdomd/~Metd,bdomdomd/~Metdz|xaybz=xdy
3 psmetdmdm DPsMetXX=domdomD
4 3 adantr DPsMetXd=DX=domdomD
5 dmeq d=Ddomd=domD
6 5 dmeqd d=Ddomdomd=domdomD
7 6 adantl DPsMetXd=Ddomdomd=domdomD
8 4 7 eqtr4d DPsMetXd=DX=domdomd
9 qseq1 X=domdomdX/˙=domdomd/˙
10 8 9 syl DPsMetXd=DX/˙=domdomd/˙
11 fveq2 d=D~Metd=~MetD
12 1 11 eqtr4id d=D˙=~Metd
13 12 qseq2d d=Ddomdomd/˙=domdomd/~Metd
14 13 adantl DPsMetXd=Ddomdomd/˙=domdomd/~Metd
15 10 14 eqtr2d DPsMetXd=Ddomdomd/~Metd=X/˙
16 mpoeq12 domdomd/~Metd=X/˙domdomd/~Metd=X/˙adomdomd/~Metd,bdomdomd/~Metdz|xaybz=xdy=aX/˙,bX/˙z|xaybz=xdy
17 15 15 16 syl2anc DPsMetXd=Dadomdomd/~Metd,bdomdomd/~Metdz|xaybz=xdy=aX/˙,bX/˙z|xaybz=xdy
18 simp1r DPsMetXd=DaX/˙bX/˙d=D
19 18 oveqd DPsMetXd=DaX/˙bX/˙xdy=xDy
20 19 eqeq2d DPsMetXd=DaX/˙bX/˙z=xdyz=xDy
21 20 2rexbidv DPsMetXd=DaX/˙bX/˙xaybz=xdyxaybz=xDy
22 21 abbidv DPsMetXd=DaX/˙bX/˙z|xaybz=xdy=z|xaybz=xDy
23 22 unieqd DPsMetXd=DaX/˙bX/˙z|xaybz=xdy=z|xaybz=xDy
24 23 mpoeq3dva DPsMetXd=DaX/˙,bX/˙z|xaybz=xdy=aX/˙,bX/˙z|xaybz=xDy
25 17 24 eqtrd DPsMetXd=Dadomdomd/~Metd,bdomdomd/~Metdz|xaybz=xdy=aX/˙,bX/˙z|xaybz=xDy
26 elfvunirn DPsMetXDranPsMet
27 elfvex DPsMetXXV
28 qsexg XVX/˙V
29 27 28 syl DPsMetXX/˙V
30 mpoexga X/˙VX/˙VaX/˙,bX/˙z|xaybz=xDyV
31 29 29 30 syl2anc DPsMetXaX/˙,bX/˙z|xaybz=xDyV
32 2 25 26 31 fvmptd2 DPsMetXpstoMetD=aX/˙,bX/˙z|xaybz=xDy