rngqiprngfulem4 - Metamath Proof Explorer

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

Theorem rngqiprngfulem4 21372

Description: Lemma 4 for rngqiprngfu 21375. (Contributed by AV, 16-Mar-2025.)

**Hypotheses**
Ref	Expression
rngqiprngfu.r	⊢ (𝜑 → 𝑅 ∈ Rng)
rngqiprngfu.i	⊢ (𝜑 → 𝐼 ∈ (2Ideal‘𝑅))
rngqiprngfu.j	⊢ 𝐽 = (𝑅 ↾_s 𝐼)
rngqiprngfu.u	⊢ (𝜑 → 𝐽 ∈ Ring)
rngqiprngfu.b	⊢ 𝐵 = (Base‘𝑅)
rngqiprngfu.t	⊢ · = (._r‘𝑅)
rngqiprngfu.1	⊢ 1 = (1_r‘𝐽)
rngqiprngfu.g	⊢ ∼ = (𝑅 ~_QG 𝐼)
rngqiprngfu.q	⊢ 𝑄 = (𝑅 /_s ∼ )
rngqiprngfu.v	⊢ (𝜑 → 𝑄 ∈ Ring)
rngqiprngfu.e	⊢ (𝜑 → 𝐸 ∈ (1_r‘𝑄))
rngqiprngfu.m	⊢ − = (-_g‘𝑅)
rngqiprngfu.a	⊢ + = (+_g‘𝑅)
rngqiprngfu.n	⊢ 𝑈 = ((𝐸 − ( 1 · 𝐸)) + 1 )

**Assertion**
Ref	Expression
rngqiprngfulem4	⊢ (𝜑 → [𝑈] ∼ = [𝐸] ∼ )

**Proof of Theorem rngqiprngfulem4**
Step	Hyp	Ref	Expression
1		rngqiprngfu.n	. . . . . 6 ⊢ 𝑈 = ((𝐸 − ( 1 · 𝐸)) + 1 )
2	1	oveq2i 7402	. . . . 5 ⊢ (𝐸 − 𝑈) = (𝐸 − ((𝐸 − ( 1 · 𝐸)) + 1 ))
3	2	a1i 11	. . . 4 ⊢ (𝜑 → (𝐸 − 𝑈) = (𝐸 − ((𝐸 − ( 1 · 𝐸)) + 1 )))
4		rngqiprngfu.b	. . . . 5 ⊢ 𝐵 = (Base‘𝑅)
5		rngqiprngfu.a	. . . . 5 ⊢ + = (+_g‘𝑅)
6		rngqiprngfu.m	. . . . 5 ⊢ − = (-_g‘𝑅)
7		rngqiprngfu.r	. . . . . 6 ⊢ (𝜑 → 𝑅 ∈ Rng)
8		rngabl 20192	. . . . . 6 ⊢ (𝑅 ∈ Rng → 𝑅 ∈ Abel)
9	7, 8	syl 17	. . . . 5 ⊢ (𝜑 → 𝑅 ∈ Abel)
10		rngqiprngfu.i	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ (2Ideal‘𝑅))
11		rngqiprngfu.j	. . . . . 6 ⊢ 𝐽 = (𝑅 ↾_s 𝐼)
12		rngqiprngfu.u	. . . . . 6 ⊢ (𝜑 → 𝐽 ∈ Ring)
13		rngqiprngfu.t	. . . . . 6 ⊢ · = (._r‘𝑅)
14		rngqiprngfu.1	. . . . . 6 ⊢ 1 = (1_r‘𝐽)
15		rngqiprngfu.g	. . . . . 6 ⊢ ∼ = (𝑅 ~_QG 𝐼)
16		rngqiprngfu.q	. . . . . 6 ⊢ 𝑄 = (𝑅 /_s ∼ )
17		rngqiprngfu.v	. . . . . 6 ⊢ (𝜑 → 𝑄 ∈ Ring)
18		rngqiprngfu.e	. . . . . 6 ⊢ (𝜑 → 𝐸 ∈ (1_r‘𝑄))
19	7, 10, 11, 12, 4, 13, 14, 15, 16, 17, 18	rngqiprngfulem2 21370	. . . . 5 ⊢ (𝜑 → 𝐸 ∈ 𝐵)
20		rnggrp 20195	. . . . . . 7 ⊢ (𝑅 ∈ Rng → 𝑅 ∈ Grp)
21	7, 20	syl 17	. . . . . 6 ⊢ (𝜑 → 𝑅 ∈ Grp)
22	7, 10, 11, 12, 4, 13, 14	rngqiprng1elbas 21344	. . . . . . 7 ⊢ (𝜑 → 1 ∈ 𝐵)
23	4, 13	rngcl 20201	. . . . . . 7 ⊢ ((𝑅 ∈ Rng ∧ 1 ∈ 𝐵 ∧ 𝐸 ∈ 𝐵) → ( 1 · 𝐸) ∈ 𝐵)
24	7, 22, 19, 23	syl3anc 1389	. . . . . 6 ⊢ (𝜑 → ( 1 · 𝐸) ∈ 𝐵)
25	4, 6	grpsubcl 19053	. . . . . 6 ⊢ ((𝑅 ∈ Grp ∧ 𝐸 ∈ 𝐵 ∧ ( 1 · 𝐸) ∈ 𝐵) → (𝐸 − ( 1 · 𝐸)) ∈ 𝐵)
26	21, 19, 24, 25	syl3anc 1389	. . . . 5 ⊢ (𝜑 → (𝐸 − ( 1 · 𝐸)) ∈ 𝐵)
27	4, 5, 6, 9, 19, 26, 22	ablsubsub4 19849	. . . 4 ⊢ (𝜑 → ((𝐸 − (𝐸 − ( 1 · 𝐸))) − 1 ) = (𝐸 − ((𝐸 − ( 1 · 𝐸)) + 1 )))
28	4, 6, 9, 19, 24	ablnncan 19851	. . . . 5 ⊢ (𝜑 → (𝐸 − (𝐸 − ( 1 · 𝐸))) = ( 1 · 𝐸))
29	28	oveq1d 7406	. . . 4 ⊢ (𝜑 → ((𝐸 − (𝐸 − ( 1 · 𝐸))) − 1 ) = (( 1 · 𝐸) − 1 ))
30	3, 27, 29	3eqtr2d 2802	. . 3 ⊢ (𝜑 → (𝐸 − 𝑈) = (( 1 · 𝐸) − 1 ))
31		ringrng 20322	. . . . . . . . . 10 ⊢ (𝐽 ∈ Ring → 𝐽 ∈ Rng)
32	12, 31	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝐽 ∈ Rng)
33	11, 32	eqeltrrid 2866	. . . . . . . 8 ⊢ (𝜑 → (𝑅 ↾_s 𝐼) ∈ Rng)
34	7, 10, 33	rng2idlnsg 21324	. . . . . . 7 ⊢ (𝜑 → 𝐼 ∈ (NrmSGrp‘𝑅))
35		nsgsubg 19190	. . . . . . 7 ⊢ (𝐼 ∈ (NrmSGrp‘𝑅) → 𝐼 ∈ (SubGrp‘𝑅))
36	34, 35	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ (SubGrp‘𝑅))
37	7, 10, 11, 12, 4, 13, 14	rngqiprngghmlem1 21345	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝐸 ∈ 𝐵) → ( 1 · 𝐸) ∈ (Base‘𝐽))
38	19, 37	mpdan 697	. . . . . . 7 ⊢ (𝜑 → ( 1 · 𝐸) ∈ (Base‘𝐽))
39		eqid 2761	. . . . . . . 8 ⊢ (Base‘𝐽) = (Base‘𝐽)
40	10, 11, 39	2idlbas 21321	. . . . . . 7 ⊢ (𝜑 → (Base‘𝐽) = 𝐼)
41	38, 40	eleqtrd 2863	. . . . . 6 ⊢ (𝜑 → ( 1 · 𝐸) ∈ 𝐼)
42	39, 14	ringidcl 20302	. . . . . . . 8 ⊢ (𝐽 ∈ Ring → 1 ∈ (Base‘𝐽))
43	12, 42	syl 17	. . . . . . 7 ⊢ (𝜑 → 1 ∈ (Base‘𝐽))
44	43, 40	eleqtrd 2863	. . . . . 6 ⊢ (𝜑 → 1 ∈ 𝐼)
45		eqid 2761	. . . . . . 7 ⊢ (-_g‘𝐽) = (-_g‘𝐽)
46	6, 11, 45	subgsub 19171	. . . . . 6 ⊢ ((𝐼 ∈ (SubGrp‘𝑅) ∧ ( 1 · 𝐸) ∈ 𝐼 ∧ 1 ∈ 𝐼) → (( 1 · 𝐸) − 1 ) = (( 1 · 𝐸)(-_g‘𝐽) 1 ))
47	36, 41, 44, 46	syl3anc 1389	. . . . 5 ⊢ (𝜑 → (( 1 · 𝐸) − 1 ) = (( 1 · 𝐸)(-_g‘𝐽) 1 ))
48	12	ringgrpd 20279	. . . . . 6 ⊢ (𝜑 → 𝐽 ∈ Grp)
49	39, 45	grpsubcl 19053	. . . . . 6 ⊢ ((𝐽 ∈ Grp ∧ ( 1 · 𝐸) ∈ (Base‘𝐽) ∧ 1 ∈ (Base‘𝐽)) → (( 1 · 𝐸)(-_g‘𝐽) 1 ) ∈ (Base‘𝐽))
50	48, 38, 43, 49	syl3anc 1389	. . . . 5 ⊢ (𝜑 → (( 1 · 𝐸)(-_g‘𝐽) 1 ) ∈ (Base‘𝐽))
51	47, 50	eqeltrd 2861	. . . 4 ⊢ (𝜑 → (( 1 · 𝐸) − 1 ) ∈ (Base‘𝐽))
52	51, 40	eleqtrd 2863	. . 3 ⊢ (𝜑 → (( 1 · 𝐸) − 1 ) ∈ 𝐼)
53	30, 52	eqeltrd 2861	. 2 ⊢ (𝜑 → (𝐸 − 𝑈) ∈ 𝐼)
54	7, 10, 11, 12, 4, 13, 14, 15, 16, 17, 18, 6, 5, 1	rngqiprngfulem3 21371	. . 3 ⊢ (𝜑 → 𝑈 ∈ 𝐵)
55	4, 6, 15	qusecsub 19866	. . 3 ⊢ (((𝑅 ∈ Abel ∧ 𝐼 ∈ (SubGrp‘𝑅)) ∧ (𝑈 ∈ 𝐵 ∧ 𝐸 ∈ 𝐵)) → ([𝑈] ∼ = [𝐸] ∼ ↔ (𝐸 − 𝑈) ∈ 𝐼))
56	9, 36, 54, 19, 55	syl22anc 849	. 2 ⊢ (𝜑 → ([𝑈] ∼ = [𝐸] ∼ ↔ (𝐸 − 𝑈) ∈ 𝐼))
57	53, 56	mpbird 259	1 ⊢ (𝜑 → [𝑈] ∼ = [𝐸] ∼ )

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 = wceq 1559 ∈ wcel 2141 ‘cfv 6516 (class class class)co 7391 [cec 8670 Basecbs 17236 ↾_s cress 17257 +_gcplusg 17277 ._rcmulr 17278 /_s cqus 17526 Grpcgrp 18966 -_gcsg 18968 SubGrpcsubg 19153 NrmSGrpcnsg 19154 ~_QG cqg 19155 Abelcabl 19812 Rngcrng 20189 1_rcur 20218 Ringcrg 20270 2Idealc2idl 21307

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1814 ax-4 1828 ax-5 1929 ax-6 1986 ax-7 2027 ax-8 2143 ax-9 2151 ax-10 2174 ax-11 2190 ax-12 2211 ax-ext 2733 ax-rep 5224 ax-sep 5243 ax-nul 5253 ax-pow 5319 ax-pr 5387 ax-un 7713 ax-cnex 11123 ax-resscn 11124 ax-1cn 11125 ax-icn 11126 ax-addcl 11127 ax-addrcl 11128 ax-mulcl 11129 ax-mulrcl 11130 ax-mulcom 11131 ax-addass 11132 ax-mulass 11133 ax-distr 11134 ax-i2m1 11135 ax-1ne0 11136 ax-1rid 11137 ax-rnegex 11138 ax-rrecex 11139 ax-cnre 11140 ax-pre-lttri 11141 ax-pre-lttrn 11142 ax-pre-ltadd 11143 ax-pre-mulgt0 11144

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1098 df-3an 1099 df-tru 1562 df-fal 1572 df-ex 1799 df-nf 1803 df-sb 2090 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3061 df-ral 3076 df-rex 3086 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3455 df-sbc 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4284 df-if 4478 df-pw 4554 df-sn 4580 df-pr 4582 df-tp 4584 df-op 4586 df-uni 4863 df-iun 4948 df-br 5098 df-opab 5160 df-mpt 5179 df-tr 5205 df-id 5538 df-eprel 5543 df-po 5551 df-so 5552 df-fr 5596 df-we 5598 df-xp 5649 df-rel 5650 df-cnv 5651 df-co 5652 df-dm 5653 df-rn 5654 df-res 5655 df-ima 5656 df-pred 6283 df-ord 6344 df-on 6345 df-lim 6346 df-suc 6347 df-iota 6472 df-fun 6518 df-fn 6519 df-f 6520 df-f1 6521 df-fo 6522 df-f1o 6523 df-fv 6524 df-riota 7348 df-ov 7394 df-oprab 7395 df-mpo 7396 df-om 7842 df-1st 7965 df-2nd 7966 df-tpos 8200 df-frecs 8256 df-wrecs 8287 df-recs 8336 df-rdg 8375 df-1o 8431 df-er 8672 df-ec 8674 df-qs 8678 df-en 8922 df-dom 8923 df-sdom 8924 df-fin 8925 df-sup 9382 df-inf 9383 df-pnf 11212 df-mnf 11213 df-xr 11214 df-ltxr 11215 df-le 11216 df-sub 11410 df-neg 11411 df-nn 12205 df-2 12274 df-3 12275 df-4 12276 df-5 12277 df-6 12278 df-7 12279 df-8 12280 df-9 12281 df-n0 12476 df-z 12563 df-dec 12683 df-uz 12834 df-fz 13507 df-struct 17174 df-sets 17191 df-slot 17209 df-ndx 17221 df-base 17237 df-ress 17258 df-plusg 17290 df-mulr 17291 df-sca 17293 df-vsca 17294 df-ip 17295 df-tset 17296 df-ple 17297 df-ds 17299 df-0g 17461 df-imas 17529 df-qus 17530 df-mgm 18665 df-sgrp 18744 df-mnd 18760 df-grp 18969 df-minusg 18970 df-sbg 18971 df-subg 19156 df-nsg 19157 df-eqg 19158 df-cmn 19813 df-abl 19814 df-mgp 20178 df-rng 20190 df-ur 20219 df-ring 20272 df-oppr 20373 df-subrng 20583 df-lss 20987 df-sra 21228 df-rgmod 21229 df-lidl 21266 df-2idl 21308

This theorem is referenced by: rngqiprngfu 21375

W3C validator