pzriprnglem10 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > pzriprnglem10		Structured version Visualization version GIF version

Theorem pzriprnglem10 21443

Description: Lemma 10 for pzriprng 21450: The equivalence classes of 𝑅 modulo 𝐽. (Contributed by AV, 22-Mar-2025.)

**Hypotheses**
Ref	Expression
pzriprng.r	⊢ 𝑅 = (ℤ_ring ×_s ℤ_ring)
pzriprng.i	⊢ 𝐼 = (ℤ × {0})
pzriprng.j	⊢ 𝐽 = (𝑅 ↾_s 𝐼)
pzriprng.1	⊢ 1 = (1_r‘𝐽)
pzriprng.g	⊢ ∼ = (𝑅 ~_QG 𝐼)

**Assertion**
Ref	Expression
pzriprnglem10	⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → [⟨𝑋, 𝑌⟩] ∼ = (ℤ × {𝑌}))

Proof of Theorem pzriprnglem10 Dummy variables 𝑥 𝑦 𝑎 𝑏 𝑐 𝑒 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		pzriprng.r	. . . . 5 ⊢ 𝑅 = (ℤ_ring ×_s ℤ_ring)
2	1	pzriprnglem1 21434	. . . 4 ⊢ 𝑅 ∈ Rng
3		rnggrp 20091	. . . 4 ⊢ (𝑅 ∈ Rng → 𝑅 ∈ Grp)
4	2, 3	ax-mp 5	. . 3 ⊢ 𝑅 ∈ Grp
5		pzriprng.i	. . . . 5 ⊢ 𝐼 = (ℤ × {0})
6		0z 12497	. . . . . 6 ⊢ 0 ∈ ℤ
7		snssi 4762	. . . . . 6 ⊢ (0 ∈ ℤ → {0} ⊆ ℤ)
8		xpss2 5642	. . . . . 6 ⊢ ({0} ⊆ ℤ → (ℤ × {0}) ⊆ (ℤ × ℤ))
9	6, 7, 8	mp2b 10	. . . . 5 ⊢ (ℤ × {0}) ⊆ (ℤ × ℤ)
10	5, 9	eqsstri 3978	. . . 4 ⊢ 𝐼 ⊆ (ℤ × ℤ)
11	10	a1i 11	. . 3 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → 𝐼 ⊆ (ℤ × ℤ))
12		opelxpi 5659	. . 3 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ⟨𝑋, 𝑌⟩ ∈ (ℤ × ℤ))
13	1	pzriprnglem2 21435	. . . . 5 ⊢ (Base‘𝑅) = (ℤ × ℤ)
14	13	eqcomi 2743	. . . 4 ⊢ (ℤ × ℤ) = (Base‘𝑅)
15		pzriprng.g	. . . 4 ⊢ ∼ = (𝑅 ~_QG 𝐼)
16		eqid 2734	. . . 4 ⊢ (+_g‘𝑅) = (+_g‘𝑅)
17	14, 15, 16	eqglact 19106	. . 3 ⊢ ((𝑅 ∈ Grp ∧ 𝐼 ⊆ (ℤ × ℤ) ∧ ⟨𝑋, 𝑌⟩ ∈ (ℤ × ℤ)) → [⟨𝑋, 𝑌⟩] ∼ = ((𝑥 ∈ (ℤ × ℤ) ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)) “ 𝐼))
18	4, 11, 12, 17	mp3an2i 1468	. 2 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → [⟨𝑋, 𝑌⟩] ∼ = ((𝑥 ∈ (ℤ × ℤ) ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)) “ 𝐼))
19	11	mptimass 6030	. 2 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ((𝑥 ∈ (ℤ × ℤ) ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)) “ 𝐼) = ran (𝑥 ∈ 𝐼 ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)))
20		eqid 2734	. . . . 5 ⊢ (𝑥 ∈ 𝐼 ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)) = (𝑥 ∈ 𝐼 ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥))
21	20	rnmpt 5904	. . . 4 ⊢ ran (𝑥 ∈ 𝐼 ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)) = {𝑒 ∣ ∃𝑥 ∈ 𝐼 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)}
22	21	a1i 11	. . 3 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ran (𝑥 ∈ 𝐼 ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)) = {𝑒 ∣ ∃𝑥 ∈ 𝐼 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)})
23	5	rexeqi 3293	. . . . . 6 ⊢ (∃𝑥 ∈ 𝐼 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥) ↔ ∃𝑥 ∈ (ℤ × {0})𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥))
24		oveq2 7364	. . . . . . . 8 ⊢ (𝑥 = ⟨𝑎, 𝑏⟩ → (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥) = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩))
25	24	eqeq2d 2745	. . . . . . 7 ⊢ (𝑥 = ⟨𝑎, 𝑏⟩ → (𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥) ↔ 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩)))
26	25	rexxp 5789	. . . . . 6 ⊢ (∃𝑥 ∈ (ℤ × {0})𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥) ↔ ∃𝑎 ∈ ℤ ∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩))
27	23, 26	bitri 275	. . . . 5 ⊢ (∃𝑥 ∈ 𝐼 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥) ↔ ∃𝑎 ∈ ℤ ∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩))
28	27	a1i 11	. . . 4 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑥 ∈ 𝐼 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥) ↔ ∃𝑎 ∈ ℤ ∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩)))
29	28	abbidv 2800	. . 3 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → {𝑒 ∣ ∃𝑥 ∈ 𝐼 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)} = {𝑒 ∣ ∃𝑎 ∈ ℤ ∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩)})
30		c0ex 11124	. . . . . . . 8 ⊢ 0 ∈ V
31		opeq2 4828	. . . . . . . . . 10 ⊢ (𝑏 = 0 → ⟨𝑎, 𝑏⟩ = ⟨𝑎, 0⟩)
32	31	oveq2d 7372	. . . . . . . . 9 ⊢ (𝑏 = 0 → (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩) = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 0⟩))
33	32	eqeq2d 2745	. . . . . . . 8 ⊢ (𝑏 = 0 → (𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩) ↔ 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 0⟩)))
34	30, 33	rexsn 4637	. . . . . . 7 ⊢ (∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩) ↔ 𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 0⟩))
35		zringbas 21406	. . . . . . . . 9 ⊢ ℤ = (Base‘ℤ_ring)
36		zringring 21402	. . . . . . . . . 10 ⊢ ℤ_ring ∈ Ring
37	36	a1i 11	. . . . . . . . 9 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → ℤ_ring ∈ Ring)
38		simpll 766	. . . . . . . . 9 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → 𝑋 ∈ ℤ)
39		simplr 768	. . . . . . . . 9 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → 𝑌 ∈ ℤ)
40		simpr 484	. . . . . . . . 9 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → 𝑎 ∈ ℤ)
41		0zd 12498	. . . . . . . . 9 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → 0 ∈ ℤ)
42	38, 40	zaddcld 12598	. . . . . . . . 9 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → (𝑋 + 𝑎) ∈ ℤ)
43		simpr 484	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → 𝑌 ∈ ℤ)
44		0zd 12498	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → 0 ∈ ℤ)
45	43, 44	zaddcld 12598	. . . . . . . . . 10 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (𝑌 + 0) ∈ ℤ)
46	45	adantr 480	. . . . . . . . 9 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → (𝑌 + 0) ∈ ℤ)
47		zringplusg 21407	. . . . . . . . 9 ⊢ + = (+_g‘ℤ_ring)
48	1, 35, 35, 37, 37, 38, 39, 40, 41, 42, 46, 47, 47, 16	xpsadd 17493	. . . . . . . 8 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 0⟩) = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩)
49	48	eqeq2d 2745	. . . . . . 7 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → (𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 0⟩) ↔ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩))
50	34, 49	bitrid 283	. . . . . 6 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → (∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩) ↔ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩))
51	50	rexbidva 3156	. . . . 5 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑎 ∈ ℤ ∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩) ↔ ∃𝑎 ∈ ℤ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩))
52	51	abbidv 2800	. . . 4 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → {𝑒 ∣ ∃𝑎 ∈ ℤ ∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩)} = {𝑒 ∣ ∃𝑎 ∈ ℤ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩})
53		iunab 5005	. . . . . 6 ⊢ ∪ 𝑎 ∈ ℤ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩} = {𝑒 ∣ ∃𝑎 ∈ ℤ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩}
54	53	eqcomi 2743	. . . . 5 ⊢ {𝑒 ∣ ∃𝑎 ∈ ℤ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩} = ∪ 𝑎 ∈ ℤ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩}
55	54	a1i 11	. . . 4 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → {𝑒 ∣ ∃𝑎 ∈ ℤ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩} = ∪ 𝑎 ∈ ℤ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩})
56		zcn 12491	. . . . . . . . . . 11 ⊢ (𝑌 ∈ ℤ → 𝑌 ∈ ℂ)
57	56	adantl 481	. . . . . . . . . 10 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → 𝑌 ∈ ℂ)
58	57	addridd 11331	. . . . . . . . 9 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (𝑌 + 0) = 𝑌)
59	58	opeq2d 4834	. . . . . . . 8 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩ = ⟨(𝑋 + 𝑎), 𝑌⟩)
60	59	eqeq2d 2745	. . . . . . 7 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩ ↔ 𝑒 = ⟨(𝑋 + 𝑎), 𝑌⟩))
61	60	abbidv 2800	. . . . . 6 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩} = {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), 𝑌⟩})
62	61	iuneq2d 4975	. . . . 5 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ∪ 𝑎 ∈ ℤ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩} = ∪ 𝑎 ∈ ℤ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), 𝑌⟩})
63		df-sn 4579	. . . . . . . . 9 ⊢ {⟨(𝑋 + 𝑎), 𝑌⟩} = {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), 𝑌⟩}
64	63	eqcomi 2743	. . . . . . . 8 ⊢ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), 𝑌⟩} = {⟨(𝑋 + 𝑎), 𝑌⟩}
65	64	a1i 11	. . . . . . 7 ⊢ (𝑎 ∈ ℤ → {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), 𝑌⟩} = {⟨(𝑋 + 𝑎), 𝑌⟩})
66	65	iuneq2i 4966	. . . . . 6 ⊢ ∪ 𝑎 ∈ ℤ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), 𝑌⟩} = ∪ 𝑎 ∈ ℤ {⟨(𝑋 + 𝑎), 𝑌⟩}
67	66	a1i 11	. . . . 5 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ∪ 𝑎 ∈ ℤ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), 𝑌⟩} = ∪ 𝑎 ∈ ℤ {⟨(𝑋 + 𝑎), 𝑌⟩})
68		velsn 4594	. . . . . . . . . 10 ⊢ (𝑦 ∈ {⟨(𝑋 + 𝑎), 𝑌⟩} ↔ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩)
69	68	rexbii 3081	. . . . . . . . 9 ⊢ (∃𝑎 ∈ ℤ 𝑦 ∈ {⟨(𝑋 + 𝑎), 𝑌⟩} ↔ ∃𝑎 ∈ ℤ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩)
70	42	adantr 480	. . . . . . . . . . . . 13 ⊢ ((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) ∧ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩) → (𝑋 + 𝑎) ∈ ℤ)
71		simplr 768	. . . . . . . . . . . . . 14 ⊢ (((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) ∧ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩) ∧ 𝑏 = (𝑋 + 𝑎)) → 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩)
72		opeq1 4827	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝑋 + 𝑎) → ⟨𝑏, 𝑌⟩ = ⟨(𝑋 + 𝑎), 𝑌⟩)
73	72	adantl 481	. . . . . . . . . . . . . 14 ⊢ (((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) ∧ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩) ∧ 𝑏 = (𝑋 + 𝑎)) → ⟨𝑏, 𝑌⟩ = ⟨(𝑋 + 𝑎), 𝑌⟩)
74	71, 73	eqeq12d 2750	. . . . . . . . . . . . 13 ⊢ (((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) ∧ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩) ∧ 𝑏 = (𝑋 + 𝑎)) → (𝑦 = ⟨𝑏, 𝑌⟩ ↔ ⟨(𝑋 + 𝑎), 𝑌⟩ = ⟨(𝑋 + 𝑎), 𝑌⟩))
75		eqidd 2735	. . . . . . . . . . . . 13 ⊢ ((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) ∧ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩) → ⟨(𝑋 + 𝑎), 𝑌⟩ = ⟨(𝑋 + 𝑎), 𝑌⟩)
76	70, 74, 75	rspcedvd 3576	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) ∧ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩) → ∃𝑏 ∈ ℤ 𝑦 = ⟨𝑏, 𝑌⟩)
77	76	ex 412	. . . . . . . . . . 11 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑎 ∈ ℤ) → (𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩ → ∃𝑏 ∈ ℤ 𝑦 = ⟨𝑏, 𝑌⟩))
78	77	rexlimdva 3135	. . . . . . . . . 10 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑎 ∈ ℤ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩ → ∃𝑏 ∈ ℤ 𝑦 = ⟨𝑏, 𝑌⟩))
79		simpr 484	. . . . . . . . . . . . . . 15 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) → 𝑏 ∈ ℤ)
80		simpll 766	. . . . . . . . . . . . . . 15 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) → 𝑋 ∈ ℤ)
81	79, 80	zsubcld 12599	. . . . . . . . . . . . . 14 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) → (𝑏 − 𝑋) ∈ ℤ)
82	81	adantr 480	. . . . . . . . . . . . 13 ⊢ ((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) ∧ 𝑦 = ⟨𝑏, 𝑌⟩) → (𝑏 − 𝑋) ∈ ℤ)
83		simplr 768	. . . . . . . . . . . . . 14 ⊢ (((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) ∧ 𝑦 = ⟨𝑏, 𝑌⟩) ∧ 𝑎 = (𝑏 − 𝑋)) → 𝑦 = ⟨𝑏, 𝑌⟩)
84		oveq2 7364	. . . . . . . . . . . . . . . 16 ⊢ (𝑎 = (𝑏 − 𝑋) → (𝑋 + 𝑎) = (𝑋 + (𝑏 − 𝑋)))
85	84	adantl 481	. . . . . . . . . . . . . . 15 ⊢ (((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) ∧ 𝑦 = ⟨𝑏, 𝑌⟩) ∧ 𝑎 = (𝑏 − 𝑋)) → (𝑋 + 𝑎) = (𝑋 + (𝑏 − 𝑋)))
86	85	opeq1d 4833	. . . . . . . . . . . . . 14 ⊢ (((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) ∧ 𝑦 = ⟨𝑏, 𝑌⟩) ∧ 𝑎 = (𝑏 − 𝑋)) → ⟨(𝑋 + 𝑎), 𝑌⟩ = ⟨(𝑋 + (𝑏 − 𝑋)), 𝑌⟩)
87	83, 86	eqeq12d 2750	. . . . . . . . . . . . 13 ⊢ (((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) ∧ 𝑦 = ⟨𝑏, 𝑌⟩) ∧ 𝑎 = (𝑏 − 𝑋)) → (𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩ ↔ ⟨𝑏, 𝑌⟩ = ⟨(𝑋 + (𝑏 − 𝑋)), 𝑌⟩))
88		zcn 12491	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑋 ∈ ℤ → 𝑋 ∈ ℂ)
89	88	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → 𝑋 ∈ ℂ)
90	89	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) → 𝑋 ∈ ℂ)
91		zcn 12491	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑏 ∈ ℤ → 𝑏 ∈ ℂ)
92	91	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) → 𝑏 ∈ ℂ)
93	90, 92	pncan3d 11493	. . . . . . . . . . . . . . . 16 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) → (𝑋 + (𝑏 − 𝑋)) = 𝑏)
94	93	eqcomd 2740	. . . . . . . . . . . . . . 15 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) → 𝑏 = (𝑋 + (𝑏 − 𝑋)))
95	94	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) ∧ 𝑦 = ⟨𝑏, 𝑌⟩) → 𝑏 = (𝑋 + (𝑏 − 𝑋)))
96	95	opeq1d 4833	. . . . . . . . . . . . 13 ⊢ ((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) ∧ 𝑦 = ⟨𝑏, 𝑌⟩) → ⟨𝑏, 𝑌⟩ = ⟨(𝑋 + (𝑏 − 𝑋)), 𝑌⟩)
97	82, 87, 96	rspcedvd 3576	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) ∧ 𝑦 = ⟨𝑏, 𝑌⟩) → ∃𝑎 ∈ ℤ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩)
98	97	ex 412	. . . . . . . . . . 11 ⊢ (((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) ∧ 𝑏 ∈ ℤ) → (𝑦 = ⟨𝑏, 𝑌⟩ → ∃𝑎 ∈ ℤ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩))
99	98	rexlimdva 3135	. . . . . . . . . 10 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑏 ∈ ℤ 𝑦 = ⟨𝑏, 𝑌⟩ → ∃𝑎 ∈ ℤ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩))
100	78, 99	impbid 212	. . . . . . . . 9 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑎 ∈ ℤ 𝑦 = ⟨(𝑋 + 𝑎), 𝑌⟩ ↔ ∃𝑏 ∈ ℤ 𝑦 = ⟨𝑏, 𝑌⟩))
101	69, 100	bitrid 283	. . . . . . . 8 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑎 ∈ ℤ 𝑦 ∈ {⟨(𝑋 + 𝑎), 𝑌⟩} ↔ ∃𝑏 ∈ ℤ 𝑦 = ⟨𝑏, 𝑌⟩))
102		opeq2 4828	. . . . . . . . . . . . 13 ⊢ (𝑐 = 𝑌 → ⟨𝑏, 𝑐⟩ = ⟨𝑏, 𝑌⟩)
103	102	eqeq2d 2745	. . . . . . . . . . . 12 ⊢ (𝑐 = 𝑌 → (𝑦 = ⟨𝑏, 𝑐⟩ ↔ 𝑦 = ⟨𝑏, 𝑌⟩))
104	103	rexsng 4631	. . . . . . . . . . 11 ⊢ (𝑌 ∈ ℤ → (∃𝑐 ∈ {𝑌}𝑦 = ⟨𝑏, 𝑐⟩ ↔ 𝑦 = ⟨𝑏, 𝑌⟩))
105	104	adantl 481	. . . . . . . . . 10 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑐 ∈ {𝑌}𝑦 = ⟨𝑏, 𝑐⟩ ↔ 𝑦 = ⟨𝑏, 𝑌⟩))
106	105	bicomd 223	. . . . . . . . 9 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (𝑦 = ⟨𝑏, 𝑌⟩ ↔ ∃𝑐 ∈ {𝑌}𝑦 = ⟨𝑏, 𝑐⟩))
107	106	rexbidv 3158	. . . . . . . 8 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑏 ∈ ℤ 𝑦 = ⟨𝑏, 𝑌⟩ ↔ ∃𝑏 ∈ ℤ ∃𝑐 ∈ {𝑌}𝑦 = ⟨𝑏, 𝑐⟩))
108	101, 107	bitrd 279	. . . . . . 7 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (∃𝑎 ∈ ℤ 𝑦 ∈ {⟨(𝑋 + 𝑎), 𝑌⟩} ↔ ∃𝑏 ∈ ℤ ∃𝑐 ∈ {𝑌}𝑦 = ⟨𝑏, 𝑐⟩))
109		eliun 4948	. . . . . . 7 ⊢ (𝑦 ∈ ∪ 𝑎 ∈ ℤ {⟨(𝑋 + 𝑎), 𝑌⟩} ↔ ∃𝑎 ∈ ℤ 𝑦 ∈ {⟨(𝑋 + 𝑎), 𝑌⟩})
110		elxp2 5646	. . . . . . 7 ⊢ (𝑦 ∈ (ℤ × {𝑌}) ↔ ∃𝑏 ∈ ℤ ∃𝑐 ∈ {𝑌}𝑦 = ⟨𝑏, 𝑐⟩)
111	108, 109, 110	3bitr4g 314	. . . . . 6 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → (𝑦 ∈ ∪ 𝑎 ∈ ℤ {⟨(𝑋 + 𝑎), 𝑌⟩} ↔ 𝑦 ∈ (ℤ × {𝑌})))
112	111	eqrdv 2732	. . . . 5 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ∪ 𝑎 ∈ ℤ {⟨(𝑋 + 𝑎), 𝑌⟩} = (ℤ × {𝑌}))
113	62, 67, 112	3eqtrd 2773	. . . 4 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ∪ 𝑎 ∈ ℤ {𝑒 ∣ 𝑒 = ⟨(𝑋 + 𝑎), (𝑌 + 0)⟩} = (ℤ × {𝑌}))
114	52, 55, 113	3eqtrd 2773	. . 3 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → {𝑒 ∣ ∃𝑎 ∈ ℤ ∃𝑏 ∈ {0}𝑒 = (⟨𝑋, 𝑌⟩(+_g‘𝑅)⟨𝑎, 𝑏⟩)} = (ℤ × {𝑌}))
115	22, 29, 114	3eqtrd 2773	. 2 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → ran (𝑥 ∈ 𝐼 ↦ (⟨𝑋, 𝑌⟩(+_g‘𝑅)𝑥)) = (ℤ × {𝑌}))
116	18, 19, 115	3eqtrd 2773	1 ⊢ ((𝑋 ∈ ℤ ∧ 𝑌 ∈ ℤ) → [⟨𝑋, 𝑌⟩] ∼ = (ℤ × {𝑌}))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1541 ∈ wcel 2113 {cab 2712 ∃wrex 3058 ⊆ wss 3899 {csn 4578 ⟨cop 4584 ∪ ciun 4944 ↦ cmpt 5177 × cxp 5620 ran crn 5623 “ cima 5625 ‘cfv 6490 (class class class)co 7356 [cec 8631 ℂcc 11022 0cc0 11024 + caddc 11027 − cmin 11362 ℤcz 12486 Basecbs 17134 ↾_s cress 17155 +_gcplusg 17175 ×_s cxps 17425 Grpcgrp 18861 ~_QG cqg 19050 Rngcrng 20085 1_rcur 20114 Ringcrg 20166 ℤ_ringczring 21399

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2115 ax-9 2123 ax-10 2146 ax-11 2162 ax-12 2182 ax-ext 2706 ax-rep 5222 ax-sep 5239 ax-nul 5249 ax-pow 5308 ax-pr 5375 ax-un 7678 ax-cnex 11080 ax-resscn 11081 ax-1cn 11082 ax-icn 11083 ax-addcl 11084 ax-addrcl 11085 ax-mulcl 11086 ax-mulrcl 11087 ax-mulcom 11088 ax-addass 11089 ax-mulass 11090 ax-distr 11091 ax-i2m1 11092 ax-1ne0 11093 ax-1rid 11094 ax-rnegex 11095 ax-rrecex 11096 ax-cnre 11097 ax-pre-lttri 11098 ax-pre-lttrn 11099 ax-pre-ltadd 11100 ax-pre-mulgt0 11101 ax-addf 11103

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2537 df-eu 2567 df-clab 2713 df-cleq 2726 df-clel 2809 df-nfc 2883 df-ne 2931 df-nel 3035 df-ral 3050 df-rex 3059 df-rmo 3348 df-reu 3349 df-rab 3398 df-v 3440 df-sbc 3739 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4284 df-if 4478 df-pw 4554 df-sn 4579 df-pr 4581 df-tp 4583 df-op 4585 df-uni 4862 df-iun 4946 df-br 5097 df-opab 5159 df-mpt 5178 df-tr 5204 df-id 5517 df-eprel 5522 df-po 5530 df-so 5531 df-fr 5575 df-we 5577 df-xp 5628 df-rel 5629 df-cnv 5630 df-co 5631 df-dm 5632 df-rn 5633 df-res 5634 df-ima 5635 df-pred 6257 df-ord 6318 df-on 6319 df-lim 6320 df-suc 6321 df-iota 6446 df-fun 6492 df-fn 6493 df-f 6494 df-f1 6495 df-fo 6496 df-f1o 6497 df-fv 6498 df-riota 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-om 7807 df-1st 7931 df-2nd 7932 df-frecs 8221 df-wrecs 8252 df-recs 8301 df-rdg 8339 df-1o 8395 df-2o 8396 df-er 8633 df-ec 8635 df-map 8763 df-ixp 8834 df-en 8882 df-dom 8883 df-sdom 8884 df-fin 8885 df-sup 9343 df-inf 9344 df-pnf 11166 df-mnf 11167 df-xr 11168 df-ltxr 11169 df-le 11170 df-sub 11364 df-neg 11365 df-nn 12144 df-2 12206 df-3 12207 df-4 12208 df-5 12209 df-6 12210 df-7 12211 df-8 12212 df-9 12213 df-n0 12400 df-z 12487 df-dec 12606 df-uz 12750 df-fz 13422 df-struct 17072 df-sets 17089 df-slot 17107 df-ndx 17119 df-base 17135 df-ress 17156 df-plusg 17188 df-mulr 17189 df-starv 17190 df-sca 17191 df-vsca 17192 df-ip 17193 df-tset 17194 df-ple 17195 df-ds 17197 df-unif 17198 df-hom 17199 df-cco 17200 df-0g 17359 df-prds 17365 df-imas 17427 df-xps 17429 df-mgm 18563 df-sgrp 18642 df-mnd 18658 df-grp 18864 df-minusg 18865 df-subg 19051 df-eqg 19053 df-cmn 19709 df-abl 19710 df-mgp 20074 df-rng 20086 df-ur 20115 df-ring 20168 df-cring 20169 df-subrng 20477 df-subrg 20501 df-cnfld 21308 df-zring 21400

This theorem is referenced by: pzriprnglem11 21444 pzriprnglem12 21445

W3C validator