Theorem rngoueqz 37900

Description: Obsolete as of 23-Jan-2020. Use 0ring01eqbi 20558 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 37879	. . 3 ⊢ (𝑅 ∈ RingOps → 𝑍 ∈ 𝑋)
5		en1eqsn 9336	. . . . . 6 ⊢ ((𝑍 ∈ 𝑋 ∧ 𝑋 ≈ 1o) → 𝑋 = {𝑍})
6	1	rneqi 5962	. . . . . . . 8 ⊢ ran 𝐺 = ran (1st ‘𝑅)
7		uznzr.2	. . . . . . . 8 ⊢ 𝐻 = (2nd ‘𝑅)
8		uznzr.4	. . . . . . . 8 ⊢ 𝑈 = (GId‘𝐻)
9	6, 7, 8	rngo1cl 37899	. . . . . . 7 ⊢ (𝑅 ∈ RingOps → 𝑈 ∈ ran 𝐺)
10		eleq2 2833	. . . . . . . . . 10 ⊢ (𝑋 = {𝑍} → (𝑈 ∈ 𝑋 ↔ 𝑈 ∈ {𝑍}))
11	10	biimpd 229	. . . . . . . . 9 ⊢ (𝑋 = {𝑍} → (𝑈 ∈ 𝑋 → 𝑈 ∈ {𝑍}))
12		elsni 4665	. . . . . . . . 9 ⊢ (𝑈 ∈ {𝑍} → 𝑈 = 𝑍)
13	11, 12	syl6com 37	. . . . . . . 8 ⊢ (𝑈 ∈ 𝑋 → (𝑋 = {𝑍} → 𝑈 = 𝑍))
14	2	eqcomi 2749	. . . . . . . 8 ⊢ ran 𝐺 = 𝑋
15	13, 14	eleq2s 2862	. . . . . . 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 37871	. . 3 ⊢ (𝑅 ∈ RingOps → 𝑋 ≠ ∅)
22		oveq2 7456	. . . . . 6 ⊢ (𝑈 = 𝑍 → (𝑥𝐻𝑈) = (𝑥𝐻𝑍))
23	22	ralrimivw 3156	. . . . 5 ⊢ (𝑈 = 𝑍 → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍))
24	3, 2, 1, 7	rngorz 37883	. . . . . . 7 ⊢ ((𝑅 ∈ RingOps ∧ 𝑥 ∈ 𝑋) → (𝑥𝐻𝑍) = 𝑍)
25	24	ralrimiva 3152	. . . . . 6 ⊢ (𝑅 ∈ RingOps → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍)
26	2, 6	eqtri 2768	. . . . . . . . 9 ⊢ 𝑋 = ran (1st ‘𝑅)
27	7, 26, 8	rngoridm 37898	. . . . . . . 8 ⊢ ((𝑅 ∈ RingOps ∧ 𝑥 ∈ 𝑋) → (𝑥𝐻𝑈) = 𝑥)
28	27	ralrimiva 3152	. . . . . . 7 ⊢ (𝑅 ∈ RingOps → ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥)
29		r19.26 3117	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ 𝑋 ((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ↔ (∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = 𝑥 ∧ ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑈) = (𝑥𝐻𝑍)))
30		r19.26 3117	. . . . . . . . . . . 12 ⊢ (∀𝑥 ∈ 𝑋 (((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) ↔ (∀𝑥 ∈ 𝑋 ((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ ∀𝑥 ∈ 𝑋 (𝑥𝐻𝑍) = 𝑍))
31		eqtr 2763	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 = (𝑥𝐻𝑈) ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) → 𝑥 = (𝑥𝐻𝑍))
32		eqtr 2763	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 = (𝑥𝐻𝑍) ∧ (𝑥𝐻𝑍) = 𝑍) → 𝑥 = 𝑍)
33	32	ex 412	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍))
34	31, 33	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥 = (𝑥𝐻𝑈) ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍))
35	34	ex 412	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = (𝑥𝐻𝑈) → ((𝑥𝐻𝑈) = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍)))
36	35	eqcoms 2748	. . . . . . . . . . . . . . 15 ⊢ ((𝑥𝐻𝑈) = 𝑥 → ((𝑥𝐻𝑈) = (𝑥𝐻𝑍) → ((𝑥𝐻𝑍) = 𝑍 → 𝑥 = 𝑍)))
37	36	imp31 417	. . . . . . . . . . . . . 14 ⊢ ((((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) → 𝑥 = 𝑍)
38	37	ralimi 3089	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ 𝑋 (((𝑥𝐻𝑈) = 𝑥 ∧ (𝑥𝐻𝑈) = (𝑥𝐻𝑍)) ∧ (𝑥𝐻𝑍) = 𝑍) → ∀𝑥 ∈ 𝑋 𝑥 = 𝑍)
39		eqsn 4854	. . . . . . . . . . . . . . 15 ⊢ (𝑋 ≠ ∅ → (𝑋 = {𝑍} ↔ ∀𝑥 ∈ 𝑋 𝑥 = 𝑍))
40		ensn1g 9084	. . . . . . . . . . . . . . . . 17 ⊢ (𝑍 ∈ 𝑋 → {𝑍} ≈ 1o)
41	4, 40	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ RingOps → {𝑍} ≈ 1o)
42		breq1 5169	. . . . . . . . . . . . . . . 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 2108   ≠ wne 2946  ∀wral 3067  ∅c0 4352  {csn 4648   class class class wbr 5166  ran crn 5701  ‘cfv 6573  (class class class)co 7448  1^st c1st 8028  2^nd c2nd 8029  1_oc1o 8515   ≈ cen 9000  GIdcgi 30522  RingOpscrngo 37854

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-sep 5317  ax-nul 5324  ax-pr 5447  ax-un 7770

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-nul 4353  df-if 4549  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-iun 5017  df-br 5167  df-opab 5229  df-mpt 5250  df-id 5593  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-riota 7404  df-ov 7451  df-1st 8030  df-2nd 8031  df-1o 8522  df-en 9004  df-grpo 30525  df-gid 30526  df-ablo 30577  df-ass 37803  df-exid 37805  df-mgmOLD 37809  df-sgrOLD 37821  df-mndo 37827  df-rngo 37855

This theorem is referenced by:  dvrunz  37914  isdmn3  38034