Theorem rngoueqz 38261

Description: Obsolete as of 23-Jan-2020. Use 0ring01eqbi 20509 instead. In a unital ring the zero equals the ring unity iff the ring is the zero ring. (Contributed by FL, 14-Feb-2010.) (New usage is discouraged.)

Hypotheses

Ref	Expression
uznzr.1	⊢ 𝐺 = (1st ‘𝑅)
uznzr.2	⊢ 𝐻 = (2nd ‘𝑅)
uznzr.3	⊢ 𝑍 = (GId‘𝐺)
uznzr.4	⊢ 𝑈 = (GId‘𝐻)
uznzr.5	⊢ 𝑋 = ran 𝐺

Assertion

Ref	Expression
rngoueqz	⊢ (𝑅 ∈ RingOps → (𝑋 ≈ 1o ↔ 𝑈 = 𝑍))

Proof of Theorem rngoueqz

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		uznzr.1	. . . 4 ⊢ 𝐺 = (1st ‘𝑅)
2		uznzr.5	. . . 4 ⊢ 𝑋 = ran 𝐺
3		uznzr.3	. . . 4 ⊢ 𝑍 = (GId‘𝐺)
4	1, 2, 3	rngo0cl 38240	. . 3 ⊢ (𝑅 ∈ RingOps → 𝑍 ∈ 𝑋)
5		en1eqsn 9185	. . . . . 6 ⊢ ((𝑍 ∈ 𝑋 ∧ 𝑋 ≈ 1o) → 𝑋 = {𝑍})
6	1	rneqi 5892	. . . . . . . 8 ⊢ ran 𝐺 = ran (1st ‘𝑅)
7		uznzr.2	. . . . . . . 8 ⊢ 𝐻 = (2nd ‘𝑅)
8		uznzr.4	. . . . . . . 8 ⊢ 𝑈 = (GId‘𝐻)
9	6, 7, 8	rngo1cl 38260	. . . . . . 7 ⊢ (𝑅 ∈ RingOps → 𝑈 ∈ ran 𝐺)
10		eleq2 2825	. . . . . . . . . 10 ⊢ (𝑋 = {𝑍} → (𝑈 ∈ 𝑋 ↔ 𝑈 ∈ {𝑍}))
11	10	biimpd 229	. . . . . . . . 9 ⊢ (𝑋 = {𝑍} → (𝑈 ∈ 𝑋 → 𝑈 ∈ {𝑍}))
12		elsni 4584	. . . . . . . . 9 ⊢ (𝑈 ∈ {𝑍} → 𝑈 = 𝑍)
13	11, 12	syl6com 37	. . . . . . . 8 ⊢ (𝑈 ∈ 𝑋 → (𝑋 = {𝑍} → 𝑈 = 𝑍))
14	2	eqcomi 2745	. . . . . . . 8 ⊢ ran 𝐺 = 𝑋
15	13, 14	eleq2s 2854	. . . . . . 7 ⊢ (𝑈 ∈ ran 𝐺 → (𝑋 = {𝑍} → 𝑈 = 𝑍))
16	9, 15	syl 17	. . . . . 6 ⊢ (𝑅 ∈ RingOps → (𝑋 = {𝑍} → 𝑈 = 𝑍))
17	5, 16	syl5com 31	. . . . 5 ⊢ ((𝑍 ∈ 𝑋 ∧ 𝑋 ≈ 1o) → (𝑅 ∈ RingOps → 𝑈 = 𝑍))
18	17	ex 412	. . . 4 ⊢ (𝑍 ∈ 𝑋 → (𝑋 ≈ 1o → (𝑅 ∈ RingOps → 𝑈 = 𝑍)))
19	18	com23 86	. . 3 ⊢ (𝑍 ∈ 𝑋 → (𝑅 ∈ RingOps → (𝑋 ≈ 1o → 𝑈 = 𝑍)))
20	4, 19	mpcom 38	. 2 ⊢ (𝑅 ∈ RingOps → (𝑋 ≈ 1o → 𝑈 = 𝑍))
21	1, 2	rngone0 38232	. . 3 ⊢ (𝑅 ∈ RingOps → 𝑋 ≠ ∅)
22		oveq2 7375	. . . . . 6 ⊢ (𝑈 = 𝑍 → (𝑥𝐻𝑈) = (𝑥𝐻𝑍))
23	22	ralrimivw 3133	. . . . 5 ⊢ (𝑈 = 𝑍 → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍))
24	3, 2, 1, 7	rngorz 38244	. . . . . . 7 ⊢ ((𝑅 ∈ RingOps ∧ 𝑥 ∈ 𝑋) → (𝑥𝐻𝑍) = 𝑍)
25	24	ralrimiva 3129	. . . . . 6 ⊢ (𝑅 ∈ RingOps → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍)
26	2, 6	eqtri 2759	. . . . . . . . 9 ⊢ 𝑋 = ran (1st ‘𝑅)
27	7, 26, 8	rngoridm 38259	. . . . . . . 8 ⊢ ((𝑅 ∈ RingOps ∧ 𝑥 ∈ 𝑋) → (𝑥𝐻𝑈) = 𝑥)
28	27	ralrimiva 3129	. . . . . . 7 ⊢ (𝑅 ∈ RingOps → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥)
29		r19.26 3097	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ 𝑋 ((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ↔ (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥 ∧ ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍)))
30		r19.26 3097	. . . . . . . . . . . 12 ⊢ (∀𝑥 ∈ 𝑋 (((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) ↔ (∀𝑥 ∈ 𝑋 ((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍))
31		eqtr 2756	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 = (𝑥𝐻𝑈) ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) → 𝑥 = (𝑥𝐻𝑍))
32		eqtr 2756	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 = (𝑥𝐻𝑍) ∧ (𝑥𝐻𝑍) = 𝑍) → 𝑥 = 𝑍)
33	32	ex 412	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍))
34	31, 33	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥 = (𝑥𝐻𝑈) ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍))
35	34	ex 412	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = (𝑥𝐻𝑈) → ((𝑥𝐻𝑈) = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍)))
36	35	eqcoms 2744	. . . . . . . . . . . . . . 15 ⊢ ((𝑥𝐻𝑈) = 𝑥 → ((𝑥𝐻𝑈) = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍)))
37	36	imp31 417	. . . . . . . . . . . . . 14 ⊢ ((((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) → 𝑥 = 𝑍)
38	37	ralimi 3074	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ 𝑋 (((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) → ∀𝑥 ∈ 𝑋 𝑥 = 𝑍)
39		eqsn 4772	. . . . . . . . . . . . . . 15 ⊢ (𝑋 ≠ ∅ → (𝑋 = {𝑍} ↔ ∀𝑥 ∈ 𝑋 𝑥 = 𝑍))
40		ensn1g 8969	. . . . . . . . . . . . . . . . 17 ⊢ (𝑍 ∈ 𝑋 → {𝑍} ≈ 1o)
41	4, 40	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ RingOps → {𝑍} ≈ 1o)
42		breq1 5088	. . . . . . . . . . . . . . . 16 ⊢ (𝑋 = {𝑍} → (𝑋 ≈ 1o ↔ {𝑍} ≈ 1o))
43	41, 42	imbitrrid 246	. . . . . . . . . . . . . . 15 ⊢ (𝑋 = {𝑍} → (𝑅 ∈ RingOps → 𝑋 ≈ 1o))
44	39, 43	biimtrrdi 254	. . . . . . . . . . . . . 14 ⊢ (𝑋 ≠ ∅ → (∀𝑥 ∈ 𝑋 𝑥 = 𝑍 → (𝑅 ∈ RingOps → 𝑋 ≈ 1o)))
45	44	com3l 89	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ 𝑋 𝑥 = 𝑍 → (𝑅 ∈ RingOps → (𝑋 ≠ ∅ → 𝑋 ≈ 1o)))
46	38, 45	syl 17	. . . . . . . . . . . 12 ⊢ (∀𝑥 ∈ 𝑋 (((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) → (𝑅 ∈ RingOps → (𝑋 ≠ ∅ → 𝑋 ≈ 1o)))
47	30, 46	sylbir 235	. . . . . . . . . . 11 ⊢ ((∀𝑥 ∈ 𝑋 ((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍) → (𝑅 ∈ RingOps → (𝑋 ≠ ∅ → 𝑋 ≈ 1o)))
48	47	ex 412	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ 𝑋 ((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍 → (𝑅 ∈ RingOps → (𝑋 ≠ ∅ → 𝑋 ≈ 1o))))
49	29, 48	sylbir 235	. . . . . . . . 9 ⊢ ((∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥 ∧ ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍 → (𝑅 ∈ RingOps → (𝑋 ≠ ∅ → 𝑋 ≈ 1o))))
50	49	ex 412	. . . . . . . 8 ⊢ (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥 → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍) → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍 → (𝑅 ∈ RingOps → (𝑋 ≠ ∅ → 𝑋 ≈ 1o)))))
51	50	com24 95	. . . . . . 7 ⊢ (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥 → (𝑅 ∈ RingOps → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍 → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍) → (𝑋 ≠ ∅ → 𝑋 ≈ 1o)))))
52	28, 51	mpcom 38	. . . . . 6 ⊢ (𝑅 ∈ RingOps → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍 → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍) → (𝑋 ≠ ∅ → 𝑋 ≈ 1o))))
53	25, 52	mpd 15	. . . . 5 ⊢ (𝑅 ∈ RingOps → (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍) → (𝑋 ≠ ∅ → 𝑋 ≈ 1o)))
54	23, 53	syl5com 31	. . . 4 ⊢ (𝑈 = 𝑍 → (𝑅 ∈ RingOps → (𝑋 ≠ ∅ → 𝑋 ≈ 1o)))
55	54	com13 88	. . 3 ⊢ (𝑋 ≠ ∅ → (𝑅 ∈ RingOps → (𝑈 = 𝑍 → 𝑋 ≈ 1o)))
56	21, 55	mpcom 38	. 2 ⊢ (𝑅 ∈ RingOps → (𝑈 = 𝑍 → 𝑋 ≈ 1o))
57	20, 56	impbid 212	1 ⊢ (𝑅 ∈ RingOps → (𝑋 ≈ 1o ↔ 𝑈 = 𝑍))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542   ∈ wcel 2114   ≠ wne 2932  ∀wral 3051  ∅c0 4273  {csn 4567   class class class wbr 5085  ran crn 5632  ‘cfv 6498  (class class class)co 7367  1^st c1st 7940  2^nd c2nd 7941  1_oc1o 8398   ≈ cen 8890  GIdcgi 30561  RingOpscrngo 38215

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2708  ax-sep 5231  ax-nul 5241  ax-pr 5375  ax-un 7689

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3062  df-rmo 3342  df-reu 3343  df-rab 3390  df-v 3431  df-sbc 3729  df-csb 3838  df-dif 3892  df-un 3894  df-in 3896  df-ss 3906  df-nul 4274  df-if 4467  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4851  df-iun 4935  df-br 5086  df-opab 5148  df-mpt 5167  df-id 5526  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-suc 6329  df-iota 6454  df-fun 6500  df-fn 6501  df-f 6502  df-f1 6503  df-fo 6504  df-f1o 6505  df-fv 6506  df-riota 7324  df-ov 7370  df-1st 7942  df-2nd 7943  df-1o 8405  df-en 8894  df-grpo 30564  df-gid 30565  df-ablo 30616  df-ass 38164  df-exid 38166  df-mgmOLD 38170  df-sgrOLD 38182  df-mndo 38188  df-rngo 38216

This theorem is referenced by:  dvrunz  38275  isdmn3  38395