Theorem rngoueqz 37927

Description: Obsolete as of 23-Jan-2020. Use 0ring01eqbi 20549 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 37906	. . 3 ⊢ (𝑅 ∈ RingOps → 𝑍 ∈ 𝑋)
5		en1eqsn 9306	. . . . . 6 ⊢ ((𝑍 ∈ 𝑋 ∧ 𝑋 ≈ 1o) → 𝑋 = {𝑍})
6	1	rneqi 5951	. . . . . . . 8 ⊢ ran 𝐺 = ran (1st ‘𝑅)
7		uznzr.2	. . . . . . . 8 ⊢ 𝐻 = (2nd ‘𝑅)
8		uznzr.4	. . . . . . . 8 ⊢ 𝑈 = (GId‘𝐻)
9	6, 7, 8	rngo1cl 37926	. . . . . . 7 ⊢ (𝑅 ∈ RingOps → 𝑈 ∈ ran 𝐺)
10		eleq2 2828	. . . . . . . . . 10 ⊢ (𝑋 = {𝑍} → (𝑈 ∈ 𝑋 ↔ 𝑈 ∈ {𝑍}))
11	10	biimpd 229	. . . . . . . . 9 ⊢ (𝑋 = {𝑍} → (𝑈 ∈ 𝑋 → 𝑈 ∈ {𝑍}))
12		elsni 4648	. . . . . . . . 9 ⊢ (𝑈 ∈ {𝑍} → 𝑈 = 𝑍)
13	11, 12	syl6com 37	. . . . . . . 8 ⊢ (𝑈 ∈ 𝑋 → (𝑋 = {𝑍} → 𝑈 = 𝑍))
14	2	eqcomi 2744	. . . . . . . 8 ⊢ ran 𝐺 = 𝑋
15	13, 14	eleq2s 2857	. . . . . . 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 37898	. . 3 ⊢ (𝑅 ∈ RingOps → 𝑋 ≠ ∅)
22		oveq2 7439	. . . . . 6 ⊢ (𝑈 = 𝑍 → (𝑥𝐻𝑈) = (𝑥𝐻𝑍))
23	22	ralrimivw 3148	. . . . 5 ⊢ (𝑈 = 𝑍 → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍))
24	3, 2, 1, 7	rngorz 37910	. . . . . . 7 ⊢ ((𝑅 ∈ RingOps ∧ 𝑥 ∈ 𝑋) → (𝑥𝐻𝑍) = 𝑍)
25	24	ralrimiva 3144	. . . . . 6 ⊢ (𝑅 ∈ RingOps → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍)
26	2, 6	eqtri 2763	. . . . . . . . 9 ⊢ 𝑋 = ran (1st ‘𝑅)
27	7, 26, 8	rngoridm 37925	. . . . . . . 8 ⊢ ((𝑅 ∈ RingOps ∧ 𝑥 ∈ 𝑋) → (𝑥𝐻𝑈) = 𝑥)
28	27	ralrimiva 3144	. . . . . . 7 ⊢ (𝑅 ∈ RingOps → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥)
29		r19.26 3109	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ 𝑋 ((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ↔ (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥 ∧ ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍)))
30		r19.26 3109	. . . . . . . . . . . 12 ⊢ (∀𝑥 ∈ 𝑋 (((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) ↔ (∀𝑥 ∈ 𝑋 ((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍))
31		eqtr 2758	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 = (𝑥𝐻𝑈) ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) → 𝑥 = (𝑥𝐻𝑍))
32		eqtr 2758	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 = (𝑥𝐻𝑍) ∧ (𝑥𝐻𝑍) = 𝑍) → 𝑥 = 𝑍)
33	32	ex 412	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍))
34	31, 33	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥 = (𝑥𝐻𝑈) ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍))
35	34	ex 412	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = (𝑥𝐻𝑈) → ((𝑥𝐻𝑈) = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍)))
36	35	eqcoms 2743	. . . . . . . . . . . . . . 15 ⊢ ((𝑥𝐻𝑈) = 𝑥 → ((𝑥𝐻𝑈) = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍)))
37	36	imp31 417	. . . . . . . . . . . . . 14 ⊢ ((((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) → 𝑥 = 𝑍)
38	37	ralimi 3081	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ 𝑋 (((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) → ∀𝑥 ∈ 𝑋 𝑥 = 𝑍)
39		eqsn 4834	. . . . . . . . . . . . . . 15 ⊢ (𝑋 ≠ ∅ → (𝑋 = {𝑍} ↔ ∀𝑥 ∈ 𝑋 𝑥 = 𝑍))
40		ensn1g 9061	. . . . . . . . . . . . . . . . 17 ⊢ (𝑍 ∈ 𝑋 → {𝑍} ≈ 1o)
41	4, 40	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ RingOps → {𝑍} ≈ 1o)
42		breq1 5151	. . . . . . . . . . . . . . . 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 1537   ∈ wcel 2106   ≠ wne 2938  ∀wral 3059  ∅c0 4339  {csn 4631   class class class wbr 5148  ran crn 5690  ‘cfv 6563  (class class class)co 7431  1^st c1st 8011  2^nd c2nd 8012  1_oc1o 8498   ≈ cen 8981  GIdcgi 30519  RingOpscrngo 37881

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pr 5438  ax-un 7754

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-rmo 3378  df-reu 3379  df-rab 3434  df-v 3480  df-sbc 3792  df-csb 3909  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-nul 4340  df-if 4532  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-iun 4998  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5583  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-suc 6392  df-iota 6516  df-fun 6565  df-fn 6566  df-f 6567  df-f1 6568  df-fo 6569  df-f1o 6570  df-fv 6571  df-riota 7388  df-ov 7434  df-1st 8013  df-2nd 8014  df-1o 8505  df-en 8985  df-grpo 30522  df-gid 30523  df-ablo 30574  df-ass 37830  df-exid 37832  df-mgmOLD 37836  df-sgrOLD 37848  df-mndo 37854  df-rngo 37882

This theorem is referenced by:  dvrunz  37941  isdmn3  38061