ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  reapmul1 GIF version

Theorem reapmul1 7990
Description: Multiplication of both sides of real apartness by a real number apart from zero. Special case of apmul1 8171. (Contributed by Jim Kingdon, 8-Feb-2020.)
Assertion
Ref Expression
reapmul1 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 # 0)) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))

Proof of Theorem reapmul1
StepHypRef Expression
1 0re 7409 . . . . 5 0 ∈ ℝ
2 reaplt 7983 . . . . 5 ((𝐶 ∈ ℝ ∧ 0 ∈ ℝ) → (𝐶 # 0 ↔ (𝐶 < 0 ∨ 0 < 𝐶)))
31, 2mpan2 416 . . . 4 (𝐶 ∈ ℝ → (𝐶 # 0 ↔ (𝐶 < 0 ∨ 0 < 𝐶)))
43pm5.32i 442 . . 3 ((𝐶 ∈ ℝ ∧ 𝐶 # 0) ↔ (𝐶 ∈ ℝ ∧ (𝐶 < 0 ∨ 0 < 𝐶)))
5 simp1 941 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → 𝐴 ∈ ℝ)
65recnd 7437 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → 𝐴 ∈ ℂ)
7 simp3l 969 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → 𝐶 ∈ ℝ)
87recnd 7437 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → 𝐶 ∈ ℂ)
96, 8mulneg2d 7811 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (𝐴 · -𝐶) = -(𝐴 · 𝐶))
10 simp2 942 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → 𝐵 ∈ ℝ)
1110recnd 7437 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → 𝐵 ∈ ℂ)
1211, 8mulneg2d 7811 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (𝐵 · -𝐶) = -(𝐵 · 𝐶))
139, 12breq12d 3827 . . . . . . . 8 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → ((𝐴 · -𝐶) # (𝐵 · -𝐶) ↔ -(𝐴 · 𝐶) # -(𝐵 · 𝐶)))
147renegcld 7779 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → -𝐶 ∈ ℝ)
15 simp3r 970 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → 𝐶 < 0)
167lt0neg1d 7911 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (𝐶 < 0 ↔ 0 < -𝐶))
1715, 16mpbid 145 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → 0 < -𝐶)
18 reapmul1lem 7989 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (-𝐶 ∈ ℝ ∧ 0 < -𝐶)) → (𝐴 # 𝐵 ↔ (𝐴 · -𝐶) # (𝐵 · -𝐶)))
195, 10, 14, 17, 18syl112anc 1176 . . . . . . . 8 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (𝐴 # 𝐵 ↔ (𝐴 · -𝐶) # (𝐵 · -𝐶)))
205, 7remulcld 7439 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (𝐴 · 𝐶) ∈ ℝ)
2110, 7remulcld 7439 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (𝐵 · 𝐶) ∈ ℝ)
2220, 21ltnegd 7918 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → ((𝐴 · 𝐶) < (𝐵 · 𝐶) ↔ -(𝐵 · 𝐶) < -(𝐴 · 𝐶)))
2321, 20ltnegd 7918 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → ((𝐵 · 𝐶) < (𝐴 · 𝐶) ↔ -(𝐴 · 𝐶) < -(𝐵 · 𝐶)))
2422, 23orbi12d 740 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (((𝐴 · 𝐶) < (𝐵 · 𝐶) ∨ (𝐵 · 𝐶) < (𝐴 · 𝐶)) ↔ (-(𝐵 · 𝐶) < -(𝐴 · 𝐶) ∨ -(𝐴 · 𝐶) < -(𝐵 · 𝐶))))
25 reaplt 7983 . . . . . . . . . 10 (((𝐴 · 𝐶) ∈ ℝ ∧ (𝐵 · 𝐶) ∈ ℝ) → ((𝐴 · 𝐶) # (𝐵 · 𝐶) ↔ ((𝐴 · 𝐶) < (𝐵 · 𝐶) ∨ (𝐵 · 𝐶) < (𝐴 · 𝐶))))
2620, 21, 25syl2anc 403 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → ((𝐴 · 𝐶) # (𝐵 · 𝐶) ↔ ((𝐴 · 𝐶) < (𝐵 · 𝐶) ∨ (𝐵 · 𝐶) < (𝐴 · 𝐶))))
2720renegcld 7779 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → -(𝐴 · 𝐶) ∈ ℝ)
2821renegcld 7779 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → -(𝐵 · 𝐶) ∈ ℝ)
29 reaplt 7983 . . . . . . . . . . 11 ((-(𝐴 · 𝐶) ∈ ℝ ∧ -(𝐵 · 𝐶) ∈ ℝ) → (-(𝐴 · 𝐶) # -(𝐵 · 𝐶) ↔ (-(𝐴 · 𝐶) < -(𝐵 · 𝐶) ∨ -(𝐵 · 𝐶) < -(𝐴 · 𝐶))))
3027, 28, 29syl2anc 403 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (-(𝐴 · 𝐶) # -(𝐵 · 𝐶) ↔ (-(𝐴 · 𝐶) < -(𝐵 · 𝐶) ∨ -(𝐵 · 𝐶) < -(𝐴 · 𝐶))))
31 orcom 680 . . . . . . . . . 10 ((-(𝐴 · 𝐶) < -(𝐵 · 𝐶) ∨ -(𝐵 · 𝐶) < -(𝐴 · 𝐶)) ↔ (-(𝐵 · 𝐶) < -(𝐴 · 𝐶) ∨ -(𝐴 · 𝐶) < -(𝐵 · 𝐶)))
3230, 31syl6bb 194 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (-(𝐴 · 𝐶) # -(𝐵 · 𝐶) ↔ (-(𝐵 · 𝐶) < -(𝐴 · 𝐶) ∨ -(𝐴 · 𝐶) < -(𝐵 · 𝐶))))
3324, 26, 323bitr4d 218 . . . . . . . 8 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → ((𝐴 · 𝐶) # (𝐵 · 𝐶) ↔ -(𝐴 · 𝐶) # -(𝐵 · 𝐶)))
3413, 19, 333bitr4d 218 . . . . . . 7 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
35343expa 1141 . . . . . 6 (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐶 < 0)) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
3635anassrs 392 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐶 ∈ ℝ) ∧ 𝐶 < 0) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
37 reapmul1lem 7989 . . . . . . 7 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 0 < 𝐶)) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
38373expa 1141 . . . . . 6 (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 0 < 𝐶)) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
3938anassrs 392 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐶 ∈ ℝ) ∧ 0 < 𝐶) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
4036, 39jaodan 744 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐶 ∈ ℝ) ∧ (𝐶 < 0 ∨ 0 < 𝐶)) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
4140anasss 391 . . 3 (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ (𝐶 < 0 ∨ 0 < 𝐶))) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
424, 41sylan2b 281 . 2 (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐶 # 0)) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
43423impa 1136 1 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ (𝐶 ∈ ℝ ∧ 𝐶 # 0)) → (𝐴 # 𝐵 ↔ (𝐴 · 𝐶) # (𝐵 · 𝐶)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  wb 103  wo 662  w3a 922  wcel 1436   class class class wbr 3814  (class class class)co 5594  cr 7270  0cc0 7271   · cmul 7276   < clt 7443  -cneg 7575   # cap 7976
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 577  ax-in2 578  ax-io 663  ax-5 1379  ax-7 1380  ax-gen 1381  ax-ie1 1425  ax-ie2 1426  ax-8 1438  ax-10 1439  ax-11 1440  ax-i12 1441  ax-bndl 1442  ax-4 1443  ax-13 1447  ax-14 1448  ax-17 1462  ax-i9 1466  ax-ial 1470  ax-i5r 1471  ax-ext 2067  ax-sep 3925  ax-pow 3977  ax-pr 4003  ax-un 4227  ax-setind 4319  ax-cnex 7357  ax-resscn 7358  ax-1cn 7359  ax-1re 7360  ax-icn 7361  ax-addcl 7362  ax-addrcl 7363  ax-mulcl 7364  ax-mulrcl 7365  ax-addcom 7366  ax-mulcom 7367  ax-addass 7368  ax-mulass 7369  ax-distr 7370  ax-i2m1 7371  ax-0lt1 7372  ax-1rid 7373  ax-0id 7374  ax-rnegex 7375  ax-precex 7376  ax-cnre 7377  ax-pre-ltirr 7378  ax-pre-lttrn 7380  ax-pre-apti 7381  ax-pre-ltadd 7382  ax-pre-mulgt0 7383
This theorem depends on definitions:  df-bi 115  df-3an 924  df-tru 1290  df-fal 1293  df-nf 1393  df-sb 1690  df-eu 1948  df-mo 1949  df-clab 2072  df-cleq 2078  df-clel 2081  df-nfc 2214  df-ne 2252  df-nel 2347  df-ral 2360  df-rex 2361  df-reu 2362  df-rab 2364  df-v 2616  df-sbc 2829  df-dif 2988  df-un 2990  df-in 2992  df-ss 2999  df-pw 3411  df-sn 3431  df-pr 3432  df-op 3434  df-uni 3631  df-br 3815  df-opab 3869  df-id 4087  df-xp 4410  df-rel 4411  df-cnv 4412  df-co 4413  df-dm 4414  df-iota 4937  df-fun 4974  df-fv 4980  df-riota 5550  df-ov 5597  df-oprab 5598  df-mpt2 5599  df-pnf 7445  df-mnf 7446  df-ltxr 7448  df-sub 7576  df-neg 7577  df-reap 7970  df-ap 7977
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator