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

Theorem isrngod 35216
Description: Conditions that determine a ring. (Changed label from isringd 19313 to isrngod 35216-NM 2-Aug-2013.) (Contributed by Jeff Madsen, 19-Jun-2010.) (Revised by Mario Carneiro, 21-Dec-2013.) (New usage is discouraged.)
Hypotheses
Ref Expression
isringod.1 (𝜑𝐺 ∈ AbelOp)
isringod.2 (𝜑𝑋 = ran 𝐺)
isringod.3 (𝜑𝐻:(𝑋 × 𝑋)⟶𝑋)
isringod.4 ((𝜑 ∧ (𝑥𝑋𝑦𝑋𝑧𝑋)) → ((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)))
isringod.5 ((𝜑 ∧ (𝑥𝑋𝑦𝑋𝑧𝑋)) → (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)))
isringod.6 ((𝜑 ∧ (𝑥𝑋𝑦𝑋𝑧𝑋)) → ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧)))
isringod.7 (𝜑𝑈𝑋)
isringod.8 ((𝜑𝑦𝑋) → (𝑈𝐻𝑦) = 𝑦)
isringod.9 ((𝜑𝑦𝑋) → (𝑦𝐻𝑈) = 𝑦)
Assertion
Ref Expression
isrngod (𝜑 → ⟨𝐺, 𝐻⟩ ∈ RingOps)
Distinct variable groups:   𝜑,𝑥,𝑦,𝑧   𝑥,𝐺,𝑦,𝑧   𝑥,𝐻,𝑦,𝑧   𝑥,𝑋,𝑦,𝑧   𝑥,𝑈,𝑦
Allowed substitution hint:   𝑈(𝑧)

Proof of Theorem isrngod
StepHypRef Expression
1 isringod.1 . . 3 (𝜑𝐺 ∈ AbelOp)
2 isringod.3 . . . 4 (𝜑𝐻:(𝑋 × 𝑋)⟶𝑋)
3 isringod.2 . . . . . 6 (𝜑𝑋 = ran 𝐺)
43sqxpeqd 5560 . . . . 5 (𝜑 → (𝑋 × 𝑋) = (ran 𝐺 × ran 𝐺))
54, 3feq23d 6482 . . . 4 (𝜑 → (𝐻:(𝑋 × 𝑋)⟶𝑋𝐻:(ran 𝐺 × ran 𝐺)⟶ran 𝐺))
62, 5mpbid 235 . . 3 (𝜑𝐻:(ran 𝐺 × ran 𝐺)⟶ran 𝐺)
7 isringod.4 . . . . . . 7 ((𝜑 ∧ (𝑥𝑋𝑦𝑋𝑧𝑋)) → ((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)))
8 isringod.5 . . . . . . 7 ((𝜑 ∧ (𝑥𝑋𝑦𝑋𝑧𝑋)) → (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)))
9 isringod.6 . . . . . . 7 ((𝜑 ∧ (𝑥𝑋𝑦𝑋𝑧𝑋)) → ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧)))
107, 8, 93jca 1125 . . . . . 6 ((𝜑 ∧ (𝑥𝑋𝑦𝑋𝑧𝑋)) → (((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))))
1110ralrimivvva 3180 . . . . 5 (𝜑 → ∀𝑥𝑋𝑦𝑋𝑧𝑋 (((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))))
123raleqdv 3396 . . . . . . 7 (𝜑 → (∀𝑧𝑋 (((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))) ↔ ∀𝑧 ∈ ran 𝐺(((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧)))))
133, 12raleqbidv 3386 . . . . . 6 (𝜑 → (∀𝑦𝑋𝑧𝑋 (((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))) ↔ ∀𝑦 ∈ ran 𝐺𝑧 ∈ ran 𝐺(((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧)))))
143, 13raleqbidv 3386 . . . . 5 (𝜑 → (∀𝑥𝑋𝑦𝑋𝑧𝑋 (((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))) ↔ ∀𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺𝑧 ∈ ran 𝐺(((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧)))))
1511, 14mpbid 235 . . . 4 (𝜑 → ∀𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺𝑧 ∈ ran 𝐺(((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))))
16 isringod.7 . . . . . 6 (𝜑𝑈𝑋)
17 isringod.8 . . . . . . . 8 ((𝜑𝑦𝑋) → (𝑈𝐻𝑦) = 𝑦)
18 isringod.9 . . . . . . . 8 ((𝜑𝑦𝑋) → (𝑦𝐻𝑈) = 𝑦)
1917, 18jca 515 . . . . . . 7 ((𝜑𝑦𝑋) → ((𝑈𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑈) = 𝑦))
2019ralrimiva 3170 . . . . . 6 (𝜑 → ∀𝑦𝑋 ((𝑈𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑈) = 𝑦))
21 oveq1 7137 . . . . . . . . 9 (𝑥 = 𝑈 → (𝑥𝐻𝑦) = (𝑈𝐻𝑦))
2221eqeq1d 2823 . . . . . . . 8 (𝑥 = 𝑈 → ((𝑥𝐻𝑦) = 𝑦 ↔ (𝑈𝐻𝑦) = 𝑦))
2322ovanraleqv 7154 . . . . . . 7 (𝑥 = 𝑈 → (∀𝑦𝑋 ((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦) ↔ ∀𝑦𝑋 ((𝑈𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑈) = 𝑦)))
2423rspcev 3600 . . . . . 6 ((𝑈𝑋 ∧ ∀𝑦𝑋 ((𝑈𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑈) = 𝑦)) → ∃𝑥𝑋𝑦𝑋 ((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦))
2516, 20, 24syl2anc 587 . . . . 5 (𝜑 → ∃𝑥𝑋𝑦𝑋 ((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦))
263raleqdv 3396 . . . . . 6 (𝜑 → (∀𝑦𝑋 ((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦) ↔ ∀𝑦 ∈ ran 𝐺((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦)))
273, 26rexeqbidv 3387 . . . . 5 (𝜑 → (∃𝑥𝑋𝑦𝑋 ((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦) ↔ ∃𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦)))
2825, 27mpbid 235 . . . 4 (𝜑 → ∃𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦))
2915, 28jca 515 . . 3 (𝜑 → (∀𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺𝑧 ∈ ran 𝐺(((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))) ∧ ∃𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦)))
301, 6, 29jca31 518 . 2 (𝜑 → ((𝐺 ∈ AbelOp ∧ 𝐻:(ran 𝐺 × ran 𝐺)⟶ran 𝐺) ∧ (∀𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺𝑧 ∈ ran 𝐺(((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))) ∧ ∃𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦))))
31 rnexg 7589 . . . . . 6 (𝐺 ∈ AbelOp → ran 𝐺 ∈ V)
321, 31syl 17 . . . . 5 (𝜑 → ran 𝐺 ∈ V)
3332, 32xpexd 7449 . . . 4 (𝜑 → (ran 𝐺 × ran 𝐺) ∈ V)
34 fex 6962 . . . 4 ((𝐻:(ran 𝐺 × ran 𝐺)⟶ran 𝐺 ∧ (ran 𝐺 × ran 𝐺) ∈ V) → 𝐻 ∈ V)
356, 33, 34syl2anc 587 . . 3 (𝜑𝐻 ∈ V)
36 eqid 2821 . . . 4 ran 𝐺 = ran 𝐺
3736isrngo 35215 . . 3 (𝐻 ∈ V → (⟨𝐺, 𝐻⟩ ∈ RingOps ↔ ((𝐺 ∈ AbelOp ∧ 𝐻:(ran 𝐺 × ran 𝐺)⟶ran 𝐺) ∧ (∀𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺𝑧 ∈ ran 𝐺(((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))) ∧ ∃𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦)))))
3835, 37syl 17 . 2 (𝜑 → (⟨𝐺, 𝐻⟩ ∈ RingOps ↔ ((𝐺 ∈ AbelOp ∧ 𝐻:(ran 𝐺 × ran 𝐺)⟶ran 𝐺) ∧ (∀𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺𝑧 ∈ ran 𝐺(((𝑥𝐻𝑦)𝐻𝑧) = (𝑥𝐻(𝑦𝐻𝑧)) ∧ (𝑥𝐻(𝑦𝐺𝑧)) = ((𝑥𝐻𝑦)𝐺(𝑥𝐻𝑧)) ∧ ((𝑥𝐺𝑦)𝐻𝑧) = ((𝑥𝐻𝑧)𝐺(𝑦𝐻𝑧))) ∧ ∃𝑥 ∈ ran 𝐺𝑦 ∈ ran 𝐺((𝑥𝐻𝑦) = 𝑦 ∧ (𝑦𝐻𝑥) = 𝑦)))))
3930, 38mpbird 260 1 (𝜑 → ⟨𝐺, 𝐻⟩ ∈ RingOps)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399  w3a 1084   = wceq 1538  wcel 2115  wral 3126  wrex 3127  Vcvv 3471  cop 4546   × cxp 5526  ran crn 5529  wf 6324  (class class class)co 7130  AbelOpcablo 28305  RingOpscrngo 35212
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1971  ax-7 2016  ax-8 2117  ax-9 2125  ax-10 2146  ax-11 2162  ax-12 2178  ax-ext 2793  ax-rep 5163  ax-sep 5176  ax-nul 5183  ax-pow 5239  ax-pr 5303  ax-un 7436
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2071  df-mo 2623  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2892  df-nfc 2960  df-ne 3008  df-ral 3131  df-rex 3132  df-reu 3133  df-rab 3135  df-v 3473  df-sbc 3750  df-csb 3858  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-nul 4267  df-if 4441  df-pw 4514  df-sn 4541  df-pr 4543  df-op 4547  df-uni 4812  df-iun 4894  df-br 5040  df-opab 5102  df-mpt 5120  df-id 5433  df-xp 5534  df-rel 5535  df-cnv 5536  df-co 5537  df-dm 5538  df-rn 5539  df-res 5540  df-ima 5541  df-iota 6287  df-fun 6330  df-fn 6331  df-f 6332  df-f1 6333  df-fo 6334  df-f1o 6335  df-fv 6336  df-ov 7133  df-rngo 35213
This theorem is referenced by:  iscringd  35316
  Copyright terms: Public domain W3C validator