Theorem isdrng 20755

Description: The predicate "is a division ring". (Contributed by NM, 18-Oct-2012.) (Revised by Mario Carneiro, 2-Dec-2014.)

Hypotheses

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

Assertion

Ref	Expression
isdrng	⊢ (𝑅 ∈ DivRing ↔ (𝑅 ∈ Ring ∧ 𝑈 = (𝐵 ∖ { 0 })))

Proof of Theorem isdrng

Dummy variable 𝑟 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		fveq2 6920	. . . 4 ⊢ (𝑟 = 𝑅 → (Unit‘𝑟) = (Unit‘𝑅))
2		isdrng.u	. . . 4 ⊢ 𝑈 = (Unit‘𝑅)
3	1, 2	eqtr4di 2798	. . 3 ⊢ (𝑟 = 𝑅 → (Unit‘𝑟) = 𝑈)
4		fveq2 6920	. . . . 5 ⊢ (𝑟 = 𝑅 → (Base‘𝑟) = (Base‘𝑅))
5		isdrng.b	. . . . 5 ⊢ 𝐵 = (Base‘𝑅)
6	4, 5	eqtr4di 2798	. . . 4 ⊢ (𝑟 = 𝑅 → (Base‘𝑟) = 𝐵)
7		fveq2 6920	. . . . . 6 ⊢ (𝑟 = 𝑅 → (0g‘𝑟) = (0g‘𝑅))
8		isdrng.z	. . . . . 6 ⊢ 0 = (0g‘𝑅)
9	7, 8	eqtr4di 2798	. . . . 5 ⊢ (𝑟 = 𝑅 → (0g‘𝑟) = 0 )
10	9	sneqd 4660	. . . 4 ⊢ (𝑟 = 𝑅 → {(0g‘𝑟)} = { 0 })
11	6, 10	difeq12d 4150	. . 3 ⊢ (𝑟 = 𝑅 → ((Base‘𝑟) ∖ {(0g‘𝑟)}) = (𝐵 ∖ { 0 }))
12	3, 11	eqeq12d 2756	. 2 ⊢ (𝑟 = 𝑅 → ((Unit‘𝑟) = ((Base‘𝑟) ∖ {(0g‘𝑟)}) ↔ 𝑈 = (𝐵 ∖ { 0 })))
13		df-drng 20753	. 2 ⊢ DivRing = {𝑟 ∈ Ring ∣ (Unit‘𝑟) = ((Base‘𝑟) ∖ {(0g‘𝑟)})}
14	12, 13	elrab2 3711	1 ⊢ (𝑅 ∈ DivRing ↔ (𝑅 ∈ Ring ∧ 𝑈 = (𝐵 ∖ { 0 })))

Syntax hints:   ↔ wb 206   ∧ wa 395   = wceq 1537   ∈ wcel 2108   ∖ cdif 3973  {csn 4648  ‘cfv 6573  Basecbs 17258  0_gc0g 17499  Ringcrg 20260  Unitcui 20381  DivRingcdr 20751

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-ext 2711

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-sb 2065  df-clab 2718  df-cleq 2732  df-clel 2819  df-rab 3444  df-v 3490  df-dif 3979  df-un 3981  df-ss 3993  df-nul 4353  df-if 4549  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-br 5167  df-iota 6525  df-fv 6581  df-drng 20753

This theorem is referenced by:  drngunit  20756  drngui  20757  drngring  20758  isdrng2  20765  drngprop  20766  drngid  20768  drngdomn  20771  opprdrng  20786  drngpropd  20791  fidomndrng  20796  issubdrg  20803  imadrhmcl  20820  cntzsdrg  20825  zringndrg  21502  istdrg2  24207  cvsunit  25183  cphreccllem  25231  isdrng4  33264  sradrng  33598  assafld  33650  zrhunitpreima  33924  aks5lem7  42157