Theorem issdrg 20692

Description: Property of a division subring. (Contributed by Stefan O'Rear, 3-Oct-2015.)

Assertion

Ref	Expression
issdrg	⊢ (𝑆 ∈ (SubDRing‘𝑅) ↔ (𝑅 ∈ DivRing ∧ 𝑆 ∈ (SubRing‘𝑅) ∧ (𝑅 ↾s 𝑆) ∈ DivRing))

Proof of Theorem issdrg

Dummy variables 𝑤 𝑠 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-sdrg 20691	. . . 4 ⊢ SubDRing = (𝑤 ∈ DivRing ↦ {𝑠 ∈ (SubRing‘𝑤) ∣ (𝑤 ↾s 𝑠) ∈ DivRing})
2	1	mptrcl 6943	. . 3 ⊢ (𝑆 ∈ (SubDRing‘𝑅) → 𝑅 ∈ DivRing)
3		fveq2 6826	. . . . . . 7 ⊢ (𝑤 = 𝑅 → (SubRing‘𝑤) = (SubRing‘𝑅))
4		oveq1 7360	. . . . . . . 8 ⊢ (𝑤 = 𝑅 → (𝑤 ↾s 𝑠) = (𝑅 ↾s 𝑠))
5	4	eleq1d 2813	. . . . . . 7 ⊢ (𝑤 = 𝑅 → ((𝑤 ↾s 𝑠) ∈ DivRing ↔ (𝑅 ↾s 𝑠) ∈ DivRing))
6	3, 5	rabeqbidv 3415	. . . . . 6 ⊢ (𝑤 = 𝑅 → {𝑠 ∈ (SubRing‘𝑤) ∣ (𝑤 ↾s 𝑠) ∈ DivRing} = {𝑠 ∈ (SubRing‘𝑅) ∣ (𝑅 ↾s 𝑠) ∈ DivRing})
7		fvex 6839	. . . . . . 7 ⊢ (SubRing‘𝑅) ∈ V
8	7	rabex 5281	. . . . . 6 ⊢ {𝑠 ∈ (SubRing‘𝑅) ∣ (𝑅 ↾s 𝑠) ∈ DivRing} ∈ V
9	6, 1, 8	fvmpt 6934	. . . . 5 ⊢ (𝑅 ∈ DivRing → (SubDRing‘𝑅) = {𝑠 ∈ (SubRing‘𝑅) ∣ (𝑅 ↾s 𝑠) ∈ DivRing})
10	9	eleq2d 2814	. . . 4 ⊢ (𝑅 ∈ DivRing → (𝑆 ∈ (SubDRing‘𝑅) ↔ 𝑆 ∈ {𝑠 ∈ (SubRing‘𝑅) ∣ (𝑅 ↾s 𝑠) ∈ DivRing}))
11		oveq2 7361	. . . . . 6 ⊢ (𝑠 = 𝑆 → (𝑅 ↾s 𝑠) = (𝑅 ↾s 𝑆))
12	11	eleq1d 2813	. . . . 5 ⊢ (𝑠 = 𝑆 → ((𝑅 ↾s 𝑠) ∈ DivRing ↔ (𝑅 ↾s 𝑆) ∈ DivRing))
13	12	elrab 3650	. . . 4 ⊢ (𝑆 ∈ {𝑠 ∈ (SubRing‘𝑅) ∣ (𝑅 ↾s 𝑠) ∈ DivRing} ↔ (𝑆 ∈ (SubRing‘𝑅) ∧ (𝑅 ↾s 𝑆) ∈ DivRing))
14	10, 13	bitrdi 287	. . 3 ⊢ (𝑅 ∈ DivRing → (𝑆 ∈ (SubDRing‘𝑅) ↔ (𝑆 ∈ (SubRing‘𝑅) ∧ (𝑅 ↾s 𝑆) ∈ DivRing)))
15	2, 14	biadanii 821	. 2 ⊢ (𝑆 ∈ (SubDRing‘𝑅) ↔ (𝑅 ∈ DivRing ∧ (𝑆 ∈ (SubRing‘𝑅) ∧ (𝑅 ↾s 𝑆) ∈ DivRing)))
16		3anass 1094	. 2 ⊢ ((𝑅 ∈ DivRing ∧ 𝑆 ∈ (SubRing‘𝑅) ∧ (𝑅 ↾s 𝑆) ∈ DivRing) ↔ (𝑅 ∈ DivRing ∧ (𝑆 ∈ (SubRing‘𝑅) ∧ (𝑅 ↾s 𝑆) ∈ DivRing)))
17	15, 16	bitr4i 278	1 ⊢ (𝑆 ∈ (SubDRing‘𝑅) ↔ (𝑅 ∈ DivRing ∧ 𝑆 ∈ (SubRing‘𝑅) ∧ (𝑅 ↾s 𝑆) ∈ DivRing))

Syntax hints:   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1540   ∈ wcel 2109  {crab 3396  ‘cfv 6486  (class class class)co 7353   ↾_s cress 17160  SubRingcsubrg 20473  DivRingcdr 20633  SubDRingcsdrg 20690

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-sep 5238  ax-nul 5248  ax-pr 5374

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-rab 3397  df-v 3440  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4862  df-br 5096  df-opab 5158  df-mpt 5177  df-id 5518  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-iota 6442  df-fun 6488  df-fv 6494  df-ov 7356  df-sdrg 20691

This theorem is referenced by:  sdrgrcl  20693  sdrgdrng  20694  sdrgsubrg  20695  sdrgid  20696  sdrgss  20697  issdrg2  20699  fldsdrgfld  20702  sdrgint  20708  primefld  20709  primefld0cl  20710  primefld1cl  20711  subsdrg  33256  sdrgdvcl  33257  sdrginvcl  33258  primefldchr  33259  fldgensdrg  33272  fldgenssp  33276  primefldgen1  33279  1fldgenq  33280  fldextsdrg  33640  fldextrspunlem2  33663  fldextrspundgdvdslem  33666  fldextrspundgdvds  33667  irngnzply1lem  33676  irngnzply1  33677  ply1annig1p  33690  minplycl  33692  ply1annprmidl  33693  algextdeglem1  33703  algextdeglem2  33704  algextdeglem3  33705  algextdeglem4  33706  algextdeglem5  33707  constrextdg2  33735  constrext2chnlem  33736  constrcon  33760  2sqr3minply  33766  cos9thpiminply  33774