Metamath Proof Explorer


Theorem abvdom

Description: Any ring with an absolute value is a domain, which is to say that it contains no zero divisors. (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
abvdom.t · ˙ = R
Assertion abvdom F A X B X 0 ˙ Y B Y 0 ˙ X · ˙ Y 0 ˙

Proof

Step Hyp Ref Expression
1 abv0.a A = AbsVal R
2 abvneg.b B = Base R
3 abvrec.z 0 ˙ = 0 R
4 abvdom.t · ˙ = R
5 simp1 F A X B X 0 ˙ Y B Y 0 ˙ F A
6 simp2l F A X B X 0 ˙ Y B Y 0 ˙ X B
7 simp3l F A X B X 0 ˙ Y B Y 0 ˙ Y B
8 1 2 4 abvmul F A X B Y B F X · ˙ Y = F X F Y
9 5 6 7 8 syl3anc F A X B X 0 ˙ Y B Y 0 ˙ F X · ˙ Y = F X F Y
10 1 2 abvcl F A X B F X
11 5 6 10 syl2anc F A X B X 0 ˙ Y B Y 0 ˙ F X
12 11 recnd F A X B X 0 ˙ Y B Y 0 ˙ F X
13 1 2 abvcl F A Y B F Y
14 5 7 13 syl2anc F A X B X 0 ˙ Y B Y 0 ˙ F Y
15 14 recnd F A X B X 0 ˙ Y B Y 0 ˙ F Y
16 simp2r F A X B X 0 ˙ Y B Y 0 ˙ X 0 ˙
17 1 2 3 abvne0 F A X B X 0 ˙ F X 0
18 5 6 16 17 syl3anc F A X B X 0 ˙ Y B Y 0 ˙ F X 0
19 simp3r F A X B X 0 ˙ Y B Y 0 ˙ Y 0 ˙
20 1 2 3 abvne0 F A Y B Y 0 ˙ F Y 0
21 5 7 19 20 syl3anc F A X B X 0 ˙ Y B Y 0 ˙ F Y 0
22 12 15 18 21 mulne0d F A X B X 0 ˙ Y B Y 0 ˙ F X F Y 0
23 9 22 eqnetrd F A X B X 0 ˙ Y B Y 0 ˙ F X · ˙ Y 0
24 1 3 abv0 F A F 0 ˙ = 0
25 5 24 syl F A X B X 0 ˙ Y B Y 0 ˙ F 0 ˙ = 0
26 fveqeq2 X · ˙ Y = 0 ˙ F X · ˙ Y = 0 F 0 ˙ = 0
27 25 26 syl5ibrcom F A X B X 0 ˙ Y B Y 0 ˙ X · ˙ Y = 0 ˙ F X · ˙ Y = 0
28 27 necon3d F A X B X 0 ˙ Y B Y 0 ˙ F X · ˙ Y 0 X · ˙ Y 0 ˙
29 23 28 mpd F A X B X 0 ˙ Y B Y 0 ˙ X · ˙ Y 0 ˙