Theorem mulreim 8648

Description: Complex multiplication in terms of real and imaginary parts. (Contributed by Jim Kingdon, 23-Feb-2020.)

Assertion

Ref	Expression
mulreim	⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((𝐴 + (i · 𝐵)) · (𝐶 + (i · 𝐷))) = (((𝐴 · 𝐶) + -(𝐵 · 𝐷)) + (i · ((𝐶 · 𝐵) + (𝐷 · 𝐴)))))

Proof of Theorem mulreim

Step	Hyp	Ref	Expression
1		simpll 527	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → 𝐴 ∈ ℝ)
2	1	recnd 8072	. . 3 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → 𝐴 ∈ ℂ)
3		ax-icn 7991	. . . . 5 ⊢ i ∈ ℂ
4	3	a1i 9	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → i ∈ ℂ)
5		simplr 528	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → 𝐵 ∈ ℝ)
6	5	recnd 8072	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → 𝐵 ∈ ℂ)
7	4, 6	mulcld 8064	. . 3 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (i · 𝐵) ∈ ℂ)
8		simprl 529	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → 𝐶 ∈ ℝ)
9	8	recnd 8072	. . 3 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → 𝐶 ∈ ℂ)
10		simprr 531	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → 𝐷 ∈ ℝ)
11	10	recnd 8072	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → 𝐷 ∈ ℂ)
12	4, 11	mulcld 8064	. . 3 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (i · 𝐷) ∈ ℂ)
13	2, 7, 9, 12	muladdd 8459	. 2 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((𝐴 + (i · 𝐵)) · (𝐶 + (i · 𝐷))) = (((𝐴 · 𝐶) + ((i · 𝐷) · (i · 𝐵))) + ((𝐴 · (i · 𝐷)) + (𝐶 · (i · 𝐵)))))
14	4, 11, 4, 6	mul4d 8198	. . . . . 6 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((i · 𝐷) · (i · 𝐵)) = ((i · i) · (𝐷 · 𝐵)))
15		ixi 8627	. . . . . . 7 ⊢ (i · i) = -1
16	15	oveq1i 5935	. . . . . 6 ⊢ ((i · i) · (𝐷 · 𝐵)) = (-1 · (𝐷 · 𝐵))
17	14, 16	eqtrdi 2245	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((i · 𝐷) · (i · 𝐵)) = (-1 · (𝐷 · 𝐵)))
18	11, 6	mulcld 8064	. . . . . 6 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (𝐷 · 𝐵) ∈ ℂ)
19	18	mulm1d 8453	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (-1 · (𝐷 · 𝐵)) = -(𝐷 · 𝐵))
20	11, 6	mulcomd 8065	. . . . . 6 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (𝐷 · 𝐵) = (𝐵 · 𝐷))
21	20	negeqd 8238	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → -(𝐷 · 𝐵) = -(𝐵 · 𝐷))
22	17, 19, 21	3eqtrd 2233	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((i · 𝐷) · (i · 𝐵)) = -(𝐵 · 𝐷))
23	22	oveq2d 5941	. . 3 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((𝐴 · 𝐶) + ((i · 𝐷) · (i · 𝐵))) = ((𝐴 · 𝐶) + -(𝐵 · 𝐷)))
24	11, 2	mulcld 8064	. . . . . 6 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (𝐷 · 𝐴) ∈ ℂ)
25	4, 24	mulcld 8064	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (i · (𝐷 · 𝐴)) ∈ ℂ)
26	9, 6	mulcld 8064	. . . . . 6 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (𝐶 · 𝐵) ∈ ℂ)
27	4, 26	mulcld 8064	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (i · (𝐶 · 𝐵)) ∈ ℂ)
28	25, 27	addcomd 8194	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((i · (𝐷 · 𝐴)) + (i · (𝐶 · 𝐵))) = ((i · (𝐶 · 𝐵)) + (i · (𝐷 · 𝐴))))
29	2, 4, 11	mul12d 8195	. . . . . 6 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (𝐴 · (i · 𝐷)) = (i · (𝐴 · 𝐷)))
30	2, 11	mulcomd 8065	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (𝐴 · 𝐷) = (𝐷 · 𝐴))
31	30	oveq2d 5941	. . . . . 6 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (i · (𝐴 · 𝐷)) = (i · (𝐷 · 𝐴)))
32	29, 31	eqtrd 2229	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (𝐴 · (i · 𝐷)) = (i · (𝐷 · 𝐴)))
33	9, 4, 6	mul12d 8195	. . . . 5 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (𝐶 · (i · 𝐵)) = (i · (𝐶 · 𝐵)))
34	32, 33	oveq12d 5943	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((𝐴 · (i · 𝐷)) + (𝐶 · (i · 𝐵))) = ((i · (𝐷 · 𝐴)) + (i · (𝐶 · 𝐵))))
35	4, 26, 24	adddid 8068	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (i · ((𝐶 · 𝐵) + (𝐷 · 𝐴))) = ((i · (𝐶 · 𝐵)) + (i · (𝐷 · 𝐴))))
36	28, 34, 35	3eqtr4d 2239	. . 3 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((𝐴 · (i · 𝐷)) + (𝐶 · (i · 𝐵))) = (i · ((𝐶 · 𝐵) + (𝐷 · 𝐴))))
37	23, 36	oveq12d 5943	. 2 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → (((𝐴 · 𝐶) + ((i · 𝐷) · (i · 𝐵))) + ((𝐴 · (i · 𝐷)) + (𝐶 · (i · 𝐵)))) = (((𝐴 · 𝐶) + -(𝐵 · 𝐷)) + (i · ((𝐶 · 𝐵) + (𝐷 · 𝐴)))))
38	13, 37	eqtrd 2229	1 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ)) → ((𝐴 + (i · 𝐵)) · (𝐶 + (i · 𝐷))) = (((𝐴 · 𝐶) + -(𝐵 · 𝐷)) + (i · ((𝐶 · 𝐵) + (𝐷 · 𝐴)))))

Syntax hints:   → wi 4   ∧ wa 104   = wceq 1364   ∈ wcel 2167  (class class class)co 5925  ℂcc 7894  ℝcr 7895  1c1 7897  ici 7898   + caddc 7899   · cmul 7901  -cneg 8215

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 710  ax-5 1461  ax-7 1462  ax-gen 1463  ax-ie1 1507  ax-ie2 1508  ax-8 1518  ax-10 1519  ax-11 1520  ax-i12 1521  ax-bndl 1523  ax-4 1524  ax-17 1540  ax-i9 1544  ax-ial 1548  ax-i5r 1549  ax-14 2170  ax-ext 2178  ax-sep 4152  ax-pow 4208  ax-pr 4243  ax-setind 4574  ax-resscn 7988  ax-1cn 7989  ax-icn 7991  ax-addcl 7992  ax-addrcl 7993  ax-mulcl 7994  ax-addcom 7996  ax-mulcom 7997  ax-addass 7998  ax-mulass 7999  ax-distr 8000  ax-i2m1 8001  ax-1rid 8003  ax-0id 8004  ax-rnegex 8005  ax-cnre 8007

This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-fal 1370  df-nf 1475  df-sb 1777  df-eu 2048  df-mo 2049  df-clab 2183  df-cleq 2189  df-clel 2192  df-nfc 2328  df-ne 2368  df-ral 2480  df-rex 2481  df-reu 2482  df-rab 2484  df-v 2765  df-sbc 2990  df-dif 3159  df-un 3161  df-in 3163  df-ss 3170  df-pw 3608  df-sn 3629  df-pr 3630  df-op 3632  df-uni 3841  df-br 4035  df-opab 4096  df-id 4329  df-xp 4670  df-rel 4671  df-cnv 4672  df-co 4673  df-dm 4674  df-iota 5220  df-fun 5261  df-fv 5267  df-riota 5880  df-ov 5928  df-oprab 5929  df-mpo 5930  df-sub 8216  df-neg 8217

This theorem is referenced by:  mulext1  8656