Step |
Hyp |
Ref |
Expression |
1 |
|
xpeq2 |
โข ( ๐ต = if ( ๐ต โ Fin , ๐ต , โ
) โ ( ๐ด ร ๐ต ) = ( ๐ด ร if ( ๐ต โ Fin , ๐ต , โ
) ) ) |
2 |
1
|
fveq2d |
โข ( ๐ต = if ( ๐ต โ Fin , ๐ต , โ
) โ ( โฏ โ ( ๐ด ร ๐ต ) ) = ( โฏ โ ( ๐ด ร if ( ๐ต โ Fin , ๐ต , โ
) ) ) ) |
3 |
|
fveq2 |
โข ( ๐ต = if ( ๐ต โ Fin , ๐ต , โ
) โ ( โฏ โ ๐ต ) = ( โฏ โ if ( ๐ต โ Fin , ๐ต , โ
) ) ) |
4 |
3
|
oveq2d |
โข ( ๐ต = if ( ๐ต โ Fin , ๐ต , โ
) โ ( ( โฏ โ ๐ด ) ยท ( โฏ โ ๐ต ) ) = ( ( โฏ โ ๐ด ) ยท ( โฏ โ if ( ๐ต โ Fin , ๐ต , โ
) ) ) ) |
5 |
2 4
|
eqeq12d |
โข ( ๐ต = if ( ๐ต โ Fin , ๐ต , โ
) โ ( ( โฏ โ ( ๐ด ร ๐ต ) ) = ( ( โฏ โ ๐ด ) ยท ( โฏ โ ๐ต ) ) โ ( โฏ โ ( ๐ด ร if ( ๐ต โ Fin , ๐ต , โ
) ) ) = ( ( โฏ โ ๐ด ) ยท ( โฏ โ if ( ๐ต โ Fin , ๐ต , โ
) ) ) ) ) |
6 |
5
|
imbi2d |
โข ( ๐ต = if ( ๐ต โ Fin , ๐ต , โ
) โ ( ( ๐ด โ Fin โ ( โฏ โ ( ๐ด ร ๐ต ) ) = ( ( โฏ โ ๐ด ) ยท ( โฏ โ ๐ต ) ) ) โ ( ๐ด โ Fin โ ( โฏ โ ( ๐ด ร if ( ๐ต โ Fin , ๐ต , โ
) ) ) = ( ( โฏ โ ๐ด ) ยท ( โฏ โ if ( ๐ต โ Fin , ๐ต , โ
) ) ) ) ) ) |
7 |
|
0fin |
โข โ
โ Fin |
8 |
7
|
elimel |
โข if ( ๐ต โ Fin , ๐ต , โ
) โ Fin |
9 |
8
|
hashxplem |
โข ( ๐ด โ Fin โ ( โฏ โ ( ๐ด ร if ( ๐ต โ Fin , ๐ต , โ
) ) ) = ( ( โฏ โ ๐ด ) ยท ( โฏ โ if ( ๐ต โ Fin , ๐ต , โ
) ) ) ) |
10 |
6 9
|
dedth |
โข ( ๐ต โ Fin โ ( ๐ด โ Fin โ ( โฏ โ ( ๐ด ร ๐ต ) ) = ( ( โฏ โ ๐ด ) ยท ( โฏ โ ๐ต ) ) ) ) |
11 |
10
|
impcom |
โข ( ( ๐ด โ Fin โง ๐ต โ Fin ) โ ( โฏ โ ( ๐ด ร ๐ต ) ) = ( ( โฏ โ ๐ด ) ยท ( โฏ โ ๐ต ) ) ) |