| Step |
Hyp |
Ref |
Expression |
| 1 |
|
eqid |
|- ( k e. A |-> B ) = ( k e. A |-> B ) |
| 2 |
1
|
fvmpt2i |
|- ( k e. A -> ( ( k e. A |-> B ) ` k ) = ( _I ` B ) ) |
| 3 |
2
|
prodeq2i |
|- prod_ k e. A ( ( k e. A |-> B ) ` k ) = prod_ k e. A ( _I ` B ) |
| 4 |
|
nffvmpt1 |
|- F/_ k ( ( k e. A |-> B ) ` j ) |
| 5 |
|
nfcv |
|- F/_ j ( ( k e. A |-> B ) ` k ) |
| 6 |
|
fveq2 |
|- ( j = k -> ( ( k e. A |-> B ) ` j ) = ( ( k e. A |-> B ) ` k ) ) |
| 7 |
4 5 6
|
cbvprodi |
|- prod_ j e. A ( ( k e. A |-> B ) ` j ) = prod_ k e. A ( ( k e. A |-> B ) ` k ) |
| 8 |
|
prod2id |
|- prod_ k e. A B = prod_ k e. A ( _I ` B ) |
| 9 |
3 7 8
|
3eqtr4i |
|- prod_ j e. A ( ( k e. A |-> B ) ` j ) = prod_ k e. A B |