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

Theorem crngohomfo 36468
Description: The image of a homomorphism from a commutative ring is commutative. (Contributed by Jeff Madsen, 4-Jan-2011.)
Hypotheses
Ref Expression
crnghomfo.1 𝐺 = (1st𝑅)
crnghomfo.2 𝑋 = ran 𝐺
crnghomfo.3 𝐽 = (1st𝑆)
crnghomfo.4 𝑌 = ran 𝐽
Assertion
Ref Expression
crngohomfo (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:𝑋onto𝑌)) → 𝑆 ∈ CRingOps)

Proof of Theorem crngohomfo
Dummy variables 𝑤 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simplr 768 . 2 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:𝑋onto𝑌)) → 𝑆 ∈ RingOps)
2 foelrn 7057 . . . . . . . 8 ((𝐹:𝑋onto𝑌𝑦𝑌) → ∃𝑤𝑋 𝑦 = (𝐹𝑤))
32ex 414 . . . . . . 7 (𝐹:𝑋onto𝑌 → (𝑦𝑌 → ∃𝑤𝑋 𝑦 = (𝐹𝑤)))
4 foelrn 7057 . . . . . . . 8 ((𝐹:𝑋onto𝑌𝑧𝑌) → ∃𝑥𝑋 𝑧 = (𝐹𝑥))
54ex 414 . . . . . . 7 (𝐹:𝑋onto𝑌 → (𝑧𝑌 → ∃𝑥𝑋 𝑧 = (𝐹𝑥)))
63, 5anim12d 610 . . . . . 6 (𝐹:𝑋onto𝑌 → ((𝑦𝑌𝑧𝑌) → (∃𝑤𝑋 𝑦 = (𝐹𝑤) ∧ ∃𝑥𝑋 𝑧 = (𝐹𝑥))))
7 reeanv 3218 . . . . . 6 (∃𝑤𝑋𝑥𝑋 (𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) ↔ (∃𝑤𝑋 𝑦 = (𝐹𝑤) ∧ ∃𝑥𝑋 𝑧 = (𝐹𝑥)))
86, 7syl6ibr 252 . . . . 5 (𝐹:𝑋onto𝑌 → ((𝑦𝑌𝑧𝑌) → ∃𝑤𝑋𝑥𝑋 (𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥))))
98ad2antll 728 . . . 4 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:𝑋onto𝑌)) → ((𝑦𝑌𝑧𝑌) → ∃𝑤𝑋𝑥𝑋 (𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥))))
10 crnghomfo.1 . . . . . . . . . . . . . 14 𝐺 = (1st𝑅)
11 eqid 2737 . . . . . . . . . . . . . 14 (2nd𝑅) = (2nd𝑅)
12 crnghomfo.2 . . . . . . . . . . . . . 14 𝑋 = ran 𝐺
1310, 11, 12crngocom 36463 . . . . . . . . . . . . 13 ((𝑅 ∈ CRingOps ∧ 𝑤𝑋𝑥𝑋) → (𝑤(2nd𝑅)𝑥) = (𝑥(2nd𝑅)𝑤))
14133expb 1121 . . . . . . . . . . . 12 ((𝑅 ∈ CRingOps ∧ (𝑤𝑋𝑥𝑋)) → (𝑤(2nd𝑅)𝑥) = (𝑥(2nd𝑅)𝑤))
15143ad2antl1 1186 . . . . . . . . . . 11 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑤𝑋𝑥𝑋)) → (𝑤(2nd𝑅)𝑥) = (𝑥(2nd𝑅)𝑤))
1615fveq2d 6847 . . . . . . . . . 10 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑤𝑋𝑥𝑋)) → (𝐹‘(𝑤(2nd𝑅)𝑥)) = (𝐹‘(𝑥(2nd𝑅)𝑤)))
17 crngorngo 36462 . . . . . . . . . . 11 (𝑅 ∈ CRingOps → 𝑅 ∈ RingOps)
18 eqid 2737 . . . . . . . . . . . 12 (2nd𝑆) = (2nd𝑆)
1910, 12, 11, 18rngohommul 36432 . . . . . . . . . . 11 (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑤𝑋𝑥𝑋)) → (𝐹‘(𝑤(2nd𝑅)𝑥)) = ((𝐹𝑤)(2nd𝑆)(𝐹𝑥)))
2017, 19syl3anl1 1413 . . . . . . . . . 10 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑤𝑋𝑥𝑋)) → (𝐹‘(𝑤(2nd𝑅)𝑥)) = ((𝐹𝑤)(2nd𝑆)(𝐹𝑥)))
2110, 12, 11, 18rngohommul 36432 . . . . . . . . . . . 12 (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑥𝑋𝑤𝑋)) → (𝐹‘(𝑥(2nd𝑅)𝑤)) = ((𝐹𝑥)(2nd𝑆)(𝐹𝑤)))
2221ancom2s 649 . . . . . . . . . . 11 (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑤𝑋𝑥𝑋)) → (𝐹‘(𝑥(2nd𝑅)𝑤)) = ((𝐹𝑥)(2nd𝑆)(𝐹𝑤)))
2317, 22syl3anl1 1413 . . . . . . . . . 10 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑤𝑋𝑥𝑋)) → (𝐹‘(𝑥(2nd𝑅)𝑤)) = ((𝐹𝑥)(2nd𝑆)(𝐹𝑤)))
2416, 20, 233eqtr3d 2785 . . . . . . . . 9 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑤𝑋𝑥𝑋)) → ((𝐹𝑤)(2nd𝑆)(𝐹𝑥)) = ((𝐹𝑥)(2nd𝑆)(𝐹𝑤)))
25 oveq12 7367 . . . . . . . . . 10 ((𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) → (𝑦(2nd𝑆)𝑧) = ((𝐹𝑤)(2nd𝑆)(𝐹𝑥)))
26 oveq12 7367 . . . . . . . . . . 11 ((𝑧 = (𝐹𝑥) ∧ 𝑦 = (𝐹𝑤)) → (𝑧(2nd𝑆)𝑦) = ((𝐹𝑥)(2nd𝑆)(𝐹𝑤)))
2726ancoms 460 . . . . . . . . . 10 ((𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) → (𝑧(2nd𝑆)𝑦) = ((𝐹𝑥)(2nd𝑆)(𝐹𝑤)))
2825, 27eqeq12d 2753 . . . . . . . . 9 ((𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) → ((𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦) ↔ ((𝐹𝑤)(2nd𝑆)(𝐹𝑥)) = ((𝐹𝑥)(2nd𝑆)(𝐹𝑤))))
2924, 28syl5ibrcom 247 . . . . . . . 8 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝑤𝑋𝑥𝑋)) → ((𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) → (𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦)))
3029ex 414 . . . . . . 7 ((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → ((𝑤𝑋𝑥𝑋) → ((𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) → (𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦))))
31303expa 1119 . . . . . 6 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → ((𝑤𝑋𝑥𝑋) → ((𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) → (𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦))))
3231adantrr 716 . . . . 5 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:𝑋onto𝑌)) → ((𝑤𝑋𝑥𝑋) → ((𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) → (𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦))))
3332rexlimdvv 3205 . . . 4 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:𝑋onto𝑌)) → (∃𝑤𝑋𝑥𝑋 (𝑦 = (𝐹𝑤) ∧ 𝑧 = (𝐹𝑥)) → (𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦)))
349, 33syld 47 . . 3 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:𝑋onto𝑌)) → ((𝑦𝑌𝑧𝑌) → (𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦)))
3534ralrimivv 3196 . 2 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:𝑋onto𝑌)) → ∀𝑦𝑌𝑧𝑌 (𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦))
36 crnghomfo.3 . . 3 𝐽 = (1st𝑆)
37 crnghomfo.4 . . 3 𝑌 = ran 𝐽
3836, 18, 37iscrngo2 36459 . 2 (𝑆 ∈ CRingOps ↔ (𝑆 ∈ RingOps ∧ ∀𝑦𝑌𝑧𝑌 (𝑦(2nd𝑆)𝑧) = (𝑧(2nd𝑆)𝑦)))
391, 35, 38sylanbrc 584 1 (((𝑅 ∈ CRingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:𝑋onto𝑌)) → 𝑆 ∈ CRingOps)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 397  w3a 1088   = wceq 1542  wcel 2107  wral 3065  wrex 3074  ran crn 5635  ontowfo 6495  cfv 6497  (class class class)co 7358  1st c1st 7920  2nd c2nd 7921  RingOpscrngo 36356   RngHom crnghom 36422  CRingOpsccring 36455
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2708  ax-sep 5257  ax-nul 5264  ax-pow 5321  ax-pr 5385  ax-un 7673
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2890  df-ne 2945  df-ral 3066  df-rex 3075  df-rab 3409  df-v 3448  df-sbc 3741  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-nul 4284  df-if 4488  df-pw 4563  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4867  df-br 5107  df-opab 5169  df-mpt 5190  df-id 5532  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-iota 6449  df-fun 6499  df-fn 6500  df-f 6501  df-fo 6503  df-fv 6505  df-ov 7361  df-oprab 7362  df-mpo 7363  df-1st 7922  df-2nd 7923  df-map 8768  df-rngo 36357  df-rngohom 36425  df-com2 36452  df-crngo 36456
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator