Theorem ltdiv23neg 45580

Description: Swap denominator with other side of 'less than', when both are negative. (Contributed by Glauco Siliprandi, 26-Jun-2021.)

Hypotheses

Ref	Expression
ltdiv23neg.1	⊢ (𝜑 → 𝐴 ∈ ℝ)
ltdiv23neg.2	⊢ (𝜑 → 𝐵 ∈ ℝ)
ltdiv23neg.3	⊢ (𝜑 → 𝐵 < 0)
ltdiv23neg.4	⊢ (𝜑 → 𝐶 ∈ ℝ)
ltdiv23neg.5	⊢ (𝜑 → 𝐶 < 0)

Assertion

Ref	Expression
ltdiv23neg	⊢ (𝜑 → ((𝐴 / 𝐵) < 𝐶 ↔ (𝐴 / 𝐶) < 𝐵))

Proof of Theorem ltdiv23neg

Step	Hyp	Ref	Expression
1		ltdiv23neg.1	. . . 4 ⊢ (𝜑 → 𝐴 ∈ ℝ)
2		ltdiv23neg.2	. . . 4 ⊢ (𝜑 → 𝐵 ∈ ℝ)
3		ltdiv23neg.3	. . . . 5 ⊢ (𝜑 → 𝐵 < 0)
4	2, 3	ltned 11267	. . . 4 ⊢ (𝜑 → 𝐵 ≠ 0)
5	1, 2, 4	redivcld 11967	. . 3 ⊢ (𝜑 → (𝐴 / 𝐵) ∈ ℝ)
6		ltdiv23neg.4	. . 3 ⊢ (𝜑 → 𝐶 ∈ ℝ)
7	5, 6, 2, 3	ltmulneg 45578	. 2 ⊢ (𝜑 → ((𝐴 / 𝐵) < 𝐶 ↔ (𝐶 · 𝐵) < ((𝐴 / 𝐵) · 𝐵)))
8		recn 11114	. . . . 5 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
9	1, 8	syl 17	. . . 4 ⊢ (𝜑 → 𝐴 ∈ ℂ)
10		recn 11114	. . . . 5 ⊢ (𝐵 ∈ ℝ → 𝐵 ∈ ℂ)
11	2, 10	syl 17	. . . 4 ⊢ (𝜑 → 𝐵 ∈ ℂ)
12	9, 11, 4	divcan1d 11916	. . 3 ⊢ (𝜑 → ((𝐴 / 𝐵) · 𝐵) = 𝐴)
13	12	breq2d 5108	. 2 ⊢ (𝜑 → ((𝐶 · 𝐵) < ((𝐴 / 𝐵) · 𝐵) ↔ (𝐶 · 𝐵) < 𝐴))
14		remulcl 11109	. . . . 5 ⊢ ((𝐶 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐶 · 𝐵) ∈ ℝ)
15	6, 2, 14	syl2anc 584	. . . 4 ⊢ (𝜑 → (𝐶 · 𝐵) ∈ ℝ)
16		ltdiv23neg.5	. . . . . 6 ⊢ (𝜑 → 𝐶 < 0)
17	6, 16	ltned 11267	. . . . 5 ⊢ (𝜑 → 𝐶 ≠ 0)
18	6, 17	rereccld 11966	. . . 4 ⊢ (𝜑 → (1 / 𝐶) ∈ ℝ)
19	6, 16	reclt0d 45573	. . . 4 ⊢ (𝜑 → (1 / 𝐶) < 0)
20	15, 1, 18, 19	ltmulneg 45578	. . 3 ⊢ (𝜑 → ((𝐶 · 𝐵) < 𝐴 ↔ (𝐴 · (1 / 𝐶)) < ((𝐶 · 𝐵) · (1 / 𝐶))))
21		recn 11114	. . . . . . 7 ⊢ (𝐶 ∈ ℝ → 𝐶 ∈ ℂ)
22	6, 21	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ ℂ)
23	9, 22, 17	divrecd 11918	. . . . 5 ⊢ (𝜑 → (𝐴 / 𝐶) = (𝐴 · (1 / 𝐶)))
24	23	eqcomd 2740	. . . 4 ⊢ (𝜑 → (𝐴 · (1 / 𝐶)) = (𝐴 / 𝐶))
25	22, 11	mulcld 11150	. . . . . 6 ⊢ (𝜑 → (𝐶 · 𝐵) ∈ ℂ)
26	25, 22, 17	divrecd 11918	. . . . 5 ⊢ (𝜑 → ((𝐶 · 𝐵) / 𝐶) = ((𝐶 · 𝐵) · (1 / 𝐶)))
27		divcan3 11820	. . . . . . 7 ⊢ ((𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ ∧ 𝐶 ≠ 0) → ((𝐶 · 𝐵) / 𝐶) = 𝐵)
28	27	3expb 1120	. . . . . 6 ⊢ ((𝐵 ∈ ℂ ∧ (𝐶 ∈ ℂ ∧ 𝐶 ≠ 0)) → ((𝐶 · 𝐵) / 𝐶) = 𝐵)
29	11, 22, 17, 28	syl12anc 836	. . . . 5 ⊢ (𝜑 → ((𝐶 · 𝐵) / 𝐶) = 𝐵)
30	26, 29	eqtr3d 2771	. . . 4 ⊢ (𝜑 → ((𝐶 · 𝐵) · (1 / 𝐶)) = 𝐵)
31	24, 30	breq12d 5109	. . 3 ⊢ (𝜑 → ((𝐴 · (1 / 𝐶)) < ((𝐶 · 𝐵) · (1 / 𝐶)) ↔ (𝐴 / 𝐶) < 𝐵))
32	20, 31	bitrd 279	. 2 ⊢ (𝜑 → ((𝐶 · 𝐵) < 𝐴 ↔ (𝐴 / 𝐶) < 𝐵))
33	7, 13, 32	3bitrd 305	1 ⊢ (𝜑 → ((𝐴 / 𝐵) < 𝐶 ↔ (𝐴 / 𝐶) < 𝐵))

Syntax hints:   → wi 4   ↔ wb 206   = wceq 1541   ∈ wcel 2113   ≠ wne 2930   class class class wbr 5096  (class class class)co 7356  ℂcc 11022  ℝcr 11023  0cc0 11024  1c1 11025   · cmul 11029   < clt 11164   / cdiv 11792

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2706  ax-sep 5239  ax-nul 5249  ax-pow 5308  ax-pr 5375  ax-un 7678  ax-resscn 11081  ax-1cn 11082  ax-icn 11083  ax-addcl 11084  ax-addrcl 11085  ax-mulcl 11086  ax-mulrcl 11087  ax-mulcom 11088  ax-addass 11089  ax-mulass 11090  ax-distr 11091  ax-i2m1 11092  ax-1ne0 11093  ax-1rid 11094  ax-rnegex 11095  ax-rrecex 11096  ax-cnre 11097  ax-pre-lttri 11098  ax-pre-lttrn 11099  ax-pre-ltadd 11100  ax-pre-mulgt0 11101

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2809  df-nfc 2883  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3059  df-rmo 3348  df-reu 3349  df-rab 3398  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4579  df-pr 4581  df-op 4585  df-uni 4862  df-br 5097  df-opab 5159  df-mpt 5178  df-id 5517  df-po 5530  df-so 5531  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-er 8633  df-en 8882  df-dom 8883  df-sdom 8884  df-pnf 11166  df-mnf 11167  df-xr 11168  df-ltxr 11169  df-le 11170  df-sub 11364  df-neg 11365  df-div 11793  df-rp 12904

This theorem is referenced by:  pimrecltneg  46910