Metamath Proof Explorer


Theorem bnd2lem

Description: Lemma for equivbnd2 and similar theorems. (Contributed by Jeff Madsen, 16-Sep-2015)

Ref Expression
Hypothesis bnd2lem.1 D = M Y × Y
Assertion bnd2lem M Met X D Bnd Y Y X

Proof

Step Hyp Ref Expression
1 bnd2lem.1 D = M Y × Y
2 resss M Y × Y M
3 1 2 eqsstri D M
4 dmss D M dom D dom M
5 3 4 mp1i M Met X D Bnd Y dom D dom M
6 bndmet D Bnd Y D Met Y
7 metf D Met Y D : Y × Y
8 fdm D : Y × Y dom D = Y × Y
9 6 7 8 3syl D Bnd Y dom D = Y × Y
10 9 adantl M Met X D Bnd Y dom D = Y × Y
11 metf M Met X M : X × X
12 11 fdmd M Met X dom M = X × X
13 12 adantr M Met X D Bnd Y dom M = X × X
14 5 10 13 3sstr3d M Met X D Bnd Y Y × Y X × X
15 dmss Y × Y X × X dom Y × Y dom X × X
16 14 15 syl M Met X D Bnd Y dom Y × Y dom X × X
17 dmxpid dom Y × Y = Y
18 dmxpid dom X × X = X
19 16 17 18 3sstr3g M Met X D Bnd Y Y X