Metamath Proof Explorer


Theorem ustuqtop0

Description: Lemma for ustuqtop . (Contributed by Thierry Arnoux, 11-Jan-2018)

Ref Expression
Hypothesis utopustuq.1 N=pXranvUvp
Assertion ustuqtop0 UUnifOnXN:X𝒫𝒫X

Proof

Step Hyp Ref Expression
1 utopustuq.1 N=pXranvUvp
2 ustimasn UUnifOnXvUpXvpX
3 2 3expa UUnifOnXvUpXvpX
4 3 an32s UUnifOnXpXvUvpX
5 vex vV
6 5 imaex vpV
7 6 elpw vp𝒫XvpX
8 4 7 sylibr UUnifOnXpXvUvp𝒫X
9 8 ralrimiva UUnifOnXpXvUvp𝒫X
10 eqid vUvp=vUvp
11 10 rnmptss vUvp𝒫XranvUvp𝒫X
12 9 11 syl UUnifOnXpXranvUvp𝒫X
13 mptexg UUnifOnXvUvpV
14 rnexg vUvpVranvUvpV
15 elpwg ranvUvpVranvUvp𝒫𝒫XranvUvp𝒫X
16 13 14 15 3syl UUnifOnXranvUvp𝒫𝒫XranvUvp𝒫X
17 16 adantr UUnifOnXpXranvUvp𝒫𝒫XranvUvp𝒫X
18 12 17 mpbird UUnifOnXpXranvUvp𝒫𝒫X
19 18 1 fmptd UUnifOnXN:X𝒫𝒫X