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

Theorem isdrngo1 34072
Description: The predicate "is a division ring". (Contributed by Jeff Madsen, 8-Jun-2010.)
Hypotheses
Ref Expression
isdivrng1.1 𝐺 = (1st𝑅)
isdivrng1.2 𝐻 = (2nd𝑅)
isdivrng1.3 𝑍 = (GId‘𝐺)
isdivrng1.4 𝑋 = ran 𝐺
Assertion
Ref Expression
isdrngo1 (𝑅 ∈ DivRingOps ↔ (𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))

Proof of Theorem isdrngo1
Dummy variables 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-drngo 34065 . . . 4 DivRingOps = {⟨𝑔, ⟩ ∣ (⟨𝑔, ⟩ ∈ RingOps ∧ ( ↾ ((ran 𝑔 ∖ {(GId‘𝑔)}) × (ran 𝑔 ∖ {(GId‘𝑔)}))) ∈ GrpOp)}
21relopabi 5458 . . 3 Rel DivRingOps
3 1st2nd 7453 . . 3 ((Rel DivRingOps ∧ 𝑅 ∈ DivRingOps) → 𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩)
42, 3mpan 673 . 2 (𝑅 ∈ DivRingOps → 𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩)
5 relrngo 34012 . . . 4 Rel RingOps
6 1st2nd 7453 . . . 4 ((Rel RingOps ∧ 𝑅 ∈ RingOps) → 𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩)
75, 6mpan 673 . . 3 (𝑅 ∈ RingOps → 𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩)
87adantr 468 . 2 ((𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp) → 𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩)
9 isdivrng1.1 . . . . 5 𝐺 = (1st𝑅)
10 isdivrng1.2 . . . . 5 𝐻 = (2nd𝑅)
119, 10opeq12i 4611 . . . 4 𝐺, 𝐻⟩ = ⟨(1st𝑅), (2nd𝑅)⟩
1211eqeq2i 2829 . . 3 (𝑅 = ⟨𝐺, 𝐻⟩ ↔ 𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩)
1310fvexi 6429 . . . . . 6 𝐻 ∈ V
14 isdivrngo 34066 . . . . . 6 (𝐻 ∈ V → (⟨𝐺, 𝐻⟩ ∈ DivRingOps ↔ (⟨𝐺, 𝐻⟩ ∈ RingOps ∧ (𝐻 ↾ ((ran 𝐺 ∖ {(GId‘𝐺)}) × (ran 𝐺 ∖ {(GId‘𝐺)}))) ∈ GrpOp)))
1513, 14ax-mp 5 . . . . 5 (⟨𝐺, 𝐻⟩ ∈ DivRingOps ↔ (⟨𝐺, 𝐻⟩ ∈ RingOps ∧ (𝐻 ↾ ((ran 𝐺 ∖ {(GId‘𝐺)}) × (ran 𝐺 ∖ {(GId‘𝐺)}))) ∈ GrpOp))
16 isdivrng1.4 . . . . . . . . . 10 𝑋 = ran 𝐺
17 isdivrng1.3 . . . . . . . . . . 11 𝑍 = (GId‘𝐺)
1817sneqi 4392 . . . . . . . . . 10 {𝑍} = {(GId‘𝐺)}
1916, 18difeq12i 3936 . . . . . . . . 9 (𝑋 ∖ {𝑍}) = (ran 𝐺 ∖ {(GId‘𝐺)})
2019, 19xpeq12i 5349 . . . . . . . 8 ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍})) = ((ran 𝐺 ∖ {(GId‘𝐺)}) × (ran 𝐺 ∖ {(GId‘𝐺)}))
2120reseq2i 5605 . . . . . . 7 (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) = (𝐻 ↾ ((ran 𝐺 ∖ {(GId‘𝐺)}) × (ran 𝐺 ∖ {(GId‘𝐺)})))
2221eleq1i 2887 . . . . . 6 ((𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp ↔ (𝐻 ↾ ((ran 𝐺 ∖ {(GId‘𝐺)}) × (ran 𝐺 ∖ {(GId‘𝐺)}))) ∈ GrpOp)
2322anbi2i 611 . . . . 5 ((⟨𝐺, 𝐻⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp) ↔ (⟨𝐺, 𝐻⟩ ∈ RingOps ∧ (𝐻 ↾ ((ran 𝐺 ∖ {(GId‘𝐺)}) × (ran 𝐺 ∖ {(GId‘𝐺)}))) ∈ GrpOp))
2415, 23bitr4i 269 . . . 4 (⟨𝐺, 𝐻⟩ ∈ DivRingOps ↔ (⟨𝐺, 𝐻⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))
25 eleq1 2884 . . . . 5 (𝑅 = ⟨𝐺, 𝐻⟩ → (𝑅 ∈ DivRingOps ↔ ⟨𝐺, 𝐻⟩ ∈ DivRingOps))
26 eleq1 2884 . . . . . 6 (𝑅 = ⟨𝐺, 𝐻⟩ → (𝑅 ∈ RingOps ↔ ⟨𝐺, 𝐻⟩ ∈ RingOps))
2726anbi1d 617 . . . . 5 (𝑅 = ⟨𝐺, 𝐻⟩ → ((𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp) ↔ (⟨𝐺, 𝐻⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)))
2825, 27bibi12d 336 . . . 4 (𝑅 = ⟨𝐺, 𝐻⟩ → ((𝑅 ∈ DivRingOps ↔ (𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)) ↔ (⟨𝐺, 𝐻⟩ ∈ DivRingOps ↔ (⟨𝐺, 𝐻⟩ ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))))
2924, 28mpbiri 249 . . 3 (𝑅 = ⟨𝐺, 𝐻⟩ → (𝑅 ∈ DivRingOps ↔ (𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)))
3012, 29sylbir 226 . 2 (𝑅 = ⟨(1st𝑅), (2nd𝑅)⟩ → (𝑅 ∈ DivRingOps ↔ (𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp)))
314, 8, 30pm5.21nii 369 1 (𝑅 ∈ DivRingOps ↔ (𝑅 ∈ RingOps ∧ (𝐻 ↾ ((𝑋 ∖ {𝑍}) × (𝑋 ∖ {𝑍}))) ∈ GrpOp))
Colors of variables: wff setvar class
Syntax hints:  wb 197  wa 384   = wceq 1637  wcel 2157  Vcvv 3402  cdif 3777  {csn 4381  cop 4387   × cxp 5320  ran crn 5323  cres 5324  Rel wrel 5327  cfv 6108  1st c1st 7403  2nd c2nd 7404  GrpOpcgr 27682  GIdcgi 27683  RingOpscrngo 34010  DivRingOpscdrng 34064
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1877  ax-4 1894  ax-5 2001  ax-6 2069  ax-7 2105  ax-8 2159  ax-9 2166  ax-10 2186  ax-11 2202  ax-12 2215  ax-13 2422  ax-ext 2795  ax-sep 4986  ax-nul 4994  ax-pow 5046  ax-pr 5107  ax-un 7186
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 866  df-3an 1102  df-tru 1641  df-ex 1860  df-nf 1864  df-sb 2062  df-mo 2635  df-eu 2642  df-clab 2804  df-cleq 2810  df-clel 2813  df-nfc 2948  df-ral 3112  df-rex 3113  df-rab 3116  df-v 3404  df-sbc 3645  df-dif 3783  df-un 3785  df-in 3787  df-ss 3794  df-nul 4128  df-if 4291  df-sn 4382  df-pr 4384  df-op 4388  df-uni 4642  df-br 4856  df-opab 4918  df-mpt 4935  df-id 5230  df-xp 5328  df-rel 5329  df-cnv 5330  df-co 5331  df-dm 5332  df-rn 5333  df-res 5334  df-iota 6071  df-fun 6110  df-fn 6111  df-f 6112  df-fv 6116  df-ov 6884  df-1st 7405  df-2nd 7406  df-rngo 34011  df-drngo 34065
This theorem is referenced by:  divrngcl  34073  isdrngo2  34074  divrngpr  34169
  Copyright terms: Public domain W3C validator