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

Theorem issubm 18829
Description: Expand definition of a submonoid. (Contributed by Mario Carneiro, 7-Mar-2015.)
Hypotheses
Ref Expression
issubm.b 𝐵 = (Base‘𝑀)
issubm.z 0 = (0g𝑀)
issubm.p + = (+g𝑀)
Assertion
Ref Expression
issubm (𝑀 ∈ Mnd → (𝑆 ∈ (SubMnd‘𝑀) ↔ (𝑆𝐵0𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆)))
Distinct variable groups:   𝑥,𝑀,𝑦   𝑥,𝑆,𝑦
Allowed substitution hints:   𝐵(𝑥,𝑦)   + (𝑥,𝑦)   0 (𝑥,𝑦)

Proof of Theorem issubm
Dummy variables 𝑚 𝑡 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6907 . . . . . 6 (𝑚 = 𝑀 → (Base‘𝑚) = (Base‘𝑀))
21pweqd 4622 . . . . 5 (𝑚 = 𝑀 → 𝒫 (Base‘𝑚) = 𝒫 (Base‘𝑀))
3 fveq2 6907 . . . . . . 7 (𝑚 = 𝑀 → (0g𝑚) = (0g𝑀))
43eleq1d 2824 . . . . . 6 (𝑚 = 𝑀 → ((0g𝑚) ∈ 𝑡 ↔ (0g𝑀) ∈ 𝑡))
5 fveq2 6907 . . . . . . . . 9 (𝑚 = 𝑀 → (+g𝑚) = (+g𝑀))
65oveqd 7448 . . . . . . . 8 (𝑚 = 𝑀 → (𝑥(+g𝑚)𝑦) = (𝑥(+g𝑀)𝑦))
76eleq1d 2824 . . . . . . 7 (𝑚 = 𝑀 → ((𝑥(+g𝑚)𝑦) ∈ 𝑡 ↔ (𝑥(+g𝑀)𝑦) ∈ 𝑡))
872ralbidv 3219 . . . . . 6 (𝑚 = 𝑀 → (∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑚)𝑦) ∈ 𝑡 ↔ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡))
94, 8anbi12d 632 . . . . 5 (𝑚 = 𝑀 → (((0g𝑚) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑚)𝑦) ∈ 𝑡) ↔ ((0g𝑀) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡)))
102, 9rabeqbidv 3452 . . . 4 (𝑚 = 𝑀 → {𝑡 ∈ 𝒫 (Base‘𝑚) ∣ ((0g𝑚) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑚)𝑦) ∈ 𝑡)} = {𝑡 ∈ 𝒫 (Base‘𝑀) ∣ ((0g𝑀) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡)})
11 df-submnd 18810 . . . 4 SubMnd = (𝑚 ∈ Mnd ↦ {𝑡 ∈ 𝒫 (Base‘𝑚) ∣ ((0g𝑚) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑚)𝑦) ∈ 𝑡)})
12 fvex 6920 . . . . . 6 (Base‘𝑀) ∈ V
1312pwex 5386 . . . . 5 𝒫 (Base‘𝑀) ∈ V
1413rabex 5345 . . . 4 {𝑡 ∈ 𝒫 (Base‘𝑀) ∣ ((0g𝑀) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡)} ∈ V
1510, 11, 14fvmpt 7016 . . 3 (𝑀 ∈ Mnd → (SubMnd‘𝑀) = {𝑡 ∈ 𝒫 (Base‘𝑀) ∣ ((0g𝑀) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡)})
1615eleq2d 2825 . 2 (𝑀 ∈ Mnd → (𝑆 ∈ (SubMnd‘𝑀) ↔ 𝑆 ∈ {𝑡 ∈ 𝒫 (Base‘𝑀) ∣ ((0g𝑀) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡)}))
17 eleq2 2828 . . . . 5 (𝑡 = 𝑆 → ((0g𝑀) ∈ 𝑡 ↔ (0g𝑀) ∈ 𝑆))
18 eleq2 2828 . . . . . . 7 (𝑡 = 𝑆 → ((𝑥(+g𝑀)𝑦) ∈ 𝑡 ↔ (𝑥(+g𝑀)𝑦) ∈ 𝑆))
1918raleqbi1dv 3336 . . . . . 6 (𝑡 = 𝑆 → (∀𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡 ↔ ∀𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆))
2019raleqbi1dv 3336 . . . . 5 (𝑡 = 𝑆 → (∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡 ↔ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆))
2117, 20anbi12d 632 . . . 4 (𝑡 = 𝑆 → (((0g𝑀) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡) ↔ ((0g𝑀) ∈ 𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆)))
2221elrab 3695 . . 3 (𝑆 ∈ {𝑡 ∈ 𝒫 (Base‘𝑀) ∣ ((0g𝑀) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡)} ↔ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ((0g𝑀) ∈ 𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆)))
23 issubm.b . . . . . 6 𝐵 = (Base‘𝑀)
2423sseq2i 4025 . . . . 5 (𝑆𝐵𝑆 ⊆ (Base‘𝑀))
25 issubm.z . . . . . . 7 0 = (0g𝑀)
2625eleq1i 2830 . . . . . 6 ( 0𝑆 ↔ (0g𝑀) ∈ 𝑆)
27 issubm.p . . . . . . . . 9 + = (+g𝑀)
2827oveqi 7444 . . . . . . . 8 (𝑥 + 𝑦) = (𝑥(+g𝑀)𝑦)
2928eleq1i 2830 . . . . . . 7 ((𝑥 + 𝑦) ∈ 𝑆 ↔ (𝑥(+g𝑀)𝑦) ∈ 𝑆)
30292ralbii 3126 . . . . . 6 (∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆 ↔ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆)
3126, 30anbi12i 628 . . . . 5 (( 0𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆) ↔ ((0g𝑀) ∈ 𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆))
3224, 31anbi12i 628 . . . 4 ((𝑆𝐵 ∧ ( 0𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆)) ↔ (𝑆 ⊆ (Base‘𝑀) ∧ ((0g𝑀) ∈ 𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆)))
33 3anass 1094 . . . 4 ((𝑆𝐵0𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆) ↔ (𝑆𝐵 ∧ ( 0𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆)))
3412elpw2 5340 . . . . 5 (𝑆 ∈ 𝒫 (Base‘𝑀) ↔ 𝑆 ⊆ (Base‘𝑀))
3534anbi1i 624 . . . 4 ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ((0g𝑀) ∈ 𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆)) ↔ (𝑆 ⊆ (Base‘𝑀) ∧ ((0g𝑀) ∈ 𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆)))
3632, 33, 353bitr4ri 304 . . 3 ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ((0g𝑀) ∈ 𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥(+g𝑀)𝑦) ∈ 𝑆)) ↔ (𝑆𝐵0𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆))
3722, 36bitri 275 . 2 (𝑆 ∈ {𝑡 ∈ 𝒫 (Base‘𝑀) ∣ ((0g𝑀) ∈ 𝑡 ∧ ∀𝑥𝑡𝑦𝑡 (𝑥(+g𝑀)𝑦) ∈ 𝑡)} ↔ (𝑆𝐵0𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆))
3816, 37bitrdi 287 1 (𝑀 ∈ Mnd → (𝑆 ∈ (SubMnd‘𝑀) ↔ (𝑆𝐵0𝑆 ∧ ∀𝑥𝑆𝑦𝑆 (𝑥 + 𝑦) ∈ 𝑆)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1537  wcel 2106  wral 3059  {crab 3433  wss 3963  𝒫 cpw 4605  cfv 6563  (class class class)co 7431  Basecbs 17245  +gcplusg 17298  0gc0g 17486  Mndcmnd 18760  SubMndcsubmnd 18808
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pow 5371  ax-pr 5438
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-rab 3434  df-v 3480  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5583  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-iota 6516  df-fun 6565  df-fv 6571  df-ov 7434  df-submnd 18810
This theorem is referenced by:  issubm2  18830  issubmd  18832  mndissubm  18833  submcl  18838  0subm  18843  insubm  18844  mhmima  18851  mhmeql  18852  submacs  18853  gsumwspan  18872  frmdsssubm  18887  sursubmefmnd  18922  injsubmefmnd  18923  issubg3  19175  cycsubm  19233  cntzsubm  19369  oppgsubm  19396  lsmsubm  19686  issubrg3  20617  isdomn3  20732  xrge0subm  21443  cnsubmlem  21450  nn0srg  21473  rge0srg  21474  efsubm  26608  rrgsubm  33268  1arithufdlem4  33555  iistmd  33863  mon1psubm  43188
  Copyright terms: Public domain W3C validator