rexmul - Metamath Proof Explorer

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

Theorem rexmul 11973

Description: The extended real multiplication when both arguments are real. (Contributed by Mario Carneiro, 20-Aug-2015.)

**Assertion**
Ref	Expression
rexmul	⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 ·_e 𝐵) = (𝐴 · 𝐵))

**Proof of Theorem rexmul**
Step	Hyp	Ref	Expression
1		renepnf 9966	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ → 𝐴 ≠ +∞)
2	1	adantr 480	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐴 ≠ +∞)
3	2	necon2bi 2812	. . . . . . . . 9 ⊢ (𝐴 = +∞ → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
4	3	adantl 481	. . . . . . . 8 ⊢ ((0 < 𝐵 ∧ 𝐴 = +∞) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
5		renemnf 9967	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ → 𝐴 ≠ -∞)
6	5	adantr 480	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐴 ≠ -∞)
7	6	necon2bi 2812	. . . . . . . . 9 ⊢ (𝐴 = -∞ → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
8	7	adantl 481	. . . . . . . 8 ⊢ ((𝐵 < 0 ∧ 𝐴 = -∞) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
9	4, 8	jaoi 393	. . . . . . 7 ⊢ (((0 < 𝐵 ∧ 𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
10		renepnf 9966	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ → 𝐵 ≠ +∞)
11	10	adantl 481	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ≠ +∞)
12	11	necon2bi 2812	. . . . . . . . 9 ⊢ (𝐵 = +∞ → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
13	12	adantl 481	. . . . . . . 8 ⊢ ((0 < 𝐴 ∧ 𝐵 = +∞) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
14		renemnf 9967	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ → 𝐵 ≠ -∞)
15	14	adantl 481	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ≠ -∞)
16	15	necon2bi 2812	. . . . . . . . 9 ⊢ (𝐵 = -∞ → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
17	16	adantl 481	. . . . . . . 8 ⊢ ((𝐴 < 0 ∧ 𝐵 = -∞) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
18	13, 17	jaoi 393	. . . . . . 7 ⊢ (((0 < 𝐴 ∧ 𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞)) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
19	9, 18	jaoi 393	. . . . . 6 ⊢ ((((0 < 𝐵 ∧ 𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
20	19	con2i 133	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ¬ (((0 < 𝐵 ∧ 𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))))
21	20	iffalsed 4047	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → if((((0 < 𝐵 ∧ 𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))), +∞, if((((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))), -∞, (𝐴 · 𝐵))) = if((((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))), -∞, (𝐴 · 𝐵)))
22	7	adantl 481	. . . . . . . 8 ⊢ ((0 < 𝐵 ∧ 𝐴 = -∞) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
23	3	adantl 481	. . . . . . . 8 ⊢ ((𝐵 < 0 ∧ 𝐴 = +∞) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
24	22, 23	jaoi 393	. . . . . . 7 ⊢ (((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
25	16	adantl 481	. . . . . . . 8 ⊢ ((0 < 𝐴 ∧ 𝐵 = -∞) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
26	12	adantl 481	. . . . . . . 8 ⊢ ((𝐴 < 0 ∧ 𝐵 = +∞) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
27	25, 26	jaoi 393	. . . . . . 7 ⊢ (((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞)) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
28	24, 27	jaoi 393	. . . . . 6 ⊢ ((((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))) → ¬ (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
29	28	con2i 133	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ¬ (((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))))
30	29	iffalsed 4047	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → if((((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))), -∞, (𝐴 · 𝐵)) = (𝐴 · 𝐵))
31	21, 30	eqtrd 2644	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → if((((0 < 𝐵 ∧ 𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))), +∞, if((((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))), -∞, (𝐴 · 𝐵))) = (𝐴 · 𝐵))
32	31	ifeq2d 4055	. 2 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → if((𝐴 = 0 ∨ 𝐵 = 0), 0, if((((0 < 𝐵 ∧ 𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))), +∞, if((((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))), -∞, (𝐴 · 𝐵)))) = if((𝐴 = 0 ∨ 𝐵 = 0), 0, (𝐴 · 𝐵)))
33		rexr 9964	. . 3 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℝ^*)
34		rexr 9964	. . 3 ⊢ (𝐵 ∈ ℝ → 𝐵 ∈ ℝ^*)
35		xmulval 11930	. . 3 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐴 ·_e 𝐵) = if((𝐴 = 0 ∨ 𝐵 = 0), 0, if((((0 < 𝐵 ∧ 𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))), +∞, if((((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))), -∞, (𝐴 · 𝐵)))))
36	33, 34, 35	syl2an 493	. 2 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 ·_e 𝐵) = if((𝐴 = 0 ∨ 𝐵 = 0), 0, if((((0 < 𝐵 ∧ 𝐴 = +∞) ∨ (𝐵 < 0 ∧ 𝐴 = -∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = +∞) ∨ (𝐴 < 0 ∧ 𝐵 = -∞))), +∞, if((((0 < 𝐵 ∧ 𝐴 = -∞) ∨ (𝐵 < 0 ∧ 𝐴 = +∞)) ∨ ((0 < 𝐴 ∧ 𝐵 = -∞) ∨ (𝐴 < 0 ∧ 𝐵 = +∞))), -∞, (𝐴 · 𝐵)))))
37		ifid 4075	. . 3 ⊢ if((𝐴 = 0 ∨ 𝐵 = 0), (𝐴 · 𝐵), (𝐴 · 𝐵)) = (𝐴 · 𝐵)
38		oveq1 6556	. . . . . 6 ⊢ (𝐴 = 0 → (𝐴 · 𝐵) = (0 · 𝐵))
39		mul02lem2 10092	. . . . . . 7 ⊢ (𝐵 ∈ ℝ → (0 · 𝐵) = 0)
40	39	adantl 481	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (0 · 𝐵) = 0)
41	38, 40	sylan9eqr 2666	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 = 0) → (𝐴 · 𝐵) = 0)
42		oveq2 6557	. . . . . 6 ⊢ (𝐵 = 0 → (𝐴 · 𝐵) = (𝐴 · 0))
43		recn 9905	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
44	43	mul01d 10114	. . . . . . 7 ⊢ (𝐴 ∈ ℝ → (𝐴 · 0) = 0)
45	44	adantr 480	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 · 0) = 0)
46	42, 45	sylan9eqr 2666	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐵 = 0) → (𝐴 · 𝐵) = 0)
47	41, 46	jaodan 822	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐴 = 0 ∨ 𝐵 = 0)) → (𝐴 · 𝐵) = 0)
48	47	ifeq1da 4066	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → if((𝐴 = 0 ∨ 𝐵 = 0), (𝐴 · 𝐵), (𝐴 · 𝐵)) = if((𝐴 = 0 ∨ 𝐵 = 0), 0, (𝐴 · 𝐵)))
49	37, 48	syl5eqr 2658	. 2 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 · 𝐵) = if((𝐴 = 0 ∨ 𝐵 = 0), 0, (𝐴 · 𝐵)))
50	32, 36, 49	3eqtr4d 2654	1 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 ·_e 𝐵) = (𝐴 · 𝐵))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∨ wo 382 ∧ wa 383 = wceq 1475 ∈ wcel 1977 ≠ wne 2780 ifcif 4036 class class class wbr 4583 (class class class)co 6549 ℝcr 9814 0cc0 9815 · cmul 9820 +∞cpnf 9950 -∞cmnf 9951 ℝ^*cxr 9952 < clt 9953 ·_e cxmu 11821

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1713 ax-4 1728 ax-5 1827 ax-6 1875 ax-7 1922 ax-8 1979 ax-9 1986 ax-10 2006 ax-11 2021 ax-12 2034 ax-13 2234 ax-ext 2590 ax-sep 4709 ax-nul 4717 ax-pow 4769 ax-pr 4833 ax-un 6847 ax-cnex 9871 ax-resscn 9872 ax-1cn 9873 ax-icn 9874 ax-addcl 9875 ax-addrcl 9876 ax-mulcl 9877 ax-mulrcl 9878 ax-mulcom 9879 ax-addass 9880 ax-mulass 9881 ax-distr 9882 ax-i2m1 9883 ax-1ne0 9884 ax-1rid 9885 ax-rnegex 9886 ax-rrecex 9887 ax-cnre 9888 ax-pre-lttri 9889 ax-pre-lttrn 9890 ax-pre-ltadd 9891

This theorem depends on definitions: df-bi 196 df-or 384 df-an 385 df-3or 1032 df-3an 1033 df-tru 1478 df-ex 1696 df-nf 1701 df-sb 1868 df-eu 2462 df-mo 2463 df-clab 2597 df-cleq 2603 df-clel 2606 df-nfc 2740 df-ne 2782 df-nel 2783 df-ral 2901 df-rex 2902 df-rab 2905 df-v 3175 df-sbc 3403 df-csb 3500 df-dif 3543 df-un 3545 df-in 3547 df-ss 3554 df-nul 3875 df-if 4037 df-pw 4110 df-sn 4126 df-pr 4128 df-op 4132 df-uni 4373 df-br 4584 df-opab 4644 df-mpt 4645 df-id 4953 df-po 4959 df-so 4960 df-xp 5044 df-rel 5045 df-cnv 5046 df-co 5047 df-dm 5048 df-rn 5049 df-res 5050 df-ima 5051 df-iota 5768 df-fun 5806 df-fn 5807 df-f 5808 df-f1 5809 df-fo 5810 df-f1o 5811 df-fv 5812 df-ov 6552 df-oprab 6553 df-mpt2 6554 df-er 7629 df-en 7842 df-dom 7843 df-sdom 7844 df-pnf 9955 df-mnf 9956 df-xr 9957 df-ltxr 9958 df-xmul 11824

This theorem is referenced by: xmulid1 11981 xmulgt0 11985 xmulasslem3 11988 xlemul1a 11990 xlemul1 11992 xadddilem 11996 nmoix 22343 nmoi2 22344 metnrmlem3 22472 nmoleub2lem 22722 xrecex 28959 rexdiv 28965 pnfinf 29068 xrge0slmod 29175 esumcst 29452 omssubadd 29689

W3C validator