Step |
Hyp |
Ref |
Expression |
1 |
|
dvrdir.b |
|
2 |
|
dvrdir.u |
|
3 |
|
dvrdir.p |
|
4 |
|
dvrdir.t |
|
5 |
|
simpl |
|
6 |
|
simpr1 |
|
7 |
|
simpr2 |
|
8 |
1 2
|
unitss |
|
9 |
|
simpr3 |
|
10 |
|
eqid |
|
11 |
2 10
|
unitinvcl |
|
12 |
9 11
|
syldan |
|
13 |
8 12
|
sselid |
|
14 |
|
eqid |
|
15 |
1 3 14
|
ringdir |
|
16 |
5 6 7 13 15
|
syl13anc |
|
17 |
|
ringgrp |
|
18 |
17
|
adantr |
|
19 |
1 3
|
grpcl |
|
20 |
18 6 7 19
|
syl3anc |
|
21 |
1 14 2 10 4
|
dvrval |
|
22 |
20 9 21
|
syl2anc |
|
23 |
1 14 2 10 4
|
dvrval |
|
24 |
6 9 23
|
syl2anc |
|
25 |
1 14 2 10 4
|
dvrval |
|
26 |
7 9 25
|
syl2anc |
|
27 |
24 26
|
oveq12d |
|
28 |
16 22 27
|
3eqtr4d |
|