| Step |
Hyp |
Ref |
Expression |
| 1 |
|
isdrng3.b |
|- B = ( Base ` R ) |
| 2 |
|
difss |
|- ( B \ X ) C_ B |
| 3 |
|
eqid |
|- ( ( mulGrp ` R ) |`s ( B \ X ) ) = ( ( mulGrp ` R ) |`s ( B \ X ) ) |
| 4 |
|
eqid |
|- ( mulGrp ` R ) = ( mulGrp ` R ) |
| 5 |
4 1
|
mgpbas |
|- B = ( Base ` ( mulGrp ` R ) ) |
| 6 |
3 5
|
ressbas2 |
|- ( ( B \ X ) C_ B -> ( B \ X ) = ( Base ` ( ( mulGrp ` R ) |`s ( B \ X ) ) ) ) |
| 7 |
6
|
eqcomd |
|- ( ( B \ X ) C_ B -> ( Base ` ( ( mulGrp ` R ) |`s ( B \ X ) ) ) = ( B \ X ) ) |
| 8 |
2 7
|
ax-mp |
|- ( Base ` ( ( mulGrp ` R ) |`s ( B \ X ) ) ) = ( B \ X ) |