Metamath Proof Explorer


Theorem mulgrhm2

Description: The powers of the element 1 give the unique ring homomorphism from ZZ to a ring. (Contributed by Mario Carneiro, 14-Jun-2015) (Revised by AV, 12-Jun-2019)

Ref Expression
Hypotheses mulgghm2.m ⊢ · ˙ = ⋅ R
mulgghm2.f ⊢ F = n ∈ ℤ ⟼ n · ˙ 1 ˙
mulgrhm.1 ⊢ 1 ˙ = 1 R
Assertion mulgrhm2 ⊢ R ∈ Ring → ℤ ring RingHom R = F

Proof

Step Hyp Ref Expression
1 mulgghm2.m ⊢ · ˙ = ⋅ R
2 mulgghm2.f ⊢ F = n ∈ ℤ ⟼ n · ˙ 1 ˙
3 mulgrhm.1 ⊢ 1 ˙ = 1 R
4 zringbas ⊢ ℤ = Base ℤ ring
5 eqid ⊢ Base R = Base R
6 4 5 rhmf ⊢ f ∈ ℤ ring RingHom R → f : ℤ ⟶ Base R
7 6 adantl ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R → f : ℤ ⟶ Base R
8 7 feqmptd ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R → f = n ∈ ℤ ⟼ f ⁡ n
9 rhmghm ⊢ f ∈ ℤ ring RingHom R → f ∈ ℤ ring GrpHom R
10 9 ad2antlr ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → f ∈ ℤ ring GrpHom R
11 simpr ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → n ∈ ℤ
12 1zzd ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → 1 ∈ ℤ
13 eqid ⊢ ⋅ ℤ ring = ⋅ ℤ ring
14 4 13 1 ghmmulg ⊢ f ∈ ℤ ring GrpHom R ∧ n ∈ ℤ ∧ 1 ∈ ℤ → f ⁡ n ⋅ ℤ ring 1 = n · ˙ f ⁡ 1
15 10 11 12 14 syl3anc ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → f ⁡ n ⋅ ℤ ring 1 = n · ˙ f ⁡ 1
16 ax-1cn ⊢ 1 ∈ ℂ
17 cnfldmulg ⊢ n ∈ ℤ ∧ 1 ∈ ℂ → n ⋅ ℂ fld 1 = n ⋅ 1
18 16 17 mpan2 ⊢ n ∈ ℤ → n ⋅ ℂ fld 1 = n ⋅ 1
19 1z ⊢ 1 ∈ ℤ
20 18 adantr ⊢ n ∈ ℤ ∧ 1 ∈ ℤ → n ⋅ ℂ fld 1 = n ⋅ 1
21 zringmulg ⊢ n ∈ ℤ ∧ 1 ∈ ℤ → n ⋅ ℤ ring 1 = n ⋅ 1
22 20 21 eqtr4d ⊢ n ∈ ℤ ∧ 1 ∈ ℤ → n ⋅ ℂ fld 1 = n ⋅ ℤ ring 1
23 19 22 mpan2 ⊢ n ∈ ℤ → n ⋅ ℂ fld 1 = n ⋅ ℤ ring 1
24 zcn ⊢ n ∈ ℤ → n ∈ ℂ
25 24 mulridd ⊢ n ∈ ℤ → n ⋅ 1 = n
26 18 23 25 3eqtr3d ⊢ n ∈ ℤ → n ⋅ ℤ ring 1 = n
27 26 adantl ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → n ⋅ ℤ ring 1 = n
28 27 fveq2d ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → f ⁡ n ⋅ ℤ ring 1 = f ⁡ n
29 zring1 ⊢ 1 = 1 ℤ ring
30 29 3 rhm1 ⊢ f ∈ ℤ ring RingHom R → f ⁡ 1 = 1 ˙
31 30 ad2antlr ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → f ⁡ 1 = 1 ˙
32 31 oveq2d ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → n · ˙ f ⁡ 1 = n · ˙ 1 ˙
33 15 28 32 3eqtr3d ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R ∧ n ∈ ℤ → f ⁡ n = n · ˙ 1 ˙
34 33 mpteq2dva ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R → n ∈ ℤ ⟼ f ⁡ n = n ∈ ℤ ⟼ n · ˙ 1 ˙
35 8 34 eqtrd ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R → f = n ∈ ℤ ⟼ n · ˙ 1 ˙
36 35 2 eqtr4di ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R → f = F
37 velsn ⊢ f ∈ F ↔ f = F
38 36 37 sylibr ⊢ R ∈ Ring ∧ f ∈ ℤ ring RingHom R → f ∈ F
39 38 ex ⊢ R ∈ Ring → f ∈ ℤ ring RingHom R → f ∈ F
40 39 ssrdv ⊢ R ∈ Ring → ℤ ring RingHom R ⊆ F
41 1 2 3 mulgrhm ⊢ R ∈ Ring → F ∈ ℤ ring RingHom R
42 41 snssd ⊢ R ∈ Ring → F ⊆ ℤ ring RingHom R
43 40 42 eqssd ⊢ R ∈ Ring → ℤ ring RingHom R = F