Metamath Proof Explorer


Theorem ressuss

Description: Value of the uniform structure of a restricted space. (Contributed by Thierry Arnoux, 12-Dec-2017)

Ref Expression
Assertion ressuss A V UnifSt W 𝑠 A = UnifSt W 𝑡 A × A

Proof

Step Hyp Ref Expression
1 eqid Base W = Base W
2 eqid UnifSet W = UnifSet W
3 1 2 ussval UnifSet W 𝑡 Base W × Base W = UnifSt W
4 3 oveq1i UnifSet W 𝑡 Base W × Base W 𝑡 A × A = UnifSt W 𝑡 A × A
5 fvex UnifSet W V
6 fvex Base W V
7 6 6 xpex Base W × Base W V
8 sqxpexg A V A × A V
9 restco UnifSet W V Base W × Base W V A × A V UnifSet W 𝑡 Base W × Base W 𝑡 A × A = UnifSet W 𝑡 Base W × Base W A × A
10 5 7 8 9 mp3an12i A V UnifSet W 𝑡 Base W × Base W 𝑡 A × A = UnifSet W 𝑡 Base W × Base W A × A
11 4 10 eqtr3id A V UnifSt W 𝑡 A × A = UnifSet W 𝑡 Base W × Base W A × A
12 inxp Base W × Base W A × A = Base W A × Base W A
13 incom A Base W = Base W A
14 eqid W 𝑠 A = W 𝑠 A
15 14 1 ressbas A V A Base W = Base W 𝑠 A
16 13 15 eqtr3id A V Base W A = Base W 𝑠 A
17 16 sqxpeqd A V Base W A × Base W A = Base W 𝑠 A × Base W 𝑠 A
18 12 17 eqtrid A V Base W × Base W A × A = Base W 𝑠 A × Base W 𝑠 A
19 18 oveq2d A V UnifSet W 𝑡 Base W × Base W A × A = UnifSet W 𝑡 Base W 𝑠 A × Base W 𝑠 A
20 14 2 ressunif A V UnifSet W = UnifSet W 𝑠 A
21 20 oveq1d A V UnifSet W 𝑡 Base W 𝑠 A × Base W 𝑠 A = UnifSet W 𝑠 A 𝑡 Base W 𝑠 A × Base W 𝑠 A
22 eqid Base W 𝑠 A = Base W 𝑠 A
23 eqid UnifSet W 𝑠 A = UnifSet W 𝑠 A
24 22 23 ussval UnifSet W 𝑠 A 𝑡 Base W 𝑠 A × Base W 𝑠 A = UnifSt W 𝑠 A
25 24 a1i A V UnifSet W 𝑠 A 𝑡 Base W 𝑠 A × Base W 𝑠 A = UnifSt W 𝑠 A
26 19 21 25 3eqtrd A V UnifSet W 𝑡 Base W × Base W A × A = UnifSt W 𝑠 A
27 11 26 eqtr2d A V UnifSt W 𝑠 A = UnifSt W 𝑡 A × A