Step |
Hyp |
Ref |
Expression |
1 |
|
isvcOLD.1 |
โข ๐ = ran ๐บ |
2 |
|
vcex |
โข ( โจ ๐บ , ๐ โฉ โ CVecOLD โ ( ๐บ โ V โง ๐ โ V ) ) |
3 |
|
elex |
โข ( ๐บ โ AbelOp โ ๐บ โ V ) |
4 |
3
|
adantr |
โข ( ( ๐บ โ AbelOp โง ๐ : ( โ ร ๐ ) โถ ๐ ) โ ๐บ โ V ) |
5 |
|
cnex |
โข โ โ V |
6 |
|
ablogrpo |
โข ( ๐บ โ AbelOp โ ๐บ โ GrpOp ) |
7 |
|
rnexg |
โข ( ๐บ โ GrpOp โ ran ๐บ โ V ) |
8 |
1 7
|
eqeltrid |
โข ( ๐บ โ GrpOp โ ๐ โ V ) |
9 |
6 8
|
syl |
โข ( ๐บ โ AbelOp โ ๐ โ V ) |
10 |
|
xpexg |
โข ( ( โ โ V โง ๐ โ V ) โ ( โ ร ๐ ) โ V ) |
11 |
5 9 10
|
sylancr |
โข ( ๐บ โ AbelOp โ ( โ ร ๐ ) โ V ) |
12 |
|
fex |
โข ( ( ๐ : ( โ ร ๐ ) โถ ๐ โง ( โ ร ๐ ) โ V ) โ ๐ โ V ) |
13 |
11 12
|
sylan2 |
โข ( ( ๐ : ( โ ร ๐ ) โถ ๐ โง ๐บ โ AbelOp ) โ ๐ โ V ) |
14 |
13
|
ancoms |
โข ( ( ๐บ โ AbelOp โง ๐ : ( โ ร ๐ ) โถ ๐ ) โ ๐ โ V ) |
15 |
4 14
|
jca |
โข ( ( ๐บ โ AbelOp โง ๐ : ( โ ร ๐ ) โถ ๐ ) โ ( ๐บ โ V โง ๐ โ V ) ) |
16 |
15
|
3adant3 |
โข ( ( ๐บ โ AbelOp โง ๐ : ( โ ร ๐ ) โถ ๐ โง โ ๐ฅ โ ๐ ( ( 1 ๐ ๐ฅ ) = ๐ฅ โง โ ๐ฆ โ โ ( โ ๐ง โ ๐ ( ๐ฆ ๐ ( ๐ฅ ๐บ ๐ง ) ) = ( ( ๐ฆ ๐ ๐ฅ ) ๐บ ( ๐ฆ ๐ ๐ง ) ) โง โ ๐ง โ โ ( ( ( ๐ฆ + ๐ง ) ๐ ๐ฅ ) = ( ( ๐ฆ ๐ ๐ฅ ) ๐บ ( ๐ง ๐ ๐ฅ ) ) โง ( ( ๐ฆ ยท ๐ง ) ๐ ๐ฅ ) = ( ๐ฆ ๐ ( ๐ง ๐ ๐ฅ ) ) ) ) ) ) โ ( ๐บ โ V โง ๐ โ V ) ) |
17 |
1
|
isvclem |
โข ( ( ๐บ โ V โง ๐ โ V ) โ ( โจ ๐บ , ๐ โฉ โ CVecOLD โ ( ๐บ โ AbelOp โง ๐ : ( โ ร ๐ ) โถ ๐ โง โ ๐ฅ โ ๐ ( ( 1 ๐ ๐ฅ ) = ๐ฅ โง โ ๐ฆ โ โ ( โ ๐ง โ ๐ ( ๐ฆ ๐ ( ๐ฅ ๐บ ๐ง ) ) = ( ( ๐ฆ ๐ ๐ฅ ) ๐บ ( ๐ฆ ๐ ๐ง ) ) โง โ ๐ง โ โ ( ( ( ๐ฆ + ๐ง ) ๐ ๐ฅ ) = ( ( ๐ฆ ๐ ๐ฅ ) ๐บ ( ๐ง ๐ ๐ฅ ) ) โง ( ( ๐ฆ ยท ๐ง ) ๐ ๐ฅ ) = ( ๐ฆ ๐ ( ๐ง ๐ ๐ฅ ) ) ) ) ) ) ) ) |
18 |
2 16 17
|
pm5.21nii |
โข ( โจ ๐บ , ๐ โฉ โ CVecOLD โ ( ๐บ โ AbelOp โง ๐ : ( โ ร ๐ ) โถ ๐ โง โ ๐ฅ โ ๐ ( ( 1 ๐ ๐ฅ ) = ๐ฅ โง โ ๐ฆ โ โ ( โ ๐ง โ ๐ ( ๐ฆ ๐ ( ๐ฅ ๐บ ๐ง ) ) = ( ( ๐ฆ ๐ ๐ฅ ) ๐บ ( ๐ฆ ๐ ๐ง ) ) โง โ ๐ง โ โ ( ( ( ๐ฆ + ๐ง ) ๐ ๐ฅ ) = ( ( ๐ฆ ๐ ๐ฅ ) ๐บ ( ๐ง ๐ ๐ฅ ) ) โง ( ( ๐ฆ ยท ๐ง ) ๐ ๐ฅ ) = ( ๐ฆ ๐ ( ๐ง ๐ ๐ฅ ) ) ) ) ) ) ) |