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

Theorem dprdlub 19994
Description: The direct product is smaller than any subgroup which contains the factors. (Contributed by Mario Carneiro, 25-Apr-2016.)
Hypotheses
Ref Expression
dprdlub.1 (𝜑𝐺dom DProd 𝑆)
dprdlub.2 (𝜑 → dom 𝑆 = 𝐼)
dprdlub.3 (𝜑𝑇 ∈ (SubGrp‘𝐺))
dprdlub.4 ((𝜑𝑘𝐼) → (𝑆𝑘) ⊆ 𝑇)
Assertion
Ref Expression
dprdlub (𝜑 → (𝐺 DProd 𝑆) ⊆ 𝑇)
Distinct variable groups:   𝑘,𝐺   𝑘,𝐼   𝜑,𝑘   𝑆,𝑘   𝑇,𝑘

Proof of Theorem dprdlub
Dummy variables 𝑓 𝑖 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 dprdlub.1 . . 3 (𝜑𝐺dom DProd 𝑆)
2 dprdlub.2 . . 3 (𝜑 → dom 𝑆 = 𝐼)
3 eqid 2739 . . . 4 (0g𝐺) = (0g𝐺)
4 eqid 2739 . . . 4 {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)} = {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}
53, 4dprdval 19971 . . 3 ((𝐺dom DProd 𝑆 ∧ dom 𝑆 = 𝐼) → (𝐺 DProd 𝑆) = ran (𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)} ↦ (𝐺 Σg 𝑓)))
61, 2, 5syl2anc 590 . 2 (𝜑 → (𝐺 DProd 𝑆) = ran (𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)} ↦ (𝐺 Σg 𝑓)))
7 eqid 2739 . . . . 5 (Cntz‘𝐺) = (Cntz‘𝐺)
81adantr 481 . . . . . 6 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝐺dom DProd 𝑆)
9 dprdgrp 19973 . . . . . 6 (𝐺dom DProd 𝑆𝐺 ∈ Grp)
10 grpmnd 18907 . . . . . 6 (𝐺 ∈ Grp → 𝐺 ∈ Mnd)
118, 9, 103syl 18 . . . . 5 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝐺 ∈ Mnd)
121, 2dprddomcld 19969 . . . . . 6 (𝜑𝐼 ∈ V)
1312adantr 481 . . . . 5 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝐼 ∈ V)
14 dprdlub.3 . . . . . . 7 (𝜑𝑇 ∈ (SubGrp‘𝐺))
1514adantr 481 . . . . . 6 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝑇 ∈ (SubGrp‘𝐺))
16 subgsubm 19115 . . . . . 6 (𝑇 ∈ (SubGrp‘𝐺) → 𝑇 ∈ (SubMnd‘𝐺))
1715, 16syl 17 . . . . 5 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝑇 ∈ (SubMnd‘𝐺))
182adantr 481 . . . . . . . 8 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → dom 𝑆 = 𝐼)
19 simpr 485 . . . . . . . 8 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)})
20 eqid 2739 . . . . . . . 8 (Base‘𝐺) = (Base‘𝐺)
214, 8, 18, 19, 20dprdff 19980 . . . . . . 7 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝑓:𝐼⟶(Base‘𝐺))
2221ffnd 6656 . . . . . 6 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝑓 Fn 𝐼)
23 dprdlub.4 . . . . . . . . 9 ((𝜑𝑘𝐼) → (𝑆𝑘) ⊆ 𝑇)
2423adantlr 721 . . . . . . . 8 (((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) ∧ 𝑘𝐼) → (𝑆𝑘) ⊆ 𝑇)
254, 8, 18, 19dprdfcl 19981 . . . . . . . 8 (((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) ∧ 𝑘𝐼) → (𝑓𝑘) ∈ (𝑆𝑘))
2624, 25sseldd 3916 . . . . . . 7 (((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) ∧ 𝑘𝐼) → (𝑓𝑘) ∈ 𝑇)
2726ralrimiva 3131 . . . . . 6 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → ∀𝑘𝐼 (𝑓𝑘) ∈ 𝑇)
28 ffnfv 7060 . . . . . 6 (𝑓:𝐼𝑇 ↔ (𝑓 Fn 𝐼 ∧ ∀𝑘𝐼 (𝑓𝑘) ∈ 𝑇))
2922, 27, 28sylanbrc 589 . . . . 5 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝑓:𝐼𝑇)
304, 8, 18, 19, 7dprdfcntz 19983 . . . . 5 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → ran 𝑓 ⊆ ((Cntz‘𝐺)‘ran 𝑓))
314, 8, 18, 19dprdffsupp 19982 . . . . 5 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → 𝑓 finSupp (0g𝐺))
323, 7, 11, 13, 17, 29, 30, 31gsumzsubmcl 19884 . . . 4 ((𝜑𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}) → (𝐺 Σg 𝑓) ∈ 𝑇)
3332fmpttd 7056 . . 3 (𝜑 → (𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)} ↦ (𝐺 Σg 𝑓)):{X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)}⟶𝑇)
3433frnd 6663 . 2 (𝜑 → ran (𝑓 ∈ {X𝑖𝐼 (𝑆𝑖) ∣ finSupp (0g𝐺)} ↦ (𝐺 Σg 𝑓)) ⊆ 𝑇)
356, 34eqsstrd 3949 1 (𝜑 → (𝐺 DProd 𝑆) ⊆ 𝑇)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396   = wceq 1547  wcel 2119  wral 3053  {crab 3391  Vcvv 3431  wss 3883   class class class wbr 5072  cmpt 5153  dom cdm 5618  ran crn 5619   Fn wfn 6480  wf 6481  cfv 6485  (class class class)co 7356  Xcixp 8835   finSupp cfsupp 9264  Basecbs 17170  0gc0g 17393   Σg cgsu 17394  Mndcmnd 18693  SubMndcsubmnd 18741  Grpcgrp 18900  SubGrpcsubg 19087  Cntzccntz 19281   DProd cdprd 19961
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5199  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4839  df-int 4878  df-iun 4923  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-se 5572  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-isom 6494  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8101  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-er 8633  df-ixp 8836  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9265  df-oi 9415  df-card 9854  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-nn 12166  df-2 12235  df-n0 12429  df-z 12516  df-uz 12780  df-fz 13453  df-fzo 13600  df-seq 13955  df-hash 14284  df-sets 17125  df-slot 17143  df-ndx 17155  df-base 17171  df-ress 17192  df-plusg 17224  df-0g 17395  df-gsum 17396  df-mgm 18599  df-sgrp 18678  df-mnd 18694  df-submnd 18743  df-grp 18903  df-minusg 18904  df-subg 19090  df-cntz 19283  df-dprd 19963
This theorem is referenced by:  dprdspan  19995  dprdz  19998  dprdcntz2  20006  dprd2dlem1  20009  dprdsplit  20016  ablfac1eu  20041
  Copyright terms: Public domain W3C validator