Theorem mulrid 8317

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 8316	. 2 ⊢ (𝐴 ∈ ℂ → ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)))
2		recn 8306	. . . . . 6 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℂ)
3		ax-icn 8268	. . . . . . 7 ⊢ i ∈ ℂ
4		recn 8306	. . . . . . 7 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
5		mulcl 8300	. . . . . . 7 ⊢ ((i ∈ ℂ ∧ 𝑦 ∈ ℂ) → (i · 𝑦) ∈ ℂ)
6	3, 4, 5	sylancr 418	. . . . . 6 ⊢ (𝑦 ∈ ℝ → (i · 𝑦) ∈ ℂ)
7		ax-1cn 8266	. . . . . . 7 ⊢ 1 ∈ ℂ
8		adddir 8311	. . . . . . 7 ⊢ ((𝑥 ∈ ℂ ∧ (i · 𝑦) ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑥 + (i · 𝑦)) · 1) = ((𝑥 · 1) + ((i · 𝑦) · 1)))
9	7, 8	mp3an3 1367	. . . . . 6 ⊢ ((𝑥 ∈ ℂ ∧ (i · 𝑦) ∈ ℂ) → ((𝑥 + (i · 𝑦)) · 1) = ((𝑥 · 1) + ((i · 𝑦) · 1)))
10	2, 6, 9	syl2an 289	. . . . 5 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑥 + (i · 𝑦)) · 1) = ((𝑥 · 1) + ((i · 𝑦) · 1)))
11		ax-1rid 8280	. . . . . 6 ⊢ (𝑥 ∈ ℝ → (𝑥 · 1) = 𝑥)
12		mulass 8304	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 1 ∈ ℂ) → ((i · 𝑦) · 1) = (i · (𝑦 · 1)))
13	3, 7, 12	mp3an13 1369	. . . . . . . 8 ⊢ (𝑦 ∈ ℂ → ((i · 𝑦) · 1) = (i · (𝑦 · 1)))
14	4, 13	syl 14	. . . . . . 7 ⊢ (𝑦 ∈ ℝ → ((i · 𝑦) · 1) = (i · (𝑦 · 1)))
15		ax-1rid 8280	. . . . . . . 8 ⊢ (𝑦 ∈ ℝ → (𝑦 · 1) = 𝑦)
16	15	oveq2d 6095	. . . . . . 7 ⊢ (𝑦 ∈ ℝ → (i · (𝑦 · 1)) = (i · 𝑦))
17	14, 16	eqtrd 2271	. . . . . 6 ⊢ (𝑦 ∈ ℝ → ((i · 𝑦) · 1) = (i · 𝑦))
18	11, 17	oveqan12d 6098	. . . . 5 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑥 · 1) + ((i · 𝑦) · 1)) = (𝑥 + (i · 𝑦)))
19	10, 18	eqtrd 2271	. . . 4 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑥 + (i · 𝑦)) · 1) = (𝑥 + (i · 𝑦)))
20		oveq1 6086	. . . . 5 ⊢ (𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 · 1) = ((𝑥 + (i · 𝑦)) · 1))
21		id 19	. . . . 5 ⊢ (𝐴 = (𝑥 + (i · 𝑦)) → 𝐴 = (𝑥 + (i · 𝑦)))
22	20, 21	eqeq12d 2253	. . . 4 ⊢ (𝐴 = (𝑥 + (i · 𝑦)) → ((𝐴 · 1) = 𝐴 ↔ ((𝑥 + (i · 𝑦)) · 1) = (𝑥 + (i · 𝑦))))
23	19, 22	syl5ibrcom 157	. . 3 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 · 1) = 𝐴))
24	23	rexlimivv 2674	. 2 ⊢ (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 · 1) = 𝐴)
25	1, 24	syl 14	1 ⊢ (𝐴 ∈ ℂ → (𝐴 · 1) = 𝐴)

Syntax hints:   → wi 4   ∧ wa 104   = wceq 1402   ∈ wcel 2209  ∃wrex 2529  (class class class)co 6079  ℂcc 8171  ℝcr 8172  1c1 8174  ici 8175   + caddc 8176   · cmul 8178

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 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-ext 2220  ax-resscn 8265  ax-1cn 8266  ax-icn 8268  ax-addcl 8269  ax-mulcl 8271  ax-mulcom 8274  ax-mulass 8276  ax-distr 8277  ax-1rid 8280  ax-cnre 8284

This theorem depends on definitions:  df-bi 117  df-3an 1011  df-tru 1405  df-nf 1514  df-sb 1816  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ral 2533  df-rex 2534  df-v 2823  df-un 3224  df-in 3226  df-ss 3233  df-sn 3714  df-pr 3715  df-op 3717  df-uni 3934  df-br 4129  df-iota 5335  df-fv 5383  df-ov 6082

This theorem is referenced by:  mullid  8318  mulridi  8322  mulridd  8337  muleqadd  8992  divdivap1  9047  conjmulap  9053  nnmulcl  9308  expmul  11004  binom21  11072  binom2sub1  11074  bernneq  11081  hashiun  12228  fproddccvg  12322  prodmodclem2a  12326  efexp  12432  cncrng  14889  cnfld1  14892  ecxp  15986  lgsdilem2  16138