Metamath Proof Explorer


Theorem mulsuble0b

Description: A condition for multiplication of subtraction to be nonpositive. (Contributed by Scott Fenton, 25-Jun-2013)

Ref Expression
Assertion mulsuble0b ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( ( 𝐴𝐵 ) · ( 𝐶𝐵 ) ) ≤ 0 ↔ ( ( 𝐴𝐵𝐵𝐶 ) ∨ ( 𝐶𝐵𝐵𝐴 ) ) ) )

Proof

Step Hyp Ref Expression
1 resubcl ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ) → ( 𝐴𝐵 ) ∈ ℝ )
2 1 3adant3 ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( 𝐴𝐵 ) ∈ ℝ )
3 resubcl ( ( 𝐶 ∈ ℝ ∧ 𝐵 ∈ ℝ ) → ( 𝐶𝐵 ) ∈ ℝ )
4 3 ancoms ( ( 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( 𝐶𝐵 ) ∈ ℝ )
5 4 3adant1 ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( 𝐶𝐵 ) ∈ ℝ )
6 mulle0b ( ( ( 𝐴𝐵 ) ∈ ℝ ∧ ( 𝐶𝐵 ) ∈ ℝ ) → ( ( ( 𝐴𝐵 ) · ( 𝐶𝐵 ) ) ≤ 0 ↔ ( ( ( 𝐴𝐵 ) ≤ 0 ∧ 0 ≤ ( 𝐶𝐵 ) ) ∨ ( 0 ≤ ( 𝐴𝐵 ) ∧ ( 𝐶𝐵 ) ≤ 0 ) ) ) )
7 2 5 6 syl2anc ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( ( 𝐴𝐵 ) · ( 𝐶𝐵 ) ) ≤ 0 ↔ ( ( ( 𝐴𝐵 ) ≤ 0 ∧ 0 ≤ ( 𝐶𝐵 ) ) ∨ ( 0 ≤ ( 𝐴𝐵 ) ∧ ( 𝐶𝐵 ) ≤ 0 ) ) ) )
8 suble0 ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ) → ( ( 𝐴𝐵 ) ≤ 0 ↔ 𝐴𝐵 ) )
9 8 3adant3 ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( 𝐴𝐵 ) ≤ 0 ↔ 𝐴𝐵 ) )
10 subge0 ( ( 𝐶 ∈ ℝ ∧ 𝐵 ∈ ℝ ) → ( 0 ≤ ( 𝐶𝐵 ) ↔ 𝐵𝐶 ) )
11 10 ancoms ( ( 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( 0 ≤ ( 𝐶𝐵 ) ↔ 𝐵𝐶 ) )
12 11 3adant1 ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( 0 ≤ ( 𝐶𝐵 ) ↔ 𝐵𝐶 ) )
13 9 12 anbi12d ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( ( 𝐴𝐵 ) ≤ 0 ∧ 0 ≤ ( 𝐶𝐵 ) ) ↔ ( 𝐴𝐵𝐵𝐶 ) ) )
14 subge0 ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ) → ( 0 ≤ ( 𝐴𝐵 ) ↔ 𝐵𝐴 ) )
15 14 3adant3 ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( 0 ≤ ( 𝐴𝐵 ) ↔ 𝐵𝐴 ) )
16 suble0 ( ( 𝐶 ∈ ℝ ∧ 𝐵 ∈ ℝ ) → ( ( 𝐶𝐵 ) ≤ 0 ↔ 𝐶𝐵 ) )
17 16 ancoms ( ( 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( 𝐶𝐵 ) ≤ 0 ↔ 𝐶𝐵 ) )
18 17 3adant1 ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( 𝐶𝐵 ) ≤ 0 ↔ 𝐶𝐵 ) )
19 15 18 anbi12d ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( 0 ≤ ( 𝐴𝐵 ) ∧ ( 𝐶𝐵 ) ≤ 0 ) ↔ ( 𝐵𝐴𝐶𝐵 ) ) )
20 19 biancomd ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( 0 ≤ ( 𝐴𝐵 ) ∧ ( 𝐶𝐵 ) ≤ 0 ) ↔ ( 𝐶𝐵𝐵𝐴 ) ) )
21 13 20 orbi12d ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( ( ( 𝐴𝐵 ) ≤ 0 ∧ 0 ≤ ( 𝐶𝐵 ) ) ∨ ( 0 ≤ ( 𝐴𝐵 ) ∧ ( 𝐶𝐵 ) ≤ 0 ) ) ↔ ( ( 𝐴𝐵𝐵𝐶 ) ∨ ( 𝐶𝐵𝐵𝐴 ) ) ) )
22 7 21 bitrd ( ( 𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ) → ( ( ( 𝐴𝐵 ) · ( 𝐶𝐵 ) ) ≤ 0 ↔ ( ( 𝐴𝐵𝐵𝐶 ) ∨ ( 𝐶𝐵𝐵𝐴 ) ) ) )