Metamath Proof Explorer


Theorem abvdiv

Description: The absolute value distributes under division. (Contributed by Mario Carneiro, 10-Sep-2014)

Ref Expression
Hypotheses abv0.a A = AbsVal R
abvneg.b B = Base R
abvrec.z 0 ˙ = 0 R
abvdiv.p × ˙ = / r R
Assertion abvdiv R DivRing F A X B Y B Y 0 ˙ F X × ˙ Y = F X F Y

Proof

Step Hyp Ref Expression
1 abv0.a A = AbsVal R
2 abvneg.b B = Base R
3 abvrec.z 0 ˙ = 0 R
4 abvdiv.p × ˙ = / r R
5 simplr R DivRing F A X B Y B Y 0 ˙ F A
6 simpr1 R DivRing F A X B Y B Y 0 ˙ X B
7 simpll R DivRing F A X B Y B Y 0 ˙ R DivRing
8 simpr2 R DivRing F A X B Y B Y 0 ˙ Y B
9 simpr3 R DivRing F A X B Y B Y 0 ˙ Y 0 ˙
10 eqid inv r R = inv r R
11 2 3 10 drnginvrcl R DivRing Y B Y 0 ˙ inv r R Y B
12 7 8 9 11 syl3anc R DivRing F A X B Y B Y 0 ˙ inv r R Y B
13 eqid R = R
14 1 2 13 abvmul F A X B inv r R Y B F X R inv r R Y = F X F inv r R Y
15 5 6 12 14 syl3anc R DivRing F A X B Y B Y 0 ˙ F X R inv r R Y = F X F inv r R Y
16 1 2 3 10 abvrec R DivRing F A Y B Y 0 ˙ F inv r R Y = 1 F Y
17 16 3adantr1 R DivRing F A X B Y B Y 0 ˙ F inv r R Y = 1 F Y
18 17 oveq2d R DivRing F A X B Y B Y 0 ˙ F X F inv r R Y = F X 1 F Y
19 15 18 eqtrd R DivRing F A X B Y B Y 0 ˙ F X R inv r R Y = F X 1 F Y
20 eqid Unit R = Unit R
21 2 20 3 drngunit R DivRing Y Unit R Y B Y 0 ˙
22 7 21 syl R DivRing F A X B Y B Y 0 ˙ Y Unit R Y B Y 0 ˙
23 8 9 22 mpbir2and R DivRing F A X B Y B Y 0 ˙ Y Unit R
24 2 13 20 10 4 dvrval X B Y Unit R X × ˙ Y = X R inv r R Y
25 6 23 24 syl2anc R DivRing F A X B Y B Y 0 ˙ X × ˙ Y = X R inv r R Y
26 25 fveq2d R DivRing F A X B Y B Y 0 ˙ F X × ˙ Y = F X R inv r R Y
27 1 2 abvcl F A X B F X
28 5 6 27 syl2anc R DivRing F A X B Y B Y 0 ˙ F X
29 28 recnd R DivRing F A X B Y B Y 0 ˙ F X
30 1 2 abvcl F A Y B F Y
31 5 8 30 syl2anc R DivRing F A X B Y B Y 0 ˙ F Y
32 31 recnd R DivRing F A X B Y B Y 0 ˙ F Y
33 1 2 3 abvne0 F A Y B Y 0 ˙ F Y 0
34 5 8 9 33 syl3anc R DivRing F A X B Y B Y 0 ˙ F Y 0
35 29 32 34 divrecd R DivRing F A X B Y B Y 0 ˙ F X F Y = F X 1 F Y
36 19 26 35 3eqtr4d R DivRing F A X B Y B Y 0 ˙ F X × ˙ Y = F X F Y