MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  xmullem Structured version   Visualization version   GIF version

Theorem xmullem 12660
Description: Lemma for rexmul 12667. (Contributed by Mario Carneiro, 20-Aug-2015.)
Assertion
Ref Expression
xmullem (((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ ¬ (𝐴 = 0 ∨ 𝐵 = 0)) ∧ ¬ (((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞)))) ∧ ¬ (((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞)))) → 𝐴 ∈ ℝ)

Proof of Theorem xmullem
StepHypRef Expression
1 ioran 980 . . . 4 (¬ (𝐴 = 0 ∨ 𝐵 = 0) ↔ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0))
21anbi2i 624 . . 3 (((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ ¬ (𝐴 = 0 ∨ 𝐵 = 0)) ↔ ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)))
3 ioran 980 . . . . 5 (¬ (((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))) ↔ (¬ ((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ ¬ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))))
4 ioran 980 . . . . . 6 (¬ ((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ↔ (¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)))
5 ioran 980 . . . . . 6 (¬ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞)) ↔ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞)))
64, 5anbi12i 628 . . . . 5 ((¬ ((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ ¬ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))) ↔ ((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))))
73, 6bitri 277 . . . 4 (¬ (((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))) ↔ ((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))))
8 ioran 980 . . . . 5 (¬ (((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))) ↔ (¬ ((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ ¬ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))))
9 ioran 980 . . . . . 6 (¬ ((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ↔ (¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)))
10 ioran 980 . . . . . 6 (¬ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞)) ↔ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞)))
119, 10anbi12i 628 . . . . 5 ((¬ ((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ ¬ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))) ↔ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))
128, 11bitri 277 . . . 4 (¬ (((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))) ↔ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))
137, 12anbi12i 628 . . 3 ((¬ (((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ¬ (((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞)))) ↔ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞)))))
14 simplll 773 . . . . 5 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → 𝐴 ∈ ℝ*)
15 elxr 12514 . . . . 5 (𝐴 ∈ ℝ* ↔ (𝐴 ∈ ℝ ∨ 𝐴 = +∞ ∨ 𝐴 = -∞))
1614, 15sylib 220 . . . 4 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → (𝐴 ∈ ℝ ∨ 𝐴 = +∞ ∨ 𝐴 = -∞))
17 idd 24 . . . . 5 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → (𝐴 ∈ ℝ → 𝐴 ∈ ℝ))
18 simprlr 778 . . . . . . . . 9 ((((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞)))) → ¬ (𝐵 < 0 ∧ 𝐴 = +∞))
1918adantl 484 . . . . . . . 8 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ¬ (𝐵 < 0 ∧ 𝐴 = +∞))
2019pm2.21d 121 . . . . . . 7 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ((𝐵 < 0 ∧ 𝐴 = +∞) → 𝐴 ∈ ℝ))
2120expdimp 455 . . . . . 6 (((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) ∧ 𝐵 < 0) → (𝐴 = +∞ → 𝐴 ∈ ℝ))
22 simplrr 776 . . . . . . . 8 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ¬ 𝐵 = 0)
2322pm2.21d 121 . . . . . . 7 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → (𝐵 = 0 → (𝐴 = +∞ → 𝐴 ∈ ℝ)))
2423imp 409 . . . . . 6 (((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) ∧ 𝐵 = 0) → (𝐴 = +∞ → 𝐴 ∈ ℝ))
25 simplll 773 . . . . . . . . 9 ((((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞)))) → ¬ (0 < 𝐵𝐴 = +∞))
2625adantl 484 . . . . . . . 8 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ¬ (0 < 𝐵𝐴 = +∞))
2726pm2.21d 121 . . . . . . 7 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ((0 < 𝐵𝐴 = +∞) → 𝐴 ∈ ℝ))
2827expdimp 455 . . . . . 6 (((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) ∧ 0 < 𝐵) → (𝐴 = +∞ → 𝐴 ∈ ℝ))
29 simpllr 774 . . . . . . 7 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → 𝐵 ∈ ℝ*)
30 0xr 10690 . . . . . . 7 0 ∈ ℝ*
31 xrltso 12537 . . . . . . . 8 < Or ℝ*
32 solin 5500 . . . . . . . 8 (( < Or ℝ* ∧ (𝐵 ∈ ℝ* ∧ 0 ∈ ℝ*)) → (𝐵 < 0 ∨ 𝐵 = 0 ∨ 0 < 𝐵))
3331, 32mpan 688 . . . . . . 7 ((𝐵 ∈ ℝ* ∧ 0 ∈ ℝ*) → (𝐵 < 0 ∨ 𝐵 = 0 ∨ 0 < 𝐵))
3429, 30, 33sylancl 588 . . . . . 6 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → (𝐵 < 0 ∨ 𝐵 = 0 ∨ 0 < 𝐵))
3521, 24, 28, 34mpjao3dan 1427 . . . . 5 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → (𝐴 = +∞ → 𝐴 ∈ ℝ))
36 simpllr 774 . . . . . . . . 9 ((((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞)))) → ¬ (𝐵 < 0 ∧ 𝐴 = -∞))
3736adantl 484 . . . . . . . 8 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ¬ (𝐵 < 0 ∧ 𝐴 = -∞))
3837pm2.21d 121 . . . . . . 7 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ((𝐵 < 0 ∧ 𝐴 = -∞) → 𝐴 ∈ ℝ))
3938expdimp 455 . . . . . 6 (((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) ∧ 𝐵 < 0) → (𝐴 = -∞ → 𝐴 ∈ ℝ))
4022pm2.21d 121 . . . . . . 7 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → (𝐵 = 0 → (𝐴 = -∞ → 𝐴 ∈ ℝ)))
4140imp 409 . . . . . 6 (((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) ∧ 𝐵 = 0) → (𝐴 = -∞ → 𝐴 ∈ ℝ))
42 simprll 777 . . . . . . . . 9 ((((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞)))) → ¬ (0 < 𝐵𝐴 = -∞))
4342adantl 484 . . . . . . . 8 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ¬ (0 < 𝐵𝐴 = -∞))
4443pm2.21d 121 . . . . . . 7 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ((0 < 𝐵𝐴 = -∞) → 𝐴 ∈ ℝ))
4544expdimp 455 . . . . . 6 (((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) ∧ 0 < 𝐵) → (𝐴 = -∞ → 𝐴 ∈ ℝ))
4639, 41, 45, 34mpjao3dan 1427 . . . . 5 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → (𝐴 = -∞ → 𝐴 ∈ ℝ))
4717, 35, 463jaod 1424 . . . 4 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → ((𝐴 ∈ ℝ ∨ 𝐴 = +∞ ∨ 𝐴 = -∞) → 𝐴 ∈ ℝ))
4816, 47mpd 15 . . 3 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ (¬ 𝐴 = 0 ∧ ¬ 𝐵 = 0)) ∧ (((¬ (0 < 𝐵𝐴 = +∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = -∞)) ∧ (¬ (0 < 𝐴𝐵 = +∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ((¬ (0 < 𝐵𝐴 = -∞) ∧ ¬ (𝐵 < 0 ∧ 𝐴 = +∞)) ∧ (¬ (0 < 𝐴𝐵 = -∞) ∧ ¬ (𝐴 < 0 ∧ 𝐵 = +∞))))) → 𝐴 ∈ ℝ)
492, 13, 48syl2anb 599 . 2 ((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ ¬ (𝐴 = 0 ∨ 𝐵 = 0)) ∧ (¬ (((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))) ∧ ¬ (((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))))) → 𝐴 ∈ ℝ)
5049anassrs 470 1 (((((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) ∧ ¬ (𝐴 = 0 ∨ 𝐵 = 0)) ∧ ¬ (((0 < 𝐵𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞)))) ∧ ¬ (((0 < 𝐵𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞)))) → 𝐴 ∈ ℝ)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 398  wo 843  w3o 1082   = wceq 1537  wcel 2114   class class class wbr 5068   Or wor 5475  cr 10538  0cc0 10539  +∞cpnf 10674  -∞cmnf 10675  *cxr 10676   < clt 10677
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 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463  ax-cnex 10595  ax-resscn 10596  ax-1cn 10597  ax-addrcl 10600  ax-rnegex 10610  ax-cnre 10612  ax-pre-lttri 10613  ax-pre-lttrn 10614
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-nel 3126  df-ral 3145  df-rex 3146  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-op 4576  df-uni 4841  df-br 5069  df-opab 5131  df-mpt 5149  df-id 5462  df-po 5476  df-so 5477  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-er 8291  df-en 8512  df-dom 8513  df-sdom 8514  df-pnf 10679  df-mnf 10680  df-xr 10681  df-ltxr 10682
This theorem is referenced by:  xmulcom  12662  xmulneg1  12665  xmulf  12668
  Copyright terms: Public domain W3C validator