Theorem mulrid 8151

Description: 1 is an identity element for multiplication. Based on ideas by Eric Schmidt. (Contributed by Scott Fenton, 3-Jan-2013.)

Assertion

Ref	Expression
mulrid	⊢ (𝐴 ∈ ℂ → (𝐴 · 1) = 𝐴)

Proof of Theorem mulrid

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		cnre 8150	. 2 ⊢ (𝐴 ∈ ℂ → ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)))
2		recn 8140	. . . . . 6 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℂ)
3		ax-icn 8102	. . . . . . 7 ⊢ i ∈ ℂ
4		recn 8140	. . . . . . 7 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
5		mulcl 8134	. . . . . . 7 ⊢ ((i ∈ ℂ ∧ 𝑦 ∈ ℂ) → (i · 𝑦) ∈ ℂ)
6	3, 4, 5	sylancr 414	. . . . . 6 ⊢ (𝑦 ∈ ℝ → (i · 𝑦) ∈ ℂ)
7		ax-1cn 8100	. . . . . . 7 ⊢ 1 ∈ ℂ
8		adddir 8145	. . . . . . 7 ⊢ ((𝑥 ∈ ℂ ∧ (i · 𝑦) ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑥 + (i · 𝑦)) · 1) = ((𝑥 · 1) + ((i · 𝑦) · 1)))
9	7, 8	mp3an3 1360	. . . . . 6 ⊢ ((𝑥 ∈ ℂ ∧ (i · 𝑦) ∈ ℂ) → ((𝑥 + (i · 𝑦)) · 1) = ((𝑥 · 1) + ((i · 𝑦) · 1)))
10	2, 6, 9	syl2an 289	. . . . 5 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑥 + (i · 𝑦)) · 1) = ((𝑥 · 1) + ((i · 𝑦) · 1)))
11		ax-1rid 8114	. . . . . 6 ⊢ (𝑥 ∈ ℝ → (𝑥 · 1) = 𝑥)
12		mulass 8138	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 1 ∈ ℂ) → ((i · 𝑦) · 1) = (i · (𝑦 · 1)))
13	3, 7, 12	mp3an13 1362	. . . . . . . 8 ⊢ (𝑦 ∈ ℂ → ((i · 𝑦) · 1) = (i · (𝑦 · 1)))
14	4, 13	syl 14	. . . . . . 7 ⊢ (𝑦 ∈ ℝ → ((i · 𝑦) · 1) = (i · (𝑦 · 1)))
15		ax-1rid 8114	. . . . . . . 8 ⊢ (𝑦 ∈ ℝ → (𝑦 · 1) = 𝑦)
16	15	oveq2d 6023	. . . . . . 7 ⊢ (𝑦 ∈ ℝ → (i · (𝑦 · 1)) = (i · 𝑦))
17	14, 16	eqtrd 2262	. . . . . 6 ⊢ (𝑦 ∈ ℝ → ((i · 𝑦) · 1) = (i · 𝑦))
18	11, 17	oveqan12d 6026	. . . . 5 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑥 · 1) + ((i · 𝑦) · 1)) = (𝑥 + (i · 𝑦)))
19	10, 18	eqtrd 2262	. . . 4 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑥 + (i · 𝑦)) · 1) = (𝑥 + (i · 𝑦)))
20		oveq1 6014	. . . . 5 ⊢ (𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 · 1) = ((𝑥 + (i · 𝑦)) · 1))
21		id 19	. . . . 5 ⊢ (𝐴 = (𝑥 + (i · 𝑦)) → 𝐴 = (𝑥 + (i · 𝑦)))
22	20, 21	eqeq12d 2244	. . . 4 ⊢ (𝐴 = (𝑥 + (i · 𝑦)) → ((𝐴 · 1) = 𝐴 ↔ ((𝑥 + (i · 𝑦)) · 1) = (𝑥 + (i · 𝑦))))
23	19, 22	syl5ibrcom 157	. . 3 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 · 1) = 𝐴))
24	23	rexlimivv 2654	. 2 ⊢ (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 · 1) = 𝐴)
25	1, 24	syl 14	1 ⊢ (𝐴 ∈ ℂ → (𝐴 · 1) = 𝐴)

Syntax hints:   → wi 4   ∧ wa 104   = wceq 1395   ∈ wcel 2200  ∃wrex 2509  (class class class)co 6007  ℂcc 8005  ℝcr 8006  1c1 8008  ici 8009   + caddc 8010   · cmul 8012

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-io 714  ax-5 1493  ax-7 1494  ax-gen 1495  ax-ie1 1539  ax-ie2 1540  ax-8 1550  ax-10 1551  ax-11 1552  ax-i12 1553  ax-bndl 1555  ax-4 1556  ax-17 1572  ax-i9 1576  ax-ial 1580  ax-i5r 1581  ax-ext 2211  ax-resscn 8099  ax-1cn 8100  ax-icn 8102  ax-addcl 8103  ax-mulcl 8105  ax-mulcom 8108  ax-mulass 8110  ax-distr 8111  ax-1rid 8114  ax-cnre 8118

This theorem depends on definitions:  df-bi 117  df-3an 1004  df-tru 1398  df-nf 1507  df-sb 1809  df-clab 2216  df-cleq 2222  df-clel 2225  df-nfc 2361  df-ral 2513  df-rex 2514  df-v 2801  df-un 3201  df-in 3203  df-ss 3210  df-sn 3672  df-pr 3673  df-op 3675  df-uni 3889  df-br 4084  df-iota 5278  df-fv 5326  df-ov 6010

This theorem is referenced by:  mullid  8152  mulridi  8156  mulridd  8171  muleqadd  8823  divdivap1  8878  conjmulap  8884  nnmulcl  9139  expmul  10814  binom21  10882  binom2sub1  10884  bernneq  10890  hashiun  11997  fproddccvg  12091  prodmodclem2a  12095  efexp  12201  cncrng  14541  cnfld1  14544  ecxp  15583  lgsdilem2  15723