MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  eqger Structured version   Visualization version   GIF version

Theorem eqger 19110
Description: The subgroup coset equivalence relation is an equivalence relation. (Contributed by Mario Carneiro, 13-Jan-2015.)
Hypotheses
Ref Expression
eqger.x 𝑋 = (Base‘𝐺)
eqger.r = (𝐺 ~QG 𝑌)
Assertion
Ref Expression
eqger (𝑌 ∈ (SubGrp‘𝐺) → Er 𝑋)

Proof of Theorem eqger
Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqger.r . . . 4 = (𝐺 ~QG 𝑌)
21releqg 19107 . . 3 Rel
32a1i 11 . 2 (𝑌 ∈ (SubGrp‘𝐺) → Rel )
4 subgrcl 19063 . . . . . 6 (𝑌 ∈ (SubGrp‘𝐺) → 𝐺 ∈ Grp)
5 eqger.x . . . . . . 7 𝑋 = (Base‘𝐺)
65subgss 19059 . . . . . 6 (𝑌 ∈ (SubGrp‘𝐺) → 𝑌𝑋)
7 eqid 2729 . . . . . . 7 (invg𝐺) = (invg𝐺)
8 eqid 2729 . . . . . . 7 (+g𝐺) = (+g𝐺)
95, 7, 8, 1eqgval 19109 . . . . . 6 ((𝐺 ∈ Grp ∧ 𝑌𝑋) → (𝑥 𝑦 ↔ (𝑥𝑋𝑦𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑦) ∈ 𝑌)))
104, 6, 9syl2anc 584 . . . . 5 (𝑌 ∈ (SubGrp‘𝐺) → (𝑥 𝑦 ↔ (𝑥𝑋𝑦𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑦) ∈ 𝑌)))
1110biimpa 476 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → (𝑥𝑋𝑦𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑦) ∈ 𝑌))
1211simp2d 1143 . . 3 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → 𝑦𝑋)
1311simp1d 1142 . . 3 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → 𝑥𝑋)
144adantr 480 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → 𝐺 ∈ Grp)
155, 7, 14, 13grpinvcld 18920 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → ((invg𝐺)‘𝑥) ∈ 𝑋)
165, 8, 7grpinvadd 18950 . . . . . 6 ((𝐺 ∈ Grp ∧ ((invg𝐺)‘𝑥) ∈ 𝑋𝑦𝑋) → ((invg𝐺)‘(((invg𝐺)‘𝑥)(+g𝐺)𝑦)) = (((invg𝐺)‘𝑦)(+g𝐺)((invg𝐺)‘((invg𝐺)‘𝑥))))
1714, 15, 12, 16syl3anc 1373 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → ((invg𝐺)‘(((invg𝐺)‘𝑥)(+g𝐺)𝑦)) = (((invg𝐺)‘𝑦)(+g𝐺)((invg𝐺)‘((invg𝐺)‘𝑥))))
185, 7grpinvinv 18937 . . . . . . 7 ((𝐺 ∈ Grp ∧ 𝑥𝑋) → ((invg𝐺)‘((invg𝐺)‘𝑥)) = 𝑥)
1914, 13, 18syl2anc 584 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → ((invg𝐺)‘((invg𝐺)‘𝑥)) = 𝑥)
2019oveq2d 7403 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → (((invg𝐺)‘𝑦)(+g𝐺)((invg𝐺)‘((invg𝐺)‘𝑥))) = (((invg𝐺)‘𝑦)(+g𝐺)𝑥))
2117, 20eqtrd 2764 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → ((invg𝐺)‘(((invg𝐺)‘𝑥)(+g𝐺)𝑦)) = (((invg𝐺)‘𝑦)(+g𝐺)𝑥))
2211simp3d 1144 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → (((invg𝐺)‘𝑥)(+g𝐺)𝑦) ∈ 𝑌)
237subginvcl 19067 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑦) ∈ 𝑌) → ((invg𝐺)‘(((invg𝐺)‘𝑥)(+g𝐺)𝑦)) ∈ 𝑌)
2422, 23syldan 591 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → ((invg𝐺)‘(((invg𝐺)‘𝑥)(+g𝐺)𝑦)) ∈ 𝑌)
2521, 24eqeltrrd 2829 . . 3 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → (((invg𝐺)‘𝑦)(+g𝐺)𝑥) ∈ 𝑌)
266adantr 480 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → 𝑌𝑋)
275, 7, 8, 1eqgval 19109 . . . 4 ((𝐺 ∈ Grp ∧ 𝑌𝑋) → (𝑦 𝑥 ↔ (𝑦𝑋𝑥𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑥) ∈ 𝑌)))
2814, 26, 27syl2anc 584 . . 3 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → (𝑦 𝑥 ↔ (𝑦𝑋𝑥𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑥) ∈ 𝑌)))
2912, 13, 25, 28mpbir3and 1343 . 2 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥 𝑦) → 𝑦 𝑥)
3013adantrr 717 . . 3 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → 𝑥𝑋)
315, 7, 8, 1eqgval 19109 . . . . . . 7 ((𝐺 ∈ Grp ∧ 𝑌𝑋) → (𝑦 𝑧 ↔ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)))
324, 6, 31syl2anc 584 . . . . . 6 (𝑌 ∈ (SubGrp‘𝐺) → (𝑦 𝑧 ↔ (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)))
3332biimpa 476 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑦 𝑧) → (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌))
3433adantrl 716 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (𝑦𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌))
3534simp2d 1143 . . 3 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → 𝑧𝑋)
364adantr 480 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → 𝐺 ∈ Grp)
375, 7, 36, 30grpinvcld 18920 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → ((invg𝐺)‘𝑥) ∈ 𝑋)
3812adantrr 717 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → 𝑦𝑋)
395, 7, 36, 38grpinvcld 18920 . . . . . . 7 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → ((invg𝐺)‘𝑦) ∈ 𝑋)
405, 8, 36, 39, 35grpcld 18879 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑋)
415, 8, 36, 37, 38, 40grpassd 18877 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → ((((invg𝐺)‘𝑥)(+g𝐺)𝑦)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑥)(+g𝐺)(𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))))
42 eqid 2729 . . . . . . . . . 10 (0g𝐺) = (0g𝐺)
435, 8, 42, 7grprinv 18922 . . . . . . . . 9 ((𝐺 ∈ Grp ∧ 𝑦𝑋) → (𝑦(+g𝐺)((invg𝐺)‘𝑦)) = (0g𝐺))
4436, 38, 43syl2anc 584 . . . . . . . 8 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (𝑦(+g𝐺)((invg𝐺)‘𝑦)) = (0g𝐺))
4544oveq1d 7402 . . . . . . 7 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = ((0g𝐺)(+g𝐺)𝑧))
465, 8, 36, 38, 39, 35grpassd 18877 . . . . . . 7 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → ((𝑦(+g𝐺)((invg𝐺)‘𝑦))(+g𝐺)𝑧) = (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)))
475, 8, 42, 36, 35grplidd 18901 . . . . . . 7 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → ((0g𝐺)(+g𝐺)𝑧) = 𝑧)
4845, 46, 473eqtr3d 2772 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = 𝑧)
4948oveq2d 7403 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (((invg𝐺)‘𝑥)(+g𝐺)(𝑦(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧))) = (((invg𝐺)‘𝑥)(+g𝐺)𝑧))
5041, 49eqtrd 2764 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → ((((invg𝐺)‘𝑥)(+g𝐺)𝑦)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) = (((invg𝐺)‘𝑥)(+g𝐺)𝑧))
51 simpl 482 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → 𝑌 ∈ (SubGrp‘𝐺))
5222adantrr 717 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (((invg𝐺)‘𝑥)(+g𝐺)𝑦) ∈ 𝑌)
5334simp3d 1144 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌)
548subgcl 19068 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑦) ∈ 𝑌 ∧ (((invg𝐺)‘𝑦)(+g𝐺)𝑧) ∈ 𝑌) → ((((invg𝐺)‘𝑥)(+g𝐺)𝑦)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑌)
5551, 52, 53, 54syl3anc 1373 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → ((((invg𝐺)‘𝑥)(+g𝐺)𝑦)(+g𝐺)(((invg𝐺)‘𝑦)(+g𝐺)𝑧)) ∈ 𝑌)
5650, 55eqeltrrd 2829 . . 3 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (((invg𝐺)‘𝑥)(+g𝐺)𝑧) ∈ 𝑌)
576adantr 480 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → 𝑌𝑋)
585, 7, 8, 1eqgval 19109 . . . 4 ((𝐺 ∈ Grp ∧ 𝑌𝑋) → (𝑥 𝑧 ↔ (𝑥𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑧) ∈ 𝑌)))
5936, 57, 58syl2anc 584 . . 3 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → (𝑥 𝑧 ↔ (𝑥𝑋𝑧𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑧) ∈ 𝑌)))
6030, 35, 56, 59mpbir3and 1343 . 2 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥 𝑦𝑦 𝑧)) → 𝑥 𝑧)
615, 8, 42, 7grplinv 18921 . . . . . . 7 ((𝐺 ∈ Grp ∧ 𝑥𝑋) → (((invg𝐺)‘𝑥)(+g𝐺)𝑥) = (0g𝐺))
624, 61sylan 580 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥𝑋) → (((invg𝐺)‘𝑥)(+g𝐺)𝑥) = (0g𝐺))
6342subg0cl 19066 . . . . . . 7 (𝑌 ∈ (SubGrp‘𝐺) → (0g𝐺) ∈ 𝑌)
6463adantr 480 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥𝑋) → (0g𝐺) ∈ 𝑌)
6562, 64eqeltrd 2828 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥𝑋) → (((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌)
6665ex 412 . . . 4 (𝑌 ∈ (SubGrp‘𝐺) → (𝑥𝑋 → (((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌))
6766pm4.71rd 562 . . 3 (𝑌 ∈ (SubGrp‘𝐺) → (𝑥𝑋 ↔ ((((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌𝑥𝑋)))
685, 7, 8, 1eqgval 19109 . . . . 5 ((𝐺 ∈ Grp ∧ 𝑌𝑋) → (𝑥 𝑥 ↔ (𝑥𝑋𝑥𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌)))
694, 6, 68syl2anc 584 . . . 4 (𝑌 ∈ (SubGrp‘𝐺) → (𝑥 𝑥 ↔ (𝑥𝑋𝑥𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌)))
70 df-3an 1088 . . . . 5 ((𝑥𝑋𝑥𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌) ↔ ((𝑥𝑋𝑥𝑋) ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌))
71 anidm 564 . . . . . 6 ((𝑥𝑋𝑥𝑋) ↔ 𝑥𝑋)
7271anbi2ci 625 . . . . 5 (((𝑥𝑋𝑥𝑋) ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌) ↔ ((((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌𝑥𝑋))
7370, 72bitri 275 . . . 4 ((𝑥𝑋𝑥𝑋 ∧ (((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌) ↔ ((((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌𝑥𝑋))
7469, 73bitrdi 287 . . 3 (𝑌 ∈ (SubGrp‘𝐺) → (𝑥 𝑥 ↔ ((((invg𝐺)‘𝑥)(+g𝐺)𝑥) ∈ 𝑌𝑥𝑋)))
7567, 74bitr4d 282 . 2 (𝑌 ∈ (SubGrp‘𝐺) → (𝑥𝑋𝑥 𝑥))
763, 29, 60, 75iserd 8697 1 (𝑌 ∈ (SubGrp‘𝐺) → Er 𝑋)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1540  wcel 2109  wss 3914   class class class wbr 5107  Rel wrel 5643  cfv 6511  (class class class)co 7387   Er wer 8668  Basecbs 17179  +gcplusg 17220  0gc0g 17402  Grpcgrp 18865  invgcminusg 18866  SubGrpcsubg 19052   ~QG cqg 19054
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711  ax-cnex 11124  ax-resscn 11125  ax-1cn 11126  ax-icn 11127  ax-addcl 11128  ax-addrcl 11129  ax-mulcl 11130  ax-mulrcl 11131  ax-mulcom 11132  ax-addass 11133  ax-mulass 11134  ax-distr 11135  ax-i2m1 11136  ax-1ne0 11137  ax-1rid 11138  ax-rnegex 11139  ax-rrecex 11140  ax-cnre 11141  ax-pre-lttri 11142  ax-pre-lttrn 11143  ax-pre-ltadd 11144  ax-pre-mulgt0 11145
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3354  df-reu 3355  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-pss 3934  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-iun 4957  df-br 5108  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5533  df-eprel 5538  df-po 5546  df-so 5547  df-fr 5591  df-we 5593  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6274  df-ord 6335  df-on 6336  df-lim 6337  df-suc 6338  df-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-f1 6516  df-fo 6517  df-f1o 6518  df-fv 6519  df-riota 7344  df-ov 7390  df-oprab 7391  df-mpo 7392  df-om 7843  df-1st 7968  df-2nd 7969  df-frecs 8260  df-wrecs 8291  df-recs 8340  df-rdg 8378  df-er 8671  df-en 8919  df-dom 8920  df-sdom 8921  df-pnf 11210  df-mnf 11211  df-xr 11212  df-ltxr 11213  df-le 11214  df-sub 11407  df-neg 11408  df-nn 12187  df-2 12249  df-sets 17134  df-slot 17152  df-ndx 17164  df-base 17180  df-ress 17201  df-plusg 17233  df-0g 17404  df-mgm 18567  df-sgrp 18646  df-mnd 18662  df-grp 18868  df-minusg 18869  df-subg 19055  df-eqg 19057
This theorem is referenced by:  eqg0el  19115  qusgrp  19118  qusadd  19120  lagsubg2  19126  lagsubg  19127  qus0subgadd  19131  ghmqusnsglem1  19212  ghmqusnsglem2  19213  ghmqusnsg  19214  ghmquskerlem1  19215  ghmquskerlem2  19217  ghmquskerlem3  19218  ghmqusker  19219  orbstafun  19243  orbstaval  19244  orbsta  19245  orbsta2  19246  sylow2blem1  19550  sylow2blem2  19551  sylow2blem3  19552  sylow3lem3  19559  sylow3lem4  19560  qusecsub  19765  2idlcpblrng  21181  qus2idrng  21183  qus1  21184  qusrhm  21186  qusmul2idl  21189  qusmulrng  21192  rhmqusnsg  21195  rngqipring1  21226  zndvds  21459  cldsubg  23998  qustgpopn  24007  qustgphaus  24010  tgptsmscls  24037  qusker  33320  qusvscpbl  33322  quslmod  33329  qusxpid  33334  qustrivr  33336  nsgqusf1olem3  33386  lmhmqusker  33388  rhmquskerlem  33396  qsidomlem1  33423  qsidomlem2  33424  qsnzr  33426  qsdrngilem  33465  qsdrnglem2  33467
  Copyright terms: Public domain W3C validator