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

Theorem dprdsplit 19998
Description: The direct product is the binary subgroup product ("sum") of the direct products of the partition. (Contributed by Mario Carneiro, 25-Apr-2016.)
Hypotheses
Ref Expression
dprdsplit.2 (𝜑𝑆:𝐼⟶(SubGrp‘𝐺))
dprdsplit.i (𝜑 → (𝐶𝐷) = ∅)
dprdsplit.u (𝜑𝐼 = (𝐶𝐷))
dprdsplit.s = (LSSum‘𝐺)
dprdsplit.1 (𝜑𝐺dom DProd 𝑆)
Assertion
Ref Expression
dprdsplit (𝜑 → (𝐺 DProd 𝑆) = ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))

Proof of Theorem dprdsplit
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 dprdsplit.1 . . 3 (𝜑𝐺dom DProd 𝑆)
2 dprdsplit.2 . . . 4 (𝜑𝑆:𝐼⟶(SubGrp‘𝐺))
32fdmd 6727 . . 3 (𝜑 → dom 𝑆 = 𝐼)
4 ssun1 4168 . . . . . . . 8 𝐶 ⊆ (𝐶𝐷)
5 dprdsplit.u . . . . . . . 8 (𝜑𝐼 = (𝐶𝐷))
64, 5sseqtrrid 4031 . . . . . . 7 (𝜑𝐶𝐼)
71, 3, 6dprdres 19978 . . . . . 6 (𝜑 → (𝐺dom DProd (𝑆𝐶) ∧ (𝐺 DProd (𝑆𝐶)) ⊆ (𝐺 DProd 𝑆)))
87simpld 494 . . . . 5 (𝜑𝐺dom DProd (𝑆𝐶))
9 dprdsubg 19974 . . . . 5 (𝐺dom DProd (𝑆𝐶) → (𝐺 DProd (𝑆𝐶)) ∈ (SubGrp‘𝐺))
108, 9syl 17 . . . 4 (𝜑 → (𝐺 DProd (𝑆𝐶)) ∈ (SubGrp‘𝐺))
11 ssun2 4169 . . . . . . . 8 𝐷 ⊆ (𝐶𝐷)
1211, 5sseqtrrid 4031 . . . . . . 7 (𝜑𝐷𝐼)
131, 3, 12dprdres 19978 . . . . . 6 (𝜑 → (𝐺dom DProd (𝑆𝐷) ∧ (𝐺 DProd (𝑆𝐷)) ⊆ (𝐺 DProd 𝑆)))
1413simpld 494 . . . . 5 (𝜑𝐺dom DProd (𝑆𝐷))
15 dprdsubg 19974 . . . . 5 (𝐺dom DProd (𝑆𝐷) → (𝐺 DProd (𝑆𝐷)) ∈ (SubGrp‘𝐺))
1614, 15syl 17 . . . 4 (𝜑 → (𝐺 DProd (𝑆𝐷)) ∈ (SubGrp‘𝐺))
17 dprdsplit.i . . . . . . 7 (𝜑 → (𝐶𝐷) = ∅)
18 eqid 2728 . . . . . . 7 (Cntz‘𝐺) = (Cntz‘𝐺)
19 eqid 2728 . . . . . . 7 (0g𝐺) = (0g𝐺)
202, 17, 5, 18, 19dmdprdsplit 19997 . . . . . 6 (𝜑 → (𝐺dom DProd 𝑆 ↔ ((𝐺dom DProd (𝑆𝐶) ∧ 𝐺dom DProd (𝑆𝐷)) ∧ (𝐺 DProd (𝑆𝐶)) ⊆ ((Cntz‘𝐺)‘(𝐺 DProd (𝑆𝐷))) ∧ ((𝐺 DProd (𝑆𝐶)) ∩ (𝐺 DProd (𝑆𝐷))) = {(0g𝐺)})))
211, 20mpbid 231 . . . . 5 (𝜑 → ((𝐺dom DProd (𝑆𝐶) ∧ 𝐺dom DProd (𝑆𝐷)) ∧ (𝐺 DProd (𝑆𝐶)) ⊆ ((Cntz‘𝐺)‘(𝐺 DProd (𝑆𝐷))) ∧ ((𝐺 DProd (𝑆𝐶)) ∩ (𝐺 DProd (𝑆𝐷))) = {(0g𝐺)}))
2221simp2d 1141 . . . 4 (𝜑 → (𝐺 DProd (𝑆𝐶)) ⊆ ((Cntz‘𝐺)‘(𝐺 DProd (𝑆𝐷))))
23 dprdsplit.s . . . . 5 = (LSSum‘𝐺)
2423, 18lsmsubg 19602 . . . 4 (((𝐺 DProd (𝑆𝐶)) ∈ (SubGrp‘𝐺) ∧ (𝐺 DProd (𝑆𝐷)) ∈ (SubGrp‘𝐺) ∧ (𝐺 DProd (𝑆𝐶)) ⊆ ((Cntz‘𝐺)‘(𝐺 DProd (𝑆𝐷)))) → ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))) ∈ (SubGrp‘𝐺))
2510, 16, 22, 24syl3anc 1369 . . 3 (𝜑 → ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))) ∈ (SubGrp‘𝐺))
265eleq2d 2815 . . . . . 6 (𝜑 → (𝑥𝐼𝑥 ∈ (𝐶𝐷)))
27 elun 4144 . . . . . 6 (𝑥 ∈ (𝐶𝐷) ↔ (𝑥𝐶𝑥𝐷))
2826, 27bitrdi 287 . . . . 5 (𝜑 → (𝑥𝐼 ↔ (𝑥𝐶𝑥𝐷)))
2928biimpa 476 . . . 4 ((𝜑𝑥𝐼) → (𝑥𝐶𝑥𝐷))
30 fvres 6910 . . . . . . . 8 (𝑥𝐶 → ((𝑆𝐶)‘𝑥) = (𝑆𝑥))
3130adantl 481 . . . . . . 7 ((𝜑𝑥𝐶) → ((𝑆𝐶)‘𝑥) = (𝑆𝑥))
328adantr 480 . . . . . . . 8 ((𝜑𝑥𝐶) → 𝐺dom DProd (𝑆𝐶))
332, 6fssresd 6758 . . . . . . . . . 10 (𝜑 → (𝑆𝐶):𝐶⟶(SubGrp‘𝐺))
3433fdmd 6727 . . . . . . . . 9 (𝜑 → dom (𝑆𝐶) = 𝐶)
3534adantr 480 . . . . . . . 8 ((𝜑𝑥𝐶) → dom (𝑆𝐶) = 𝐶)
36 simpr 484 . . . . . . . 8 ((𝜑𝑥𝐶) → 𝑥𝐶)
3732, 35, 36dprdub 19975 . . . . . . 7 ((𝜑𝑥𝐶) → ((𝑆𝐶)‘𝑥) ⊆ (𝐺 DProd (𝑆𝐶)))
3831, 37eqsstrrd 4017 . . . . . 6 ((𝜑𝑥𝐶) → (𝑆𝑥) ⊆ (𝐺 DProd (𝑆𝐶)))
3923lsmub1 19605 . . . . . . . 8 (((𝐺 DProd (𝑆𝐶)) ∈ (SubGrp‘𝐺) ∧ (𝐺 DProd (𝑆𝐷)) ∈ (SubGrp‘𝐺)) → (𝐺 DProd (𝑆𝐶)) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
4010, 16, 39syl2anc 583 . . . . . . 7 (𝜑 → (𝐺 DProd (𝑆𝐶)) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
4140adantr 480 . . . . . 6 ((𝜑𝑥𝐶) → (𝐺 DProd (𝑆𝐶)) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
4238, 41sstrd 3988 . . . . 5 ((𝜑𝑥𝐶) → (𝑆𝑥) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
43 fvres 6910 . . . . . . . 8 (𝑥𝐷 → ((𝑆𝐷)‘𝑥) = (𝑆𝑥))
4443adantl 481 . . . . . . 7 ((𝜑𝑥𝐷) → ((𝑆𝐷)‘𝑥) = (𝑆𝑥))
4514adantr 480 . . . . . . . 8 ((𝜑𝑥𝐷) → 𝐺dom DProd (𝑆𝐷))
462, 12fssresd 6758 . . . . . . . . . 10 (𝜑 → (𝑆𝐷):𝐷⟶(SubGrp‘𝐺))
4746fdmd 6727 . . . . . . . . 9 (𝜑 → dom (𝑆𝐷) = 𝐷)
4847adantr 480 . . . . . . . 8 ((𝜑𝑥𝐷) → dom (𝑆𝐷) = 𝐷)
49 simpr 484 . . . . . . . 8 ((𝜑𝑥𝐷) → 𝑥𝐷)
5045, 48, 49dprdub 19975 . . . . . . 7 ((𝜑𝑥𝐷) → ((𝑆𝐷)‘𝑥) ⊆ (𝐺 DProd (𝑆𝐷)))
5144, 50eqsstrrd 4017 . . . . . 6 ((𝜑𝑥𝐷) → (𝑆𝑥) ⊆ (𝐺 DProd (𝑆𝐷)))
5223lsmub2 19606 . . . . . . . 8 (((𝐺 DProd (𝑆𝐶)) ∈ (SubGrp‘𝐺) ∧ (𝐺 DProd (𝑆𝐷)) ∈ (SubGrp‘𝐺)) → (𝐺 DProd (𝑆𝐷)) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
5310, 16, 52syl2anc 583 . . . . . . 7 (𝜑 → (𝐺 DProd (𝑆𝐷)) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
5453adantr 480 . . . . . 6 ((𝜑𝑥𝐷) → (𝐺 DProd (𝑆𝐷)) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
5551, 54sstrd 3988 . . . . 5 ((𝜑𝑥𝐷) → (𝑆𝑥) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
5642, 55jaodan 956 . . . 4 ((𝜑 ∧ (𝑥𝐶𝑥𝐷)) → (𝑆𝑥) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
5729, 56syldan 590 . . 3 ((𝜑𝑥𝐼) → (𝑆𝑥) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
581, 3, 25, 57dprdlub 19976 . 2 (𝜑 → (𝐺 DProd 𝑆) ⊆ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
597simprd 495 . . 3 (𝜑 → (𝐺 DProd (𝑆𝐶)) ⊆ (𝐺 DProd 𝑆))
6013simprd 495 . . 3 (𝜑 → (𝐺 DProd (𝑆𝐷)) ⊆ (𝐺 DProd 𝑆))
61 dprdsubg 19974 . . . . 5 (𝐺dom DProd 𝑆 → (𝐺 DProd 𝑆) ∈ (SubGrp‘𝐺))
621, 61syl 17 . . . 4 (𝜑 → (𝐺 DProd 𝑆) ∈ (SubGrp‘𝐺))
6323lsmlub 19612 . . . 4 (((𝐺 DProd (𝑆𝐶)) ∈ (SubGrp‘𝐺) ∧ (𝐺 DProd (𝑆𝐷)) ∈ (SubGrp‘𝐺) ∧ (𝐺 DProd 𝑆) ∈ (SubGrp‘𝐺)) → (((𝐺 DProd (𝑆𝐶)) ⊆ (𝐺 DProd 𝑆) ∧ (𝐺 DProd (𝑆𝐷)) ⊆ (𝐺 DProd 𝑆)) ↔ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))) ⊆ (𝐺 DProd 𝑆)))
6410, 16, 62, 63syl3anc 1369 . . 3 (𝜑 → (((𝐺 DProd (𝑆𝐶)) ⊆ (𝐺 DProd 𝑆) ∧ (𝐺 DProd (𝑆𝐷)) ⊆ (𝐺 DProd 𝑆)) ↔ ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))) ⊆ (𝐺 DProd 𝑆)))
6559, 60, 64mpbi2and 711 . 2 (𝜑 → ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))) ⊆ (𝐺 DProd 𝑆))
6658, 65eqssd 3995 1 (𝜑 → (𝐺 DProd 𝑆) = ((𝐺 DProd (𝑆𝐶)) (𝐺 DProd (𝑆𝐷))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  wo 846  w3a 1085   = wceq 1534  wcel 2099  cun 3943  cin 3944  wss 3945  c0 4318  {csn 4624   class class class wbr 5142  dom cdm 5672  cres 5674  wf 6538  cfv 6542  (class class class)co 7414  0gc0g 17414  SubGrpcsubg 19068  Cntzccntz 19259  LSSumclsm 19582   DProd cdprd 19943
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2699  ax-rep 5279  ax-sep 5293  ax-nul 5300  ax-pow 5359  ax-pr 5423  ax-un 7734  ax-cnex 11188  ax-resscn 11189  ax-1cn 11190  ax-icn 11191  ax-addcl 11192  ax-addrcl 11193  ax-mulcl 11194  ax-mulrcl 11195  ax-mulcom 11196  ax-addass 11197  ax-mulass 11198  ax-distr 11199  ax-i2m1 11200  ax-1ne0 11201  ax-1rid 11202  ax-rnegex 11203  ax-rrecex 11204  ax-cnre 11205  ax-pre-lttri 11206  ax-pre-lttrn 11207  ax-pre-ltadd 11208  ax-pre-mulgt0 11209
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3or 1086  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2530  df-eu 2559  df-clab 2706  df-cleq 2720  df-clel 2806  df-nfc 2881  df-ne 2937  df-nel 3043  df-ral 3058  df-rex 3067  df-rmo 3372  df-reu 3373  df-rab 3429  df-v 3472  df-sbc 3776  df-csb 3891  df-dif 3948  df-un 3950  df-in 3952  df-ss 3962  df-pss 3964  df-nul 4319  df-if 4525  df-pw 4600  df-sn 4625  df-pr 4627  df-op 4631  df-uni 4904  df-int 4945  df-iun 4993  df-iin 4994  df-br 5143  df-opab 5205  df-mpt 5226  df-tr 5260  df-id 5570  df-eprel 5576  df-po 5584  df-so 5585  df-fr 5627  df-se 5628  df-we 5629  df-xp 5678  df-rel 5679  df-cnv 5680  df-co 5681  df-dm 5682  df-rn 5683  df-res 5684  df-ima 5685  df-pred 6299  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-isom 6551  df-riota 7370  df-ov 7417  df-oprab 7418  df-mpo 7419  df-of 7679  df-om 7865  df-1st 7987  df-2nd 7988  df-supp 8160  df-tpos 8225  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-1o 8480  df-er 8718  df-map 8840  df-ixp 8910  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-fsupp 9380  df-oi 9527  df-card 9956  df-pnf 11274  df-mnf 11275  df-xr 11276  df-ltxr 11277  df-le 11278  df-sub 11470  df-neg 11471  df-nn 12237  df-2 12299  df-n0 12497  df-z 12583  df-uz 12847  df-fz 13511  df-fzo 13654  df-seq 13993  df-hash 14316  df-sets 17126  df-slot 17144  df-ndx 17156  df-base 17174  df-ress 17203  df-plusg 17239  df-0g 17416  df-gsum 17417  df-mre 17559  df-mrc 17560  df-acs 17562  df-mgm 18593  df-sgrp 18672  df-mnd 18688  df-mhm 18733  df-submnd 18734  df-grp 18886  df-minusg 18887  df-sbg 18888  df-mulg 19017  df-subg 19071  df-ghm 19161  df-gim 19206  df-cntz 19261  df-oppg 19290  df-lsm 19584  df-cmn 19730  df-dprd 19945
This theorem is referenced by:  dprdpr  20000  dpjlsm  20004  ablfac1eulem  20022  ablfac1eu  20023  pgpfaclem1  20031
  Copyright terms: Public domain W3C validator