Step |
Hyp |
Ref |
Expression |
1 |
|
df2idl2rng.u |
|- U = ( 2Ideal ` R ) |
2 |
|
df2idl2rng.b |
|- B = ( Base ` R ) |
3 |
|
df2idl2rng.t |
|- .x. = ( .r ` R ) |
4 |
1
|
eleq2i |
|- ( I e. U <-> I e. ( 2Ideal ` R ) ) |
5 |
4
|
biimpi |
|- ( I e. U -> I e. ( 2Ideal ` R ) ) |
6 |
5
|
2idllidld |
|- ( I e. U -> I e. ( LIdeal ` R ) ) |
7 |
|
eqid |
|- ( LIdeal ` R ) = ( LIdeal ` R ) |
8 |
7
|
lidlsubg |
|- ( ( R e. Ring /\ I e. ( LIdeal ` R ) ) -> I e. ( SubGrp ` R ) ) |
9 |
6 8
|
sylan2 |
|- ( ( R e. Ring /\ I e. U ) -> I e. ( SubGrp ` R ) ) |
10 |
|
ringrng |
|- ( R e. Ring -> R e. Rng ) |
11 |
1 2 3
|
df2idl2rng |
|- ( ( R e. Rng /\ I e. ( SubGrp ` R ) ) -> ( I e. U <-> A. x e. B A. y e. I ( ( x .x. y ) e. I /\ ( y .x. x ) e. I ) ) ) |
12 |
10 11
|
sylan |
|- ( ( R e. Ring /\ I e. ( SubGrp ` R ) ) -> ( I e. U <-> A. x e. B A. y e. I ( ( x .x. y ) e. I /\ ( y .x. x ) e. I ) ) ) |
13 |
9 12
|
biadanid |
|- ( R e. Ring -> ( I e. U <-> ( I e. ( SubGrp ` R ) /\ A. x e. B A. y e. I ( ( x .x. y ) e. I /\ ( y .x. x ) e. I ) ) ) ) |