Theorem znrrg 15104

Description: The regular elements of ℤ/nℤ are exactly the units. (This theorem fails for 𝑁 = 0, where all nonzero integers are regular, but only ±1 are units.) (Contributed by Mario Carneiro, 18-Apr-2016.)

Hypotheses

Ref	Expression
znchr.y	⊢ 𝑌 = (ℤ/nℤ‘𝑁)
znunit.u	⊢ 𝑈 = (Unit‘𝑌)
znrrg.e	⊢ 𝐸 = (RLReg‘𝑌)

Assertion

Ref	Expression
znrrg	⊢ (𝑁 ∈ ℕ → 𝐸 = 𝑈)

Proof of Theorem znrrg

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

Step	Hyp	Ref	Expression
1		nnnn0 9582	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℕ0)
2		znchr.y	. . . . . . . 8 ⊢ 𝑌 = (ℤ/nℤ‘𝑁)
3		eqid 2238	. . . . . . . 8 ⊢ (Base‘𝑌) = (Base‘𝑌)
4		eqid 2238	. . . . . . . 8 ⊢ (ℤRHom‘𝑌) = (ℤRHom‘𝑌)
5	2, 3, 4	znzrhfo 15092	. . . . . . 7 ⊢ (𝑁 ∈ ℕ0 → (ℤRHom‘𝑌):ℤ–onto→(Base‘𝑌))
6	1, 5	syl 14	. . . . . 6 ⊢ (𝑁 ∈ ℕ → (ℤRHom‘𝑌):ℤ–onto→(Base‘𝑌))
7		znrrg.e	. . . . . . . 8 ⊢ 𝐸 = (RLReg‘𝑌)
8	7, 3	rrgss 14684	. . . . . . 7 ⊢ 𝐸 ⊆ (Base‘𝑌)
9	8	sseli 3244	. . . . . 6 ⊢ (𝑥 ∈ 𝐸 → 𝑥 ∈ (Base‘𝑌))
10		foelrn 5961	. . . . . 6 ⊢ (((ℤRHom‘𝑌):ℤ–onto→(Base‘𝑌) ∧ 𝑥 ∈ (Base‘𝑌)) → ∃𝑛 ∈ ℤ 𝑥 = ((ℤRHom‘𝑌)‘𝑛))
11	6, 9, 10	syl2an 289	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝑥 ∈ 𝐸) → ∃𝑛 ∈ ℤ 𝑥 = ((ℤRHom‘𝑌)‘𝑛))
12	11	ex 115	. . . 4 ⊢ (𝑁 ∈ ℕ → (𝑥 ∈ 𝐸 → ∃𝑛 ∈ ℤ 𝑥 = ((ℤRHom‘𝑌)‘𝑛)))
13		nncn 9322	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
14	13	ad2antrr 492	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑁 ∈ ℂ)
15		simplr 533	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑛 ∈ ℤ)
16		nnz 9673	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
17	16	ad2antrr 492	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑁 ∈ ℤ)
18		nnne0 9342	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑁 ∈ ℕ → 𝑁 ≠ 0)
19	18	ad2antrr 492	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑁 ≠ 0)
20		simpr 110	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑛 = 0 ∧ 𝑁 = 0) → 𝑁 = 0)
21	20	necon3ai 2469	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ≠ 0 → ¬ (𝑛 = 0 ∧ 𝑁 = 0))
22	19, 21	syl 14	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ¬ (𝑛 = 0 ∧ 𝑁 = 0))
23		gcdn0cl 12764	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑛 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ ¬ (𝑛 = 0 ∧ 𝑁 = 0)) → (𝑛 gcd 𝑁) ∈ ℕ)
24	15, 17, 22, 23	syl21anc 1277	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) ∈ ℕ)
25	24	nncnd 9328	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) ∈ ℂ)
26	24	nnap0d 9360	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) # 0)
27	14, 25, 26	divcanap2d 9131	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑛 gcd 𝑁) · (𝑁 / (𝑛 gcd 𝑁))) = 𝑁)
28		gcddvds 12765	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑛 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑛 gcd 𝑁) ∥ 𝑛 ∧ (𝑛 gcd 𝑁) ∥ 𝑁))
29	15, 17, 28	syl2anc 415	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑛 gcd 𝑁) ∥ 𝑛 ∧ (𝑛 gcd 𝑁) ∥ 𝑁))
30	29	simpld 112	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) ∥ 𝑛)
31	24	nnzd 9778	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) ∈ ℤ)
32	29	simprd 114	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) ∥ 𝑁)
33		simpll 531	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑁 ∈ ℕ)
34		nndivdvds 12588	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 gcd 𝑁) ∈ ℕ) → ((𝑛 gcd 𝑁) ∥ 𝑁 ↔ (𝑁 / (𝑛 gcd 𝑁)) ∈ ℕ))
35	33, 24, 34	syl2anc 415	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑛 gcd 𝑁) ∥ 𝑁 ↔ (𝑁 / (𝑛 gcd 𝑁)) ∈ ℕ))
36	32, 35	mpbid 147	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑁 / (𝑛 gcd 𝑁)) ∈ ℕ)
37	36	nnzd 9778	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑁 / (𝑛 gcd 𝑁)) ∈ ℤ)
38		dvdsmulc 12611	. . . . . . . . . . . . . . . 16 ⊢ (((𝑛 gcd 𝑁) ∈ ℤ ∧ 𝑛 ∈ ℤ ∧ (𝑁 / (𝑛 gcd 𝑁)) ∈ ℤ) → ((𝑛 gcd 𝑁) ∥ 𝑛 → ((𝑛 gcd 𝑁) · (𝑁 / (𝑛 gcd 𝑁))) ∥ (𝑛 · (𝑁 / (𝑛 gcd 𝑁)))))
39	31, 15, 37, 38	syl3anc 1278	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑛 gcd 𝑁) ∥ 𝑛 → ((𝑛 gcd 𝑁) · (𝑁 / (𝑛 gcd 𝑁))) ∥ (𝑛 · (𝑁 / (𝑛 gcd 𝑁)))))
40	30, 39	mpd 13	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑛 gcd 𝑁) · (𝑁 / (𝑛 gcd 𝑁))) ∥ (𝑛 · (𝑁 / (𝑛 gcd 𝑁))))
41	27, 40	eqbrtrrd 4155	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑁 ∥ (𝑛 · (𝑁 / (𝑛 gcd 𝑁))))
42		simpr 110	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸)
43	1	ad2antrr 492	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑁 ∈ ℕ0)
44	43, 5	syl 14	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (ℤRHom‘𝑌):ℤ–onto→(Base‘𝑌))
45		fof 5618	. . . . . . . . . . . . . . . . 17 ⊢ ((ℤRHom‘𝑌):ℤ–onto→(Base‘𝑌) → (ℤRHom‘𝑌):ℤ⟶(Base‘𝑌))
46	44, 45	syl 14	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (ℤRHom‘𝑌):ℤ⟶(Base‘𝑌))
47	46, 37	ffvelcdmd 5847	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁))) ∈ (Base‘𝑌))
48		eqid 2238	. . . . . . . . . . . . . . . 16 ⊢ (.r‘𝑌) = (.r‘𝑌)
49		eqid 2238	. . . . . . . . . . . . . . . 16 ⊢ (0g‘𝑌) = (0g‘𝑌)
50	7, 3, 48, 49	rrgeq0i 14681	. . . . . . . . . . . . . . 15 ⊢ ((((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸 ∧ ((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁))) ∈ (Base‘𝑌)) → ((((ℤRHom‘𝑌)‘𝑛)(.r‘𝑌)((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁)))) = (0g‘𝑌) → ((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁))) = (0g‘𝑌)))
51	42, 47, 50	syl2anc 415	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((((ℤRHom‘𝑌)‘𝑛)(.r‘𝑌)((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁)))) = (0g‘𝑌) → ((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁))) = (0g‘𝑌)))
52	2	zncrng 15089	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑁 ∈ ℕ0 → 𝑌 ∈ CRing)
53	1, 52	syl 14	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑁 ∈ ℕ → 𝑌 ∈ CRing)
54	53	crngringd 14420	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑁 ∈ ℕ → 𝑌 ∈ Ring)
55	54	ad2antrr 492	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑌 ∈ Ring)
56	4	zrhrhm 15067	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑌 ∈ Ring → (ℤRHom‘𝑌) ∈ (ℤring RingHom 𝑌))
57	55, 56	syl 14	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (ℤRHom‘𝑌) ∈ (ℤring RingHom 𝑌))
58		zringbas 15040	. . . . . . . . . . . . . . . . . 18 ⊢ ℤ = (Base‘ℤring)
59		zringmulr 15043	. . . . . . . . . . . . . . . . . 18 ⊢ · = (.r‘ℤring)
60	58, 59, 48	rhmmul 14580	. . . . . . . . . . . . . . . . 17 ⊢ (((ℤRHom‘𝑌) ∈ (ℤring RingHom 𝑌) ∧ 𝑛 ∈ ℤ ∧ (𝑁 / (𝑛 gcd 𝑁)) ∈ ℤ) → ((ℤRHom‘𝑌)‘(𝑛 · (𝑁 / (𝑛 gcd 𝑁)))) = (((ℤRHom‘𝑌)‘𝑛)(.r‘𝑌)((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁)))))
61	57, 15, 37, 60	syl3anc 1278	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((ℤRHom‘𝑌)‘(𝑛 · (𝑁 / (𝑛 gcd 𝑁)))) = (((ℤRHom‘𝑌)‘𝑛)(.r‘𝑌)((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁)))))
62	61	eqeq1d 2247	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (((ℤRHom‘𝑌)‘(𝑛 · (𝑁 / (𝑛 gcd 𝑁)))) = (0g‘𝑌) ↔ (((ℤRHom‘𝑌)‘𝑛)(.r‘𝑌)((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁)))) = (0g‘𝑌)))
63	15, 37	zmulcld 9785	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 · (𝑁 / (𝑛 gcd 𝑁))) ∈ ℤ)
64	2, 4, 49	zndvds0 15094	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ ℕ0 ∧ (𝑛 · (𝑁 / (𝑛 gcd 𝑁))) ∈ ℤ) → (((ℤRHom‘𝑌)‘(𝑛 · (𝑁 / (𝑛 gcd 𝑁)))) = (0g‘𝑌) ↔ 𝑁 ∥ (𝑛 · (𝑁 / (𝑛 gcd 𝑁)))))
65	43, 63, 64	syl2anc 415	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (((ℤRHom‘𝑌)‘(𝑛 · (𝑁 / (𝑛 gcd 𝑁)))) = (0g‘𝑌) ↔ 𝑁 ∥ (𝑛 · (𝑁 / (𝑛 gcd 𝑁)))))
66	62, 65	bitr3d 190	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((((ℤRHom‘𝑌)‘𝑛)(.r‘𝑌)((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁)))) = (0g‘𝑌) ↔ 𝑁 ∥ (𝑛 · (𝑁 / (𝑛 gcd 𝑁)))))
67	2, 4, 49	zndvds0 15094	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ ℕ0 ∧ (𝑁 / (𝑛 gcd 𝑁)) ∈ ℤ) → (((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁))) = (0g‘𝑌) ↔ 𝑁 ∥ (𝑁 / (𝑛 gcd 𝑁))))
68	43, 37, 67	syl2anc 415	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (((ℤRHom‘𝑌)‘(𝑁 / (𝑛 gcd 𝑁))) = (0g‘𝑌) ↔ 𝑁 ∥ (𝑁 / (𝑛 gcd 𝑁))))
69	51, 66, 68	3imtr3d 202	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑁 ∥ (𝑛 · (𝑁 / (𝑛 gcd 𝑁))) → 𝑁 ∥ (𝑁 / (𝑛 gcd 𝑁))))
70	41, 69	mpd 13	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 𝑁 ∥ (𝑁 / (𝑛 gcd 𝑁)))
71	14, 25, 26	divcanap1d 9130	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑁 / (𝑛 gcd 𝑁)) · (𝑛 gcd 𝑁)) = 𝑁)
72	36	nncnd 9328	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑁 / (𝑛 gcd 𝑁)) ∈ ℂ)
73	72	mulridd 8350	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑁 / (𝑛 gcd 𝑁)) · 1) = (𝑁 / (𝑛 gcd 𝑁)))
74	70, 71, 73	3brtr4d 4163	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑁 / (𝑛 gcd 𝑁)) · (𝑛 gcd 𝑁)) ∥ ((𝑁 / (𝑛 gcd 𝑁)) · 1))
75		1zzd 9681	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → 1 ∈ ℤ)
76	36	nnne0d 9359	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑁 / (𝑛 gcd 𝑁)) ≠ 0)
77		dvdscmulr 12612	. . . . . . . . . . . 12 ⊢ (((𝑛 gcd 𝑁) ∈ ℤ ∧ 1 ∈ ℤ ∧ ((𝑁 / (𝑛 gcd 𝑁)) ∈ ℤ ∧ (𝑁 / (𝑛 gcd 𝑁)) ≠ 0)) → (((𝑁 / (𝑛 gcd 𝑁)) · (𝑛 gcd 𝑁)) ∥ ((𝑁 / (𝑛 gcd 𝑁)) · 1) ↔ (𝑛 gcd 𝑁) ∥ 1))
78	31, 75, 37, 76, 77	syl112anc 1282	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (((𝑁 / (𝑛 gcd 𝑁)) · (𝑛 gcd 𝑁)) ∥ ((𝑁 / (𝑛 gcd 𝑁)) · 1) ↔ (𝑛 gcd 𝑁) ∥ 1))
79	74, 78	mpbid 147	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) ∥ 1)
80	15, 17	gcdcld 12770	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) ∈ ℕ0)
81		dvds1 12645	. . . . . . . . . . 11 ⊢ ((𝑛 gcd 𝑁) ∈ ℕ0 → ((𝑛 gcd 𝑁) ∥ 1 ↔ (𝑛 gcd 𝑁) = 1))
82	80, 81	syl 14	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((𝑛 gcd 𝑁) ∥ 1 ↔ (𝑛 gcd 𝑁) = 1))
83	79, 82	mpbid 147	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (𝑛 gcd 𝑁) = 1)
84		znunit.u	. . . . . . . . . . 11 ⊢ 𝑈 = (Unit‘𝑌)
85	2, 84, 4	znunit 15103	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ0 ∧ 𝑛 ∈ ℤ) → (((ℤRHom‘𝑌)‘𝑛) ∈ 𝑈 ↔ (𝑛 gcd 𝑁) = 1))
86	43, 15, 85	syl2anc 415	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → (((ℤRHom‘𝑌)‘𝑛) ∈ 𝑈 ↔ (𝑛 gcd 𝑁) = 1))
87	83, 86	mpbird 167	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) ∧ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸) → ((ℤRHom‘𝑌)‘𝑛) ∈ 𝑈)
88	87	ex 115	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) → (((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸 → ((ℤRHom‘𝑌)‘𝑛) ∈ 𝑈))
89		eleq1 2301	. . . . . . . 8 ⊢ (𝑥 = ((ℤRHom‘𝑌)‘𝑛) → (𝑥 ∈ 𝐸 ↔ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸))
90		eleq1 2301	. . . . . . . 8 ⊢ (𝑥 = ((ℤRHom‘𝑌)‘𝑛) → (𝑥 ∈ 𝑈 ↔ ((ℤRHom‘𝑌)‘𝑛) ∈ 𝑈))
91	89, 90	imbi12d 234	. . . . . . 7 ⊢ (𝑥 = ((ℤRHom‘𝑌)‘𝑛) → ((𝑥 ∈ 𝐸 → 𝑥 ∈ 𝑈) ↔ (((ℤRHom‘𝑌)‘𝑛) ∈ 𝐸 → ((ℤRHom‘𝑌)‘𝑛) ∈ 𝑈)))
92	88, 91	syl5ibrcom 157	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) → (𝑥 = ((ℤRHom‘𝑌)‘𝑛) → (𝑥 ∈ 𝐸 → 𝑥 ∈ 𝑈)))
93	92	rexlimdva 2668	. . . . 5 ⊢ (𝑁 ∈ ℕ → (∃𝑛 ∈ ℤ 𝑥 = ((ℤRHom‘𝑌)‘𝑛) → (𝑥 ∈ 𝐸 → 𝑥 ∈ 𝑈)))
94	93	com23 78	. . . 4 ⊢ (𝑁 ∈ ℕ → (𝑥 ∈ 𝐸 → (∃𝑛 ∈ ℤ 𝑥 = ((ℤRHom‘𝑌)‘𝑛) → 𝑥 ∈ 𝑈)))
95	12, 94	mpdd 41	. . 3 ⊢ (𝑁 ∈ ℕ → (𝑥 ∈ 𝐸 → 𝑥 ∈ 𝑈))
96	95	ssrdv 3254	. 2 ⊢ (𝑁 ∈ ℕ → 𝐸 ⊆ 𝑈)
97	7, 84	unitrrg 14685	. . 3 ⊢ (𝑌 ∈ Ring → 𝑈 ⊆ 𝐸)
98	54, 97	syl 14	. 2 ⊢ (𝑁 ∈ ℕ → 𝑈 ⊆ 𝐸)
99	96, 98	eqssd 3265	1 ⊢ (𝑁 ∈ ℕ → 𝐸 = 𝑈)

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 104   ↔ wb 105   = wceq 1402   ∈ wcel 2209   ≠ wne 2420  ∃wrex 2529   ⊆ wss 3220   class class class wbr 4131  ⟶wf 5376  –onto→wfo 5378  ‘cfv 5380  (class class class)co 6088  ℂcc 8184  0cc0 8186  1c1 8187   · cmul 8191   / cdiv 9011  ℕcn 9314  ℕ₀cn0 9575  ℤcz 9654   ∥ cdvds 12579   gcd cgcd 12755  Basecbs 13410  ._rcmulr 13491  0_gc0g 13669  Ringcrg 14407  CRingccrg 14408  Unitcui 14502   RingHom crh 14566  RLRegcrlreg 14672  ℤ_ringczring 15034  ℤRHomczrh 15055  ℤ/nℤczn 15057

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  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-14 2212  ax-ext 2220  ax-coll 4248  ax-sep 4251  ax-nul 4261  ax-pow 4313  ax-pr 4348  ax-un 4580  ax-setind 4686  ax-iinf 4737  ax-cnex 8277  ax-resscn 8278  ax-1cn 8279  ax-1re 8280  ax-icn 8281  ax-addcl 8282  ax-addrcl 8283  ax-mulcl 8284  ax-mulrcl 8285  ax-addcom 8286  ax-mulcom 8287  ax-addass 8288  ax-mulass 8289  ax-distr 8290  ax-i2m1 8291  ax-0lt1 8292  ax-1rid 8293  ax-0id 8294  ax-rnegex 8295  ax-precex 8296  ax-cnre 8297  ax-pre-ltirr 8298  ax-pre-ltwlin 8299  ax-pre-lttrn 8300  ax-pre-apti 8301  ax-pre-ltadd 8302  ax-pre-mulgt0 8303  ax-pre-mulext 8304  ax-arch 8305  ax-caucvg 8306  ax-addf 8308  ax-mulf 8309

This proof depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-tp 3717  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4132  df-opab 4194  df-mpt 4195  df-tr 4232  df-id 4440  df-po 4443  df-iso 4444  df-iord 4513  df-on 4515  df-ilim 4516  df-suc 4518  df-iom 4740  df-xp 4782  df-rel 4783  df-cnv 4784  df-co 4785  df-dm 4786  df-rn 4787  df-res 4788  df-ima 4789  df-iota 5340  df-fun 5382  df-fn 5383  df-f 5384  df-f1 5385  df-fo 5386  df-f1o 5387  df-fv 5388  df-riota 6041  df-ov 6091  df-oprab 6092  df-mpo 6093  df-1st 6378  df-2nd 6379  df-tpos 6521  df-recs 6581  df-frec 6667  df-er 6812  df-ec 6814  df-qs 6818  df-map 6929  df-sup 7331  df-pnf 8369  df-mnf 8370  df-xr 8371  df-ltxr 8372  df-le 8373  df-sub 8507  df-neg 8508  df-reap 8912  df-ap 8919  df-div 9012  df-inn 9315  df-2 9373  df-3 9374  df-4 9375  df-5 9376  df-6 9377  df-7 9378  df-8 9379  df-9 9380  df-n0 9576  df-z 9655  df-dec 9789  df-uz 9938  df-q 10036  df-rp 10072  df-fz 10429  df-fzo 10567  df-fl 10722  df-mod 10781  df-seqfrec 10906  df-exp 10997  df-cj 11629  df-re 11630  df-im 11631  df-rsqrt 11786  df-abs 11787  df-dvds 12580  df-gcd 12756  df-struct 13412  df-ndx 13413  df-slot 13414  df-base 13416  df-sets 13417  df-iress 13418  df-plusg 13503  df-mulr 13504  df-starv 13505  df-sca 13506  df-vsca 13507  df-ip 13508  df-tset 13509  df-ple 13510  df-ds 13512  df-unif 13513  df-0g 13671  df-topgen 13673  df-iimas 13683  df-qus 13684  df-mgm 13735  df-sgrp 13776  df-mnd 13789  df-mhm 13825  df-grp 13867  df-minusg 13868  df-sbg 13869  df-mulg 13982  df-subg 14032  df-nsg 14033  df-eqg 14034  df-ghm 14103  df-cmn 14179  df-abl 14180  df-mgp 14325  df-rng 14339  df-ur 14370  df-srg 14375  df-ring 14409  df-cring 14410  df-oppr 14482  df-dvdsr 14504  df-unit 14505  df-invr 14537  df-rhm 14568  df-subrg 14636  df-rlreg 14675  df-lmod 14734  df-lssm 14799  df-lsp 14833  df-sra 14881  df-rgmod 14882  df-lidl 14915  df-rsp 14916  df-2idl 14946  df-bl 14992  df-mopn 14993  df-fg 14995  df-metu 14996  df-cnfld 15003  df-zring 15035  df-zrh 15058  df-zn 15060

This theorem is used by: (None)