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

Theorem issubg 17716
Description: The subgroup predicate. (Contributed by Mario Carneiro, 2-Dec-2014.)
Hypothesis
Ref Expression
issubg.b 𝐵 = (Base‘𝐺)
Assertion
Ref Expression
issubg (𝑆 ∈ (SubGrp‘𝐺) ↔ (𝐺 ∈ Grp ∧ 𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp))

Proof of Theorem issubg
Dummy variables 𝑤 𝑠 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-subg 17713 . . . 4 SubGrp = (𝑤 ∈ Grp ↦ {𝑠 ∈ 𝒫 (Base‘𝑤) ∣ (𝑤s 𝑠) ∈ Grp})
21dmmptss 5744 . . 3 dom SubGrp ⊆ Grp
3 elfvdm 6333 . . 3 (𝑆 ∈ (SubGrp‘𝐺) → 𝐺 ∈ dom SubGrp)
42, 3sseldi 3707 . 2 (𝑆 ∈ (SubGrp‘𝐺) → 𝐺 ∈ Grp)
5 simp1 1128 . 2 ((𝐺 ∈ Grp ∧ 𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp) → 𝐺 ∈ Grp)
6 fveq2 6304 . . . . . . . . . 10 (𝑤 = 𝐺 → (Base‘𝑤) = (Base‘𝐺))
7 issubg.b . . . . . . . . . 10 𝐵 = (Base‘𝐺)
86, 7syl6eqr 2776 . . . . . . . . 9 (𝑤 = 𝐺 → (Base‘𝑤) = 𝐵)
98pweqd 4271 . . . . . . . 8 (𝑤 = 𝐺 → 𝒫 (Base‘𝑤) = 𝒫 𝐵)
10 oveq1 6772 . . . . . . . . 9 (𝑤 = 𝐺 → (𝑤s 𝑠) = (𝐺s 𝑠))
1110eleq1d 2788 . . . . . . . 8 (𝑤 = 𝐺 → ((𝑤s 𝑠) ∈ Grp ↔ (𝐺s 𝑠) ∈ Grp))
129, 11rabeqbidv 3299 . . . . . . 7 (𝑤 = 𝐺 → {𝑠 ∈ 𝒫 (Base‘𝑤) ∣ (𝑤s 𝑠) ∈ Grp} = {𝑠 ∈ 𝒫 𝐵 ∣ (𝐺s 𝑠) ∈ Grp})
13 fvex 6314 . . . . . . . . . 10 (Base‘𝐺) ∈ V
147, 13eqeltri 2799 . . . . . . . . 9 𝐵 ∈ V
1514pwex 4953 . . . . . . . 8 𝒫 𝐵 ∈ V
1615rabex 4920 . . . . . . 7 {𝑠 ∈ 𝒫 𝐵 ∣ (𝐺s 𝑠) ∈ Grp} ∈ V
1712, 1, 16fvmpt 6396 . . . . . 6 (𝐺 ∈ Grp → (SubGrp‘𝐺) = {𝑠 ∈ 𝒫 𝐵 ∣ (𝐺s 𝑠) ∈ Grp})
1817eleq2d 2789 . . . . 5 (𝐺 ∈ Grp → (𝑆 ∈ (SubGrp‘𝐺) ↔ 𝑆 ∈ {𝑠 ∈ 𝒫 𝐵 ∣ (𝐺s 𝑠) ∈ Grp}))
19 oveq2 6773 . . . . . . . 8 (𝑠 = 𝑆 → (𝐺s 𝑠) = (𝐺s 𝑆))
2019eleq1d 2788 . . . . . . 7 (𝑠 = 𝑆 → ((𝐺s 𝑠) ∈ Grp ↔ (𝐺s 𝑆) ∈ Grp))
2120elrab 3469 . . . . . 6 (𝑆 ∈ {𝑠 ∈ 𝒫 𝐵 ∣ (𝐺s 𝑠) ∈ Grp} ↔ (𝑆 ∈ 𝒫 𝐵 ∧ (𝐺s 𝑆) ∈ Grp))
2214elpw2 4933 . . . . . . 7 (𝑆 ∈ 𝒫 𝐵𝑆𝐵)
2322anbi1i 733 . . . . . 6 ((𝑆 ∈ 𝒫 𝐵 ∧ (𝐺s 𝑆) ∈ Grp) ↔ (𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp))
2421, 23bitri 264 . . . . 5 (𝑆 ∈ {𝑠 ∈ 𝒫 𝐵 ∣ (𝐺s 𝑠) ∈ Grp} ↔ (𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp))
2518, 24syl6bb 276 . . . 4 (𝐺 ∈ Grp → (𝑆 ∈ (SubGrp‘𝐺) ↔ (𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp)))
26 ibar 526 . . . 4 (𝐺 ∈ Grp → ((𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp) ↔ (𝐺 ∈ Grp ∧ (𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp))))
2725, 26bitrd 268 . . 3 (𝐺 ∈ Grp → (𝑆 ∈ (SubGrp‘𝐺) ↔ (𝐺 ∈ Grp ∧ (𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp))))
28 3anass 1081 . . 3 ((𝐺 ∈ Grp ∧ 𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp) ↔ (𝐺 ∈ Grp ∧ (𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp)))
2927, 28syl6bbr 278 . 2 (𝐺 ∈ Grp → (𝑆 ∈ (SubGrp‘𝐺) ↔ (𝐺 ∈ Grp ∧ 𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp)))
304, 5, 29pm5.21nii 367 1 (𝑆 ∈ (SubGrp‘𝐺) ↔ (𝐺 ∈ Grp ∧ 𝑆𝐵 ∧ (𝐺s 𝑆) ∈ Grp))
Colors of variables: wff setvar class
Syntax hints:  wb 196  wa 383  w3a 1072   = wceq 1596  wcel 2103  {crab 3018  Vcvv 3304  wss 3680  𝒫 cpw 4266  dom cdm 5218  cfv 6001  (class class class)co 6765  Basecbs 15980  s cress 15981  Grpcgrp 17544  SubGrpcsubg 17710
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1835  ax-4 1850  ax-5 1952  ax-6 2018  ax-7 2054  ax-8 2105  ax-9 2112  ax-10 2132  ax-11 2147  ax-12 2160  ax-13 2355  ax-ext 2704  ax-sep 4889  ax-nul 4897  ax-pow 4948  ax-pr 5011
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3an 1074  df-tru 1599  df-ex 1818  df-nf 1823  df-sb 2011  df-eu 2575  df-mo 2576  df-clab 2711  df-cleq 2717  df-clel 2720  df-nfc 2855  df-ne 2897  df-ral 3019  df-rex 3020  df-rab 3023  df-v 3306  df-sbc 3542  df-dif 3683  df-un 3685  df-in 3687  df-ss 3694  df-nul 4024  df-if 4195  df-pw 4268  df-sn 4286  df-pr 4288  df-op 4292  df-uni 4545  df-br 4761  df-opab 4821  df-mpt 4838  df-id 5128  df-xp 5224  df-rel 5225  df-cnv 5226  df-co 5227  df-dm 5228  df-rn 5229  df-res 5230  df-ima 5231  df-iota 5964  df-fun 6003  df-fv 6009  df-ov 6768  df-subg 17713
This theorem is referenced by:  subgss  17717  subgid  17718  subggrp  17719  subgrcl  17721  issubg2  17731  resgrpisgrp  17737  subsubg  17739  pgrpsubgsymgbi  17948  opprsubg  18757  subrgsubg  18909  cphsubrglem  23098  suborng  30045
  Copyright terms: Public domain W3C validator