Theorem rrextcusp 34637

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

Assertion

Ref	Expression
rrextcusp	⊢ (𝑅 ∈ ℝExt → 𝑅 ∈ CUnifSp)

Proof of Theorem rrextcusp

Step	Hyp	Ref	Expression
1		eqid 2760	. . . 4 ⊢ (Base‘𝑅) = (Base‘𝑅)
2		eqid 2760	. . . 4 ⊢ ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) = ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))
3		eqid 2760	. . . 4 ⊢ (ℤMod‘𝑅) = (ℤMod‘𝑅)
4	1, 2, 3	isrrext 34632	. . 3 ⊢ (𝑅 ∈ ℝExt ↔ ((𝑅 ∈ NrmRing ∧ 𝑅 ∈ DivRing) ∧ ((ℤMod‘𝑅) ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ (𝑅 ∈ CUnifSp ∧ (UnifSt‘𝑅) = (metUnif‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))))
5	4	simp3bi 1165	. 2 ⊢ (𝑅 ∈ ℝExt → (𝑅 ∈ CUnifSp ∧ (UnifSt‘𝑅) = (metUnif‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))))))
6	5	simpld 500	1 ⊢ (𝑅 ∈ ℝExt → 𝑅 ∈ CUnifSp)

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1569   ∈ wcel 2144   × cxp 5648   ↾ cres 5652  ‘cfv 6538  0cc0 11200  Basecbs 17387  distcds 17437  DivRingcdr 20980  metUnifcmetu 21669  ℤModczlm 21806  chrcchr 21807  UnifStcuss 24572  CUnifSpccusp 24615  NrmRingcnrg 24898  NrmModcnlm 24899   ℝExt crrext 34626

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-ext 2732

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-sb 2099  df-clab 2739  df-cleq 2752  df-clel 2835  df-rab 3413  df-v 3452  df-dif 3899  df-un 3901  df-in 3903  df-ss 3914  df-nul 4279  df-if 4482  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-br 5103  df-opab 5167  df-xp 5656  df-res 5662  df-iota 6494  df-fv 6546  df-rrext 34631

This theorem is used by:  rrhfe  34644  rrhcne  34645  sitgclg  34974