Users' Mathboxes Mathbox for Jeff Madsen < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  drngoi Structured version   Visualization version   GIF version

Theorem drngoi 33721
Description: The properties of a division ring. (Contributed by NM, 4-Apr-2009.) (New usage is discouraged.)
Hypotheses
Ref Expression
drngi.1 𝐺 = (1st𝑅)
drngi.2 𝐻 = (2nd𝑅)
drngi.3 𝑋 = ran 𝐺
drngi.4 𝑍 = (GId‘𝐺)
Assertion
Ref Expression
drngoi (𝑅 ∈ DivRingOps → (𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))

Proof of Theorem drngoi
Dummy variables 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 opeq1 4393 . . . . . 6 (𝑔 = (1st𝑅) → ⟨𝑔, ⟩ = ⟨(1st𝑅), ⟩)
21eleq1d 2684 . . . . 5 (𝑔 = (1st𝑅) → (⟨𝑔, ⟩ ∈ RingOps ↔ ⟨(1st𝑅), ⟩ ∈ RingOps))
3 id 22 . . . . . . . . . . . 12 (𝑔 = (1st𝑅) → 𝑔 = (1st𝑅))
4 drngi.1 . . . . . . . . . . . 12 𝐺 = (1st𝑅)
53, 4syl6eqr 2672 . . . . . . . . . . 11 (𝑔 = (1st𝑅) → 𝑔 = 𝐺)
65rneqd 5342 . . . . . . . . . 10 (𝑔 = (1st𝑅) → ran 𝑔 = ran 𝐺)
7 drngi.3 . . . . . . . . . 10 𝑋 = ran 𝐺
86, 7syl6eqr 2672 . . . . . . . . 9 (𝑔 = (1st𝑅) → ran 𝑔 = 𝑋)
95fveq2d 6182 . . . . . . . . . . 11 (𝑔 = (1st𝑅) → (GId‘𝑔) = (GId‘𝐺))
10 drngi.4 . . . . . . . . . . 11 𝑍 = (GId‘𝐺)
119, 10syl6eqr 2672 . . . . . . . . . 10 (𝑔 = (1st𝑅) → (GId‘𝑔) = 𝑍)
1211sneqd 4180 . . . . . . . . 9 (𝑔 = (1st𝑅) → {(GId‘𝑔)} = {𝑍})
138, 12difeq12d 3721 . . . . . . . 8 (𝑔 = (1st𝑅) → (ran 𝑔 ∖ {(GId‘𝑔)}) = (𝑋 ∖ {𝑍}))
1413sqxpeqd 5131 . . . . . . 7 (𝑔 = (1st𝑅) → ((ran 𝑔 ∖ {(GId‘𝑔)}) × (ran 𝑔 ∖ {(GId‘𝑔)})) = ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍})))
1514reseq2d 5385 . . . . . 6 (𝑔 = (1st𝑅) → ( ↾ ((ran 𝑔 ∖ {(GId‘𝑔)}) × (ran 𝑔 ∖ {(GId‘𝑔)}))) = ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))))
1615eleq1d 2684 . . . . 5 (𝑔 = (1st𝑅) → (( ↾ ((ran 𝑔 ∖ {(GId‘𝑔)}) × (ran 𝑔 ∖ {(GId‘𝑔)}))) ∈ GrpOp ↔ ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))
172, 16anbi12d 746 . . . 4 (𝑔 = (1st𝑅) → ((⟨𝑔, ⟩ ∈ RingOps ∧ ( ↾ ((ran 𝑔 ∖ {(GId‘𝑔)}) × (ran 𝑔 ∖ {(GId‘𝑔)}))) ∈ GrpOp) ↔ (⟨(1st𝑅), ⟩ ∈ RingOps ∧ ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)))
18 opeq2 4394 . . . . . . 7 ( = (2nd𝑅) → ⟨(1st𝑅), ⟩ = ⟨(1st𝑅), (2nd𝑅)⟩)
1918eleq1d 2684 . . . . . 6 ( = (2nd𝑅) → (⟨(1st𝑅), ⟩ ∈ RingOps ↔ ⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps))
2019anbi1d 740 . . . . 5 ( = (2nd𝑅) → ((⟨(1st𝑅), ⟩ ∈ RingOps ∧ ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp) ↔ (⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps ∧ ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)))
21 id 22 . . . . . . . . 9 ( = (2nd𝑅) → = (2nd𝑅))
22 drngi.2 . . . . . . . . 9 𝐻 = (2nd𝑅)
2321, 22syl6reqr 2673 . . . . . . . 8 ( = (2nd𝑅) → 𝐻 = )
2423reseq1d 5384 . . . . . . 7 ( = (2nd𝑅) → (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) = ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))))
2524eleq1d 2684 . . . . . 6 ( = (2nd𝑅) → ((𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp ↔ ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))
2625anbi2d 739 . . . . 5 ( = (2nd𝑅) → ((⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp) ↔ (⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps ∧ ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)))
2720, 26bitr4d 271 . . . 4 ( = (2nd𝑅) → ((⟨(1st𝑅), ⟩ ∈ RingOps ∧ ( ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp) ↔ (⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)))
2817, 27elopabi 7216 . . 3 (𝑅 ∈ {⟨𝑔, ⟩ ∣ (⟨𝑔, ⟩ ∈ RingOps ∧ ( ↾ ((ran 𝑔 ∖ {(GId‘𝑔)}) × (ran 𝑔 ∖ {(GId‘𝑔)}))) ∈ GrpOp)} → (⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))
29 df-drngo 33719 . . 3 DivRingOps = {⟨𝑔, ⟩ ∣ (⟨𝑔, ⟩ ∈ RingOps ∧ ( ↾ ((ran 𝑔 ∖ {(GId‘𝑔)}) × (ran 𝑔 ∖ {(GId‘𝑔)}))) ∈ GrpOp)}
3028, 29eleq2s 2717 . 2 (𝑅 ∈ DivRingOps → (⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))
3129relopabi 5234 . . . . 5 Rel DivRingOps
32 1st2nd 7199 . . . . 5 ((Rel DivRingOps ∧ 𝑅 ∈ DivRingOps) → 𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩)
3331, 32mpan 705 . . . 4 (𝑅 ∈ DivRingOps → 𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩)
3433eleq1d 2684 . . 3 (𝑅 ∈ DivRingOps → (𝑅 ∈ RingOps ↔ ⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps))
3534anbi1d 740 . 2 (𝑅 ∈ DivRingOps → ((𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp) ↔ (⟨(1st𝑅), (2nd𝑅)⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)))
3630, 35mpbird 247 1 (𝑅 ∈ DivRingOps → (𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 384   = wceq 1481  wcel 1988  cdif 3564  {csn 4168  cop 4174  {copab 4703   × cxp 5102  ran crn 5105  cres 5106  Rel wrel 5109  cfv 5876  1st c1st 7151  2nd c2nd 7152  GrpOpcgr 27313  GIdcgi 27314  RingOpscrngo 33664  DivRingOpscdrng 33718
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-8 1990  ax-9 1997  ax-10 2017  ax-11 2032  ax-12 2045  ax-13 2244  ax-ext 2600  ax-sep 4772  ax-nul 4780  ax-pow 4834  ax-pr 4897  ax-un 6934
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1038  df-tru 1484  df-ex 1703  df-nf 1708  df-sb 1879  df-eu 2472  df-mo 2473  df-clab 2607  df-cleq 2613  df-clel 2616  df-nfc 2751  df-ral 2914  df-rex 2915  df-rab 2918  df-v 3197  df-sbc 3430  df-dif 3570  df-un 3572  df-in 3574  df-ss 3581  df-nul 3908  df-if 4078  df-sn 4169  df-pr 4171  df-op 4175  df-uni 4428  df-br 4645  df-opab 4704  df-mpt 4721  df-id 5014  df-xp 5110  df-rel 5111  df-cnv 5112  df-co 5113  df-dm 5114  df-rn 5115  df-res 5116  df-iota 5839  df-fun 5878  df-fv 5884  df-1st 7153  df-2nd 7154  df-drngo 33719
This theorem is referenced by:  dvrunz  33724  fldcrng  33774
  Copyright terms: Public domain W3C validator