Theorem rrextdrg 31250

Description: An extension of ℝ is a division ring. (Contributed by Thierry Arnoux, 2-May-2018.)

Assertion

Ref	Expression
rrextdrg	⊢ (𝑅 ∈ ℝExt → 𝑅 ∈ DivRing)

Proof of Theorem rrextdrg

Step	Hyp	Ref	Expression
1		eqid 2821	. . . 4 ⊢ (Base‘𝑅) = (Base‘𝑅)
2		eqid 2821	. . . 4 ⊢ ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) = ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))
3		eqid 2821	. . . 4 ⊢ (ℤMod‘𝑅) = (ℤMod‘𝑅)
4	1, 2, 3	isrrext 31248	. . 3 ⊢ (𝑅 ∈ ℝExt ↔ ((𝑅 ∈ NrmRing ∧ 𝑅 ∈ DivRing) ∧ ((ℤMod‘𝑅) ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ (𝑅 ∈ CUnifSp ∧ (UnifSt‘𝑅) = (metUnif‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))))
5	4	simp1bi 1141	. 2 ⊢ (𝑅 ∈ ℝExt → (𝑅 ∈ NrmRing ∧ 𝑅 ∈ DivRing))
6	5	simprd 498	1 ⊢ (𝑅 ∈ ℝExt → 𝑅 ∈ DivRing)

Syntax hints:   → wi 4   ∧ wa 398   = wceq 1537   ∈ wcel 2114   × cxp 5539   ↾ cres 5543  ‘cfv 6341  0cc0 10523  Basecbs 16466  distcds 16557  DivRingcdr 19485  metUnifcmetu 20519  ℤModczlm 20631  chrcchr 20632  UnifStcuss 22845  CUnifSpccusp 22889  NrmRingcnrg 23172  NrmModcnlm 23173   ℝExt crrext 31242

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-rab 3147  df-v 3488  df-dif 3927  df-un 3929  df-in 3931  df-ss 3940  df-nul 4280  df-if 4454  df-sn 4554  df-pr 4556  df-op 4560  df-uni 4825  df-br 5053  df-opab 5115  df-xp 5547  df-res 5553  df-iota 6300  df-fv 6349  df-rrext 31247

This theorem is referenced by:  rrhfe  31260  rrhcne  31261  rrhqima  31262  rrh0  31263  sitgclg  31607