Theorem drngunit 20809

Description: Elementhood in the set of units when 𝑅 is a division ring. (Contributed by Mario Carneiro, 2-Dec-2014.)

Hypotheses

Ref	Expression
isdrng.b	⊢ 𝐵 = (Base‘𝑅)
isdrng.u	⊢ 𝑈 = (Unit‘𝑅)
isdrng.z	⊢ 0 = (0g‘𝑅)

Assertion

Ref	Expression
drngunit	⊢ (𝑅 ∈ DivRing → (𝑋 ∈ 𝑈 ↔ (𝑋 ∈ 𝐵 ∧ 𝑋 ≠ 0 )))

Proof of Theorem drngunit

Step	Hyp	Ref	Expression
1		isdrng.b	. . . . 5 ⊢ 𝐵 = (Base‘𝑅)
2		isdrng.u	. . . . 5 ⊢ 𝑈 = (Unit‘𝑅)
3		isdrng.z	. . . . 5 ⊢ 0 = (0g‘𝑅)
4	1, 2, 3	isdrng 20808	. . . 4 ⊢ (𝑅 ∈ DivRing ↔ (𝑅 ∈ Ring ∧ 𝑈 = (𝐵 ∖ { 0 })))
5	4	simprbi 502	. . 3 ⊢ (𝑅 ∈ DivRing → 𝑈 = (𝐵 ∖ { 0 }))
6	5	eleq2d 2851	. 2 ⊢ (𝑅 ∈ DivRing → (𝑋 ∈ 𝑈 ↔ 𝑋 ∈ (𝐵 ∖ { 0 })))
7		eldifsn 4749	. 2 ⊢ (𝑋 ∈ (𝐵 ∖ { 0 }) ↔ (𝑋 ∈ 𝐵 ∧ 𝑋 ≠ 0 ))
8	6, 7	bitrdi 290	1 ⊢ (𝑅 ∈ DivRing → (𝑋 ∈ 𝑈 ↔ (𝑋 ∈ 𝐵 ∧ 𝑋 ≠ 0 )))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   = wceq 1563   ∈ wcel 2145   ≠ wne 2960   ∖ cdif 3904  {csn 4585  ‘cfv 6525  Basecbs 17259  0_gc0g 17482  Ringcrg 20306  Unitcui 20428  DivRingcdr 20804

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-ext 2737

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-sb 2094  df-clab 2744  df-cleq 2757  df-clel 2840  df-ne 2961  df-rab 3418  df-v 3459  df-dif 3910  df-un 3912  df-ss 3924  df-nul 4289  df-if 4484  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4869  df-br 5106  df-iota 6481  df-fv 6533  df-drng 20806

This theorem is referenced by:  drngunz  20822  drnginvrcl  20827  drnginvrn0  20828  drnginvrl  20830  drnginvrr  20831  issubdrg  20852  sdrgunit  20868  abvdiv  20901  ornglmullt  20941  orngrmullt  20942  qsssubdrg  21536  redvr  21727  drnguc1p  26292  lgseisenlem3  27499  fxpsdrg  33408  isarchiofld  33432  sdrgdvcl  33535  sdrginvcl  33536  drnglring  33699  1arithufd  33755  ply1asclunit  33781  ply1dg1rt  33787  qqhval2lem  34288  qqhf  34293  matunitlindf  38129  fldhmf1  42719  lincreslvec3  49113  isldepslvec2  49116