Theorem mulresr 11120

Description: Multiplication of real numbers in terms of intermediate signed reals. (Contributed by NM, 10-May-1996.) (New usage is discouraged.)

Assertion

Ref	Expression
mulresr	⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → (⟨𝐴, 0R⟩ · ⟨𝐵, 0R⟩) = ⟨(𝐴 ·R 𝐵), 0R⟩)

Proof of Theorem mulresr

Step	Hyp	Ref	Expression
1		0r 11061	. . 3 ⊢ 0R ∈ R
2		mulcnsr 11117	. . . 4 ⊢ (((𝐴 ∈ R ∧ 0R ∈ R) ∧ (𝐵 ∈ R ∧ 0R ∈ R)) → (⟨𝐴, 0R⟩ · ⟨𝐵, 0R⟩) = ⟨((𝐴 ·R 𝐵) +R (-1R ·R (0R ·R 0R))), ((0R ·R 𝐵) +R (𝐴 ·R 0R))⟩)
3	2	an4s 672	. . 3 ⊢ (((𝐴 ∈ R ∧ 𝐵 ∈ R) ∧ (0R ∈ R ∧ 0R ∈ R)) → (⟨𝐴, 0R⟩ · ⟨𝐵, 0R⟩) = ⟨((𝐴 ·R 𝐵) +R (-1R ·R (0R ·R 0R))), ((0R ·R 𝐵) +R (𝐴 ·R 0R))⟩)
4	1, 1, 3	mpanr12 717	. 2 ⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → (⟨𝐴, 0R⟩ · ⟨𝐵, 0R⟩) = ⟨((𝐴 ·R 𝐵) +R (-1R ·R (0R ·R 0R))), ((0R ·R 𝐵) +R (𝐴 ·R 0R))⟩)
5		00sr 11080	. . . . . . . 8 ⊢ (0R ∈ R → (0R ·R 0R) = 0R)
6	1, 5	ax-mp 5	. . . . . . 7 ⊢ (0R ·R 0R) = 0R
7	6	oveq2i 7419	. . . . . 6 ⊢ (-1R ·R (0R ·R 0R)) = (-1R ·R 0R)
8		m1r 11063	. . . . . . 7 ⊢ -1R ∈ R
9		00sr 11080	. . . . . . 7 ⊢ (-1R ∈ R → (-1R ·R 0R) = 0R)
10	8, 9	ax-mp 5	. . . . . 6 ⊢ (-1R ·R 0R) = 0R
11	7, 10	eqtri 2792	. . . . 5 ⊢ (-1R ·R (0R ·R 0R)) = 0R
12	11	oveq2i 7419	. . . 4 ⊢ ((𝐴 ·R 𝐵) +R (-1R ·R (0R ·R 0R))) = ((𝐴 ·R 𝐵) +R 0R)
13		mulclsr 11065	. . . . 5 ⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → (𝐴 ·R 𝐵) ∈ R)
14		0idsr 11078	. . . . 5 ⊢ ((𝐴 ·R 𝐵) ∈ R → ((𝐴 ·R 𝐵) +R 0R) = (𝐴 ·R 𝐵))
15	13, 14	syl 18	. . . 4 ⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → ((𝐴 ·R 𝐵) +R 0R) = (𝐴 ·R 𝐵))
16	12, 15	eqtrid 2816	. . 3 ⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → ((𝐴 ·R 𝐵) +R (-1R ·R (0R ·R 0R))) = (𝐴 ·R 𝐵))
17		mulcomsr 11070	. . . . . 6 ⊢ (0R ·R 𝐵) = (𝐵 ·R 0R)
18		00sr 11080	. . . . . 6 ⊢ (𝐵 ∈ R → (𝐵 ·R 0R) = 0R)
19	17, 18	eqtrid 2816	. . . . 5 ⊢ (𝐵 ∈ R → (0R ·R 𝐵) = 0R)
20		00sr 11080	. . . . 5 ⊢ (𝐴 ∈ R → (𝐴 ·R 0R) = 0R)
21	19, 20	oveqan12rd 7428	. . . 4 ⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → ((0R ·R 𝐵) +R (𝐴 ·R 0R)) = (0R +R 0R))
22		0idsr 11078	. . . . 5 ⊢ (0R ∈ R → (0R +R 0R) = 0R)
23	1, 22	ax-mp 5	. . . 4 ⊢ (0R +R 0R) = 0R
24	21, 23	eqtrdi 2820	. . 3 ⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → ((0R ·R 𝐵) +R (𝐴 ·R 0R)) = 0R)
25	16, 24	opeq12d 4847	. 2 ⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → ⟨((𝐴 ·R 𝐵) +R (-1R ·R (0R ·R 0R))), ((0R ·R 𝐵) +R (𝐴 ·R 0R))⟩ = ⟨(𝐴 ·R 𝐵), 0R⟩)
26	4, 25	eqtrd 2804	1 ⊢ ((𝐴 ∈ R ∧ 𝐵 ∈ R) → (⟨𝐴, 0R⟩ · ⟨𝐵, 0R⟩) = ⟨(𝐴 ·R 𝐵), 0R⟩)

Syntax hints:   → wi 4   ∧ wa 400   = wceq 1567   ∈ wcel 2149  ⟨cop 4597  (class class class)co 7408  Rcnr 10846  0_Rc0r 10847  -1_Rcm1r 10849   +_R cplr 10850   ·_R cmr 10851   · cmul 11101

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730  ax-inf2 9606

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-ov 7411  df-oprab 7412  df-mpo 7413  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-oadd 8453  df-omul 8454  df-er 8690  df-ec 8692  df-qs 8696  df-ni 10853  df-pli 10854  df-mi 10855  df-lti 10856  df-plpq 10889  df-mpq 10890  df-ltpq 10891  df-enq 10892  df-nq 10893  df-erq 10894  df-plq 10895  df-mq 10896  df-1nq 10897  df-rq 10898  df-ltnq 10899  df-np 10962  df-1p 10963  df-plp 10964  df-mp 10965  df-ltp 10966  df-enr 11036  df-nr 11037  df-plr 11038  df-mr 11039  df-0r 11041  df-m1r 11043  df-c 11102  df-mul 11108

This theorem is referenced by:  axmulrcl  11135  ax1rid  11142  axrrecex  11144  axpre-mulgt0  11149