| Step |
Hyp |
Ref |
Expression |
| 1 |
|
hoissrrn.1 |
|- ( ph -> I : X --> ( RR X. RR ) ) |
| 2 |
|
fvex |
|- ( ( [,) o. I ) ` k ) e. _V |
| 3 |
2
|
rgenw |
|- A. k e. X ( ( [,) o. I ) ` k ) e. _V |
| 4 |
|
ixpssmapg |
|- ( A. k e. X ( ( [,) o. I ) ` k ) e. _V -> X_ k e. X ( ( [,) o. I ) ` k ) C_ ( U_ k e. X ( ( [,) o. I ) ` k ) ^m X ) ) |
| 5 |
3 4
|
ax-mp |
|- X_ k e. X ( ( [,) o. I ) ` k ) C_ ( U_ k e. X ( ( [,) o. I ) ` k ) ^m X ) |
| 6 |
5
|
a1i |
|- ( ph -> X_ k e. X ( ( [,) o. I ) ` k ) C_ ( U_ k e. X ( ( [,) o. I ) ` k ) ^m X ) ) |
| 7 |
|
reex |
|- RR e. _V |
| 8 |
7
|
a1i |
|- ( ph -> RR e. _V ) |
| 9 |
1
|
hoissre |
|- ( ( ph /\ k e. X ) -> ( ( [,) o. I ) ` k ) C_ RR ) |
| 10 |
9
|
ralrimiva |
|- ( ph -> A. k e. X ( ( [,) o. I ) ` k ) C_ RR ) |
| 11 |
|
iunss |
|- ( U_ k e. X ( ( [,) o. I ) ` k ) C_ RR <-> A. k e. X ( ( [,) o. I ) ` k ) C_ RR ) |
| 12 |
10 11
|
sylibr |
|- ( ph -> U_ k e. X ( ( [,) o. I ) ` k ) C_ RR ) |
| 13 |
|
mapss |
|- ( ( RR e. _V /\ U_ k e. X ( ( [,) o. I ) ` k ) C_ RR ) -> ( U_ k e. X ( ( [,) o. I ) ` k ) ^m X ) C_ ( RR ^m X ) ) |
| 14 |
8 12 13
|
syl2anc |
|- ( ph -> ( U_ k e. X ( ( [,) o. I ) ` k ) ^m X ) C_ ( RR ^m X ) ) |
| 15 |
6 14
|
sstrd |
|- ( ph -> X_ k e. X ( ( [,) o. I ) ` k ) C_ ( RR ^m X ) ) |