Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  abliso Structured version   Visualization version   GIF version

Theorem abliso 30421
Description: The image of an Abelian group by a group isomorphism is also Abelian. (Contributed by Thierry Arnoux, 8-Mar-2018.)
Assertion
Ref Expression
abliso ((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) → 𝑁 ∈ Abel)

Proof of Theorem abliso
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 gimghm 18175 . . . 4 (𝐹 ∈ (𝑀 GrpIso 𝑁) → 𝐹 ∈ (𝑀 GrpHom 𝑁))
2 ghmgrp2 18132 . . . 4 (𝐹 ∈ (𝑀 GrpHom 𝑁) → 𝑁 ∈ Grp)
31, 2syl 17 . . 3 (𝐹 ∈ (𝑀 GrpIso 𝑁) → 𝑁 ∈ Grp)
43adantl 474 . 2 ((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) → 𝑁 ∈ Grp)
5 grpmnd 17898 . . . 4 (𝑁 ∈ Grp → 𝑁 ∈ Mnd)
64, 5syl 17 . . 3 ((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) → 𝑁 ∈ Mnd)
7 simpll 754 . . . . . . . 8 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → 𝑀 ∈ Abel)
8 eqid 2778 . . . . . . . . . . . 12 (Base‘𝑀) = (Base‘𝑀)
9 eqid 2778 . . . . . . . . . . . 12 (Base‘𝑁) = (Base‘𝑁)
108, 9gimf1o 18174 . . . . . . . . . . 11 (𝐹 ∈ (𝑀 GrpIso 𝑁) → 𝐹:(Base‘𝑀)–1-1-onto→(Base‘𝑁))
11 f1ocnv 6456 . . . . . . . . . . 11 (𝐹:(Base‘𝑀)–1-1-onto→(Base‘𝑁) → 𝐹:(Base‘𝑁)–1-1-onto→(Base‘𝑀))
12 f1of 6444 . . . . . . . . . . 11 (𝐹:(Base‘𝑁)–1-1-onto→(Base‘𝑀) → 𝐹:(Base‘𝑁)⟶(Base‘𝑀))
1310, 11, 123syl 18 . . . . . . . . . 10 (𝐹 ∈ (𝑀 GrpIso 𝑁) → 𝐹:(Base‘𝑁)⟶(Base‘𝑀))
1413ad2antlr 714 . . . . . . . . 9 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → 𝐹:(Base‘𝑁)⟶(Base‘𝑀))
15 simprl 758 . . . . . . . . 9 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → 𝑥 ∈ (Base‘𝑁))
1614, 15ffvelrnd 6677 . . . . . . . 8 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝐹𝑥) ∈ (Base‘𝑀))
17 simprr 760 . . . . . . . . 9 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → 𝑦 ∈ (Base‘𝑁))
1814, 17ffvelrnd 6677 . . . . . . . 8 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝐹𝑦) ∈ (Base‘𝑀))
19 eqid 2778 . . . . . . . . 9 (+g𝑀) = (+g𝑀)
208, 19ablcom 18683 . . . . . . . 8 ((𝑀 ∈ Abel ∧ (𝐹𝑥) ∈ (Base‘𝑀) ∧ (𝐹𝑦) ∈ (Base‘𝑀)) → ((𝐹𝑥)(+g𝑀)(𝐹𝑦)) = ((𝐹𝑦)(+g𝑀)(𝐹𝑥)))
217, 16, 18, 20syl3anc 1351 . . . . . . 7 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → ((𝐹𝑥)(+g𝑀)(𝐹𝑦)) = ((𝐹𝑦)(+g𝑀)(𝐹𝑥)))
22 gimcnv 18178 . . . . . . . . . 10 (𝐹 ∈ (𝑀 GrpIso 𝑁) → 𝐹 ∈ (𝑁 GrpIso 𝑀))
2322ad2antlr 714 . . . . . . . . 9 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → 𝐹 ∈ (𝑁 GrpIso 𝑀))
24 gimghm 18175 . . . . . . . . 9 (𝐹 ∈ (𝑁 GrpIso 𝑀) → 𝐹 ∈ (𝑁 GrpHom 𝑀))
2523, 24syl 17 . . . . . . . 8 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → 𝐹 ∈ (𝑁 GrpHom 𝑀))
26 eqid 2778 . . . . . . . . 9 (+g𝑁) = (+g𝑁)
279, 26, 19ghmlin 18134 . . . . . . . 8 ((𝐹 ∈ (𝑁 GrpHom 𝑀) ∧ 𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁)) → (𝐹‘(𝑥(+g𝑁)𝑦)) = ((𝐹𝑥)(+g𝑀)(𝐹𝑦)))
2825, 15, 17, 27syl3anc 1351 . . . . . . 7 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝐹‘(𝑥(+g𝑁)𝑦)) = ((𝐹𝑥)(+g𝑀)(𝐹𝑦)))
299, 26, 19ghmlin 18134 . . . . . . . 8 ((𝐹 ∈ (𝑁 GrpHom 𝑀) ∧ 𝑦 ∈ (Base‘𝑁) ∧ 𝑥 ∈ (Base‘𝑁)) → (𝐹‘(𝑦(+g𝑁)𝑥)) = ((𝐹𝑦)(+g𝑀)(𝐹𝑥)))
3025, 17, 15, 29syl3anc 1351 . . . . . . 7 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝐹‘(𝑦(+g𝑁)𝑥)) = ((𝐹𝑦)(+g𝑀)(𝐹𝑥)))
3121, 28, 303eqtr4d 2824 . . . . . 6 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝐹‘(𝑥(+g𝑁)𝑦)) = (𝐹‘(𝑦(+g𝑁)𝑥)))
3231fveq2d 6503 . . . . 5 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝐹‘(𝐹‘(𝑥(+g𝑁)𝑦))) = (𝐹‘(𝐹‘(𝑦(+g𝑁)𝑥))))
3310ad2antlr 714 . . . . . 6 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → 𝐹:(Base‘𝑀)–1-1-onto→(Base‘𝑁))
343ad2antlr 714 . . . . . . 7 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → 𝑁 ∈ Grp)
359, 26grpcl 17899 . . . . . . 7 ((𝑁 ∈ Grp ∧ 𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁)) → (𝑥(+g𝑁)𝑦) ∈ (Base‘𝑁))
3634, 15, 17, 35syl3anc 1351 . . . . . 6 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝑥(+g𝑁)𝑦) ∈ (Base‘𝑁))
37 f1ocnvfv2 6859 . . . . . 6 ((𝐹:(Base‘𝑀)–1-1-onto→(Base‘𝑁) ∧ (𝑥(+g𝑁)𝑦) ∈ (Base‘𝑁)) → (𝐹‘(𝐹‘(𝑥(+g𝑁)𝑦))) = (𝑥(+g𝑁)𝑦))
3833, 36, 37syl2anc 576 . . . . 5 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝐹‘(𝐹‘(𝑥(+g𝑁)𝑦))) = (𝑥(+g𝑁)𝑦))
399, 26grpcl 17899 . . . . . . 7 ((𝑁 ∈ Grp ∧ 𝑦 ∈ (Base‘𝑁) ∧ 𝑥 ∈ (Base‘𝑁)) → (𝑦(+g𝑁)𝑥) ∈ (Base‘𝑁))
4034, 17, 15, 39syl3anc 1351 . . . . . 6 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝑦(+g𝑁)𝑥) ∈ (Base‘𝑁))
41 f1ocnvfv2 6859 . . . . . 6 ((𝐹:(Base‘𝑀)–1-1-onto→(Base‘𝑁) ∧ (𝑦(+g𝑁)𝑥) ∈ (Base‘𝑁)) → (𝐹‘(𝐹‘(𝑦(+g𝑁)𝑥))) = (𝑦(+g𝑁)𝑥))
4233, 40, 41syl2anc 576 . . . . 5 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝐹‘(𝐹‘(𝑦(+g𝑁)𝑥))) = (𝑦(+g𝑁)𝑥))
4332, 38, 423eqtr3d 2822 . . . 4 (((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) ∧ (𝑥 ∈ (Base‘𝑁) ∧ 𝑦 ∈ (Base‘𝑁))) → (𝑥(+g𝑁)𝑦) = (𝑦(+g𝑁)𝑥))
4443ralrimivva 3141 . . 3 ((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) → ∀𝑥 ∈ (Base‘𝑁)∀𝑦 ∈ (Base‘𝑁)(𝑥(+g𝑁)𝑦) = (𝑦(+g𝑁)𝑥))
459, 26iscmn 18673 . . 3 (𝑁 ∈ CMnd ↔ (𝑁 ∈ Mnd ∧ ∀𝑥 ∈ (Base‘𝑁)∀𝑦 ∈ (Base‘𝑁)(𝑥(+g𝑁)𝑦) = (𝑦(+g𝑁)𝑥)))
466, 44, 45sylanbrc 575 . 2 ((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) → 𝑁 ∈ CMnd)
47 isabl 18670 . 2 (𝑁 ∈ Abel ↔ (𝑁 ∈ Grp ∧ 𝑁 ∈ CMnd))
484, 46, 47sylanbrc 575 1 ((𝑀 ∈ Abel ∧ 𝐹 ∈ (𝑀 GrpIso 𝑁)) → 𝑁 ∈ Abel)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 387   = wceq 1507  wcel 2050  wral 3088  ccnv 5406  wf 6184  1-1-ontowf1o 6187  cfv 6188  (class class class)co 6976  Basecbs 16339  +gcplusg 16421  Mndcmnd 17762  Grpcgrp 17891   GrpHom cghm 18126   GrpIso cgim 18168  CMndccmn 18666  Abelcabl 18667
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1965  ax-8 2052  ax-9 2059  ax-10 2079  ax-11 2093  ax-12 2106  ax-13 2301  ax-ext 2750  ax-rep 5049  ax-sep 5060  ax-nul 5067  ax-pow 5119  ax-pr 5186  ax-un 7279
This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3an 1070  df-tru 1510  df-ex 1743  df-nf 1747  df-sb 2016  df-mo 2547  df-eu 2584  df-clab 2759  df-cleq 2771  df-clel 2846  df-nfc 2918  df-ne 2968  df-ral 3093  df-rex 3094  df-reu 3095  df-rab 3097  df-v 3417  df-sbc 3682  df-csb 3787  df-dif 3832  df-un 3834  df-in 3836  df-ss 3843  df-nul 4179  df-if 4351  df-pw 4424  df-sn 4442  df-pr 4444  df-op 4448  df-uni 4713  df-iun 4794  df-br 4930  df-opab 4992  df-mpt 5009  df-id 5312  df-xp 5413  df-rel 5414  df-cnv 5415  df-co 5416  df-dm 5417  df-rn 5418  df-res 5419  df-ima 5420  df-iota 6152  df-fun 6190  df-fn 6191  df-f 6192  df-f1 6193  df-fo 6194  df-f1o 6195  df-fv 6196  df-ov 6979  df-oprab 6980  df-mpo 6981  df-mgm 17710  df-sgrp 17752  df-mnd 17763  df-grp 17894  df-ghm 18127  df-gim 18170  df-cmn 18668  df-abl 18669
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator