![]() |
Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
|
Mirrors > Home > MPE Home > Th. List > dmdprdsplit2 | Structured version Visualization version GIF version |
Description: The direct product splits into the direct product of any partition of the index set. (Contributed by Mario Carneiro, 25-Apr-2016.) |
Ref | Expression |
---|---|
dprdsplit.2 | ⊢ (𝜑 → 𝑆:𝐼⟶(SubGrp‘𝐺)) |
dprdsplit.i | ⊢ (𝜑 → (𝐶 ∩ 𝐷) = ∅) |
dprdsplit.u | ⊢ (𝜑 → 𝐼 = (𝐶 ∪ 𝐷)) |
dmdprdsplit.z | ⊢ 𝑍 = (Cntz‘𝐺) |
dmdprdsplit.0 | ⊢ 0 = (0g‘𝐺) |
dmdprdsplit2.1 | ⊢ (𝜑 → 𝐺dom DProd (𝑆 ↾ 𝐶)) |
dmdprdsplit2.2 | ⊢ (𝜑 → 𝐺dom DProd (𝑆 ↾ 𝐷)) |
dmdprdsplit2.3 | ⊢ (𝜑 → (𝐺 DProd (𝑆 ↾ 𝐶)) ⊆ (𝑍‘(𝐺 DProd (𝑆 ↾ 𝐷)))) |
dmdprdsplit2.4 | ⊢ (𝜑 → ((𝐺 DProd (𝑆 ↾ 𝐶)) ∩ (𝐺 DProd (𝑆 ↾ 𝐷))) = { 0 }) |
Ref | Expression |
---|---|
dmdprdsplit2 | ⊢ (𝜑 → 𝐺dom DProd 𝑆) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | dmdprdsplit.z | . 2 ⊢ 𝑍 = (Cntz‘𝐺) | |
2 | dmdprdsplit.0 | . 2 ⊢ 0 = (0g‘𝐺) | |
3 | eqid 2740 | . 2 ⊢ (mrCls‘(SubGrp‘𝐺)) = (mrCls‘(SubGrp‘𝐺)) | |
4 | dmdprdsplit2.1 | . . 3 ⊢ (𝜑 → 𝐺dom DProd (𝑆 ↾ 𝐶)) | |
5 | dprdgrp 20049 | . . 3 ⊢ (𝐺dom DProd (𝑆 ↾ 𝐶) → 𝐺 ∈ Grp) | |
6 | 4, 5 | syl 17 | . 2 ⊢ (𝜑 → 𝐺 ∈ Grp) |
7 | dprdsplit.u | . . 3 ⊢ (𝜑 → 𝐼 = (𝐶 ∪ 𝐷)) | |
8 | dprdsplit.2 | . . . . . . 7 ⊢ (𝜑 → 𝑆:𝐼⟶(SubGrp‘𝐺)) | |
9 | ssun1 4201 | . . . . . . . 8 ⊢ 𝐶 ⊆ (𝐶 ∪ 𝐷) | |
10 | 9, 7 | sseqtrrid 4062 | . . . . . . 7 ⊢ (𝜑 → 𝐶 ⊆ 𝐼) |
11 | 8, 10 | fssresd 6788 | . . . . . 6 ⊢ (𝜑 → (𝑆 ↾ 𝐶):𝐶⟶(SubGrp‘𝐺)) |
12 | 11 | fdmd 6757 | . . . . 5 ⊢ (𝜑 → dom (𝑆 ↾ 𝐶) = 𝐶) |
13 | 4, 12 | dprddomcld 20045 | . . . 4 ⊢ (𝜑 → 𝐶 ∈ V) |
14 | dmdprdsplit2.2 | . . . . 5 ⊢ (𝜑 → 𝐺dom DProd (𝑆 ↾ 𝐷)) | |
15 | ssun2 4202 | . . . . . . . 8 ⊢ 𝐷 ⊆ (𝐶 ∪ 𝐷) | |
16 | 15, 7 | sseqtrrid 4062 | . . . . . . 7 ⊢ (𝜑 → 𝐷 ⊆ 𝐼) |
17 | 8, 16 | fssresd 6788 | . . . . . 6 ⊢ (𝜑 → (𝑆 ↾ 𝐷):𝐷⟶(SubGrp‘𝐺)) |
18 | 17 | fdmd 6757 | . . . . 5 ⊢ (𝜑 → dom (𝑆 ↾ 𝐷) = 𝐷) |
19 | 14, 18 | dprddomcld 20045 | . . . 4 ⊢ (𝜑 → 𝐷 ∈ V) |
20 | unexg 7778 | . . . 4 ⊢ ((𝐶 ∈ V ∧ 𝐷 ∈ V) → (𝐶 ∪ 𝐷) ∈ V) | |
21 | 13, 19, 20 | syl2anc 583 | . . 3 ⊢ (𝜑 → (𝐶 ∪ 𝐷) ∈ V) |
22 | 7, 21 | eqeltrd 2844 | . 2 ⊢ (𝜑 → 𝐼 ∈ V) |
23 | 7 | eleq2d 2830 | . . . . 5 ⊢ (𝜑 → (𝑥 ∈ 𝐼 ↔ 𝑥 ∈ (𝐶 ∪ 𝐷))) |
24 | elun 4176 | . . . . 5 ⊢ (𝑥 ∈ (𝐶 ∪ 𝐷) ↔ (𝑥 ∈ 𝐶 ∨ 𝑥 ∈ 𝐷)) | |
25 | 23, 24 | bitrdi 287 | . . . 4 ⊢ (𝜑 → (𝑥 ∈ 𝐼 ↔ (𝑥 ∈ 𝐶 ∨ 𝑥 ∈ 𝐷))) |
26 | dprdsplit.i | . . . . . . . 8 ⊢ (𝜑 → (𝐶 ∩ 𝐷) = ∅) | |
27 | dmdprdsplit2.3 | . . . . . . . 8 ⊢ (𝜑 → (𝐺 DProd (𝑆 ↾ 𝐶)) ⊆ (𝑍‘(𝐺 DProd (𝑆 ↾ 𝐷)))) | |
28 | dmdprdsplit2.4 | . . . . . . . 8 ⊢ (𝜑 → ((𝐺 DProd (𝑆 ↾ 𝐶)) ∩ (𝐺 DProd (𝑆 ↾ 𝐷))) = { 0 }) | |
29 | 8, 26, 7, 1, 2, 4, 14, 27, 28, 3 | dmdprdsplit2lem 20089 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐶) → ((𝑦 ∈ 𝐼 → (𝑥 ≠ 𝑦 → (𝑆‘𝑥) ⊆ (𝑍‘(𝑆‘𝑦)))) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (𝐼 ∖ {𝑥})))) ⊆ { 0 })) |
30 | incom 4230 | . . . . . . . . 9 ⊢ (𝐶 ∩ 𝐷) = (𝐷 ∩ 𝐶) | |
31 | 30, 26 | eqtr3id 2794 | . . . . . . . 8 ⊢ (𝜑 → (𝐷 ∩ 𝐶) = ∅) |
32 | uncom 4181 | . . . . . . . . 9 ⊢ (𝐶 ∪ 𝐷) = (𝐷 ∪ 𝐶) | |
33 | 7, 32 | eqtrdi 2796 | . . . . . . . 8 ⊢ (𝜑 → 𝐼 = (𝐷 ∪ 𝐶)) |
34 | dprdsubg 20068 | . . . . . . . . . 10 ⊢ (𝐺dom DProd (𝑆 ↾ 𝐶) → (𝐺 DProd (𝑆 ↾ 𝐶)) ∈ (SubGrp‘𝐺)) | |
35 | 4, 34 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → (𝐺 DProd (𝑆 ↾ 𝐶)) ∈ (SubGrp‘𝐺)) |
36 | dprdsubg 20068 | . . . . . . . . . 10 ⊢ (𝐺dom DProd (𝑆 ↾ 𝐷) → (𝐺 DProd (𝑆 ↾ 𝐷)) ∈ (SubGrp‘𝐺)) | |
37 | 14, 36 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → (𝐺 DProd (𝑆 ↾ 𝐷)) ∈ (SubGrp‘𝐺)) |
38 | 1, 35, 37, 27 | cntzrecd 19720 | . . . . . . . 8 ⊢ (𝜑 → (𝐺 DProd (𝑆 ↾ 𝐷)) ⊆ (𝑍‘(𝐺 DProd (𝑆 ↾ 𝐶)))) |
39 | incom 4230 | . . . . . . . . 9 ⊢ ((𝐺 DProd (𝑆 ↾ 𝐶)) ∩ (𝐺 DProd (𝑆 ↾ 𝐷))) = ((𝐺 DProd (𝑆 ↾ 𝐷)) ∩ (𝐺 DProd (𝑆 ↾ 𝐶))) | |
40 | 39, 28 | eqtr3id 2794 | . . . . . . . 8 ⊢ (𝜑 → ((𝐺 DProd (𝑆 ↾ 𝐷)) ∩ (𝐺 DProd (𝑆 ↾ 𝐶))) = { 0 }) |
41 | 8, 31, 33, 1, 2, 14, 4, 38, 40, 3 | dmdprdsplit2lem 20089 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐷) → ((𝑦 ∈ 𝐼 → (𝑥 ≠ 𝑦 → (𝑆‘𝑥) ⊆ (𝑍‘(𝑆‘𝑦)))) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (𝐼 ∖ {𝑥})))) ⊆ { 0 })) |
42 | 29, 41 | jaodan 958 | . . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∨ 𝑥 ∈ 𝐷)) → ((𝑦 ∈ 𝐼 → (𝑥 ≠ 𝑦 → (𝑆‘𝑥) ⊆ (𝑍‘(𝑆‘𝑦)))) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (𝐼 ∖ {𝑥})))) ⊆ { 0 })) |
43 | 42 | simpld 494 | . . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∨ 𝑥 ∈ 𝐷)) → (𝑦 ∈ 𝐼 → (𝑥 ≠ 𝑦 → (𝑆‘𝑥) ⊆ (𝑍‘(𝑆‘𝑦))))) |
44 | 43 | ex 412 | . . . 4 ⊢ (𝜑 → ((𝑥 ∈ 𝐶 ∨ 𝑥 ∈ 𝐷) → (𝑦 ∈ 𝐼 → (𝑥 ≠ 𝑦 → (𝑆‘𝑥) ⊆ (𝑍‘(𝑆‘𝑦)))))) |
45 | 25, 44 | sylbid 240 | . . 3 ⊢ (𝜑 → (𝑥 ∈ 𝐼 → (𝑦 ∈ 𝐼 → (𝑥 ≠ 𝑦 → (𝑆‘𝑥) ⊆ (𝑍‘(𝑆‘𝑦)))))) |
46 | 45 | 3imp2 1349 | . 2 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐼 ∧ 𝑦 ∈ 𝐼 ∧ 𝑥 ≠ 𝑦)) → (𝑆‘𝑥) ⊆ (𝑍‘(𝑆‘𝑦))) |
47 | 25 | biimpa 476 | . . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐼) → (𝑥 ∈ 𝐶 ∨ 𝑥 ∈ 𝐷)) |
48 | 29 | simprd 495 | . . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐶) → ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (𝐼 ∖ {𝑥})))) ⊆ { 0 }) |
49 | 41 | simprd 495 | . . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐷) → ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (𝐼 ∖ {𝑥})))) ⊆ { 0 }) |
50 | 48, 49 | jaodan 958 | . . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∨ 𝑥 ∈ 𝐷)) → ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (𝐼 ∖ {𝑥})))) ⊆ { 0 }) |
51 | 47, 50 | syldan 590 | . 2 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐼) → ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (𝐼 ∖ {𝑥})))) ⊆ { 0 }) |
52 | 1, 2, 3, 6, 22, 8, 46, 51 | dmdprdd 20043 | 1 ⊢ (𝜑 → 𝐺dom DProd 𝑆) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ∧ wa 395 ∨ wo 846 = wceq 1537 ∈ wcel 2108 ≠ wne 2946 Vcvv 3488 ∖ cdif 3973 ∪ cun 3974 ∩ cin 3975 ⊆ wss 3976 ∅c0 4352 {csn 4648 ∪ cuni 4931 class class class wbr 5166 dom cdm 5700 ↾ cres 5702 “ cima 5703 ⟶wf 6569 ‘cfv 6573 (class class class)co 7448 0gc0g 17499 mrClscmrc 17641 Grpcgrp 18973 SubGrpcsubg 19160 Cntzccntz 19355 DProd cdprd 20037 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1793 ax-4 1807 ax-5 1909 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2158 ax-12 2178 ax-ext 2711 ax-rep 5303 ax-sep 5317 ax-nul 5324 ax-pow 5383 ax-pr 5447 ax-un 7770 ax-cnex 11240 ax-resscn 11241 ax-1cn 11242 ax-icn 11243 ax-addcl 11244 ax-addrcl 11245 ax-mulcl 11246 ax-mulrcl 11247 ax-mulcom 11248 ax-addass 11249 ax-mulass 11250 ax-distr 11251 ax-i2m1 11252 ax-1ne0 11253 ax-1rid 11254 ax-rnegex 11255 ax-rrecex 11256 ax-cnre 11257 ax-pre-lttri 11258 ax-pre-lttrn 11259 ax-pre-ltadd 11260 ax-pre-mulgt0 11261 |
This theorem depends on definitions: df-bi 207 df-an 396 df-or 847 df-3or 1088 df-3an 1089 df-tru 1540 df-fal 1550 df-ex 1778 df-nf 1782 df-sb 2065 df-mo 2543 df-eu 2572 df-clab 2718 df-cleq 2732 df-clel 2819 df-nfc 2895 df-ne 2947 df-nel 3053 df-ral 3068 df-rex 3077 df-rmo 3388 df-reu 3389 df-rab 3444 df-v 3490 df-sbc 3805 df-csb 3922 df-dif 3979 df-un 3981 df-in 3983 df-ss 3993 df-pss 3996 df-nul 4353 df-if 4549 df-pw 4624 df-sn 4649 df-pr 4651 df-op 4655 df-uni 4932 df-int 4971 df-iun 5017 df-iin 5018 df-br 5167 df-opab 5229 df-mpt 5250 df-tr 5284 df-id 5593 df-eprel 5599 df-po 5607 df-so 5608 df-fr 5652 df-se 5653 df-we 5654 df-xp 5706 df-rel 5707 df-cnv 5708 df-co 5709 df-dm 5710 df-rn 5711 df-res 5712 df-ima 5713 df-pred 6332 df-ord 6398 df-on 6399 df-lim 6400 df-suc 6401 df-iota 6525 df-fun 6575 df-fn 6576 df-f 6577 df-f1 6578 df-fo 6579 df-f1o 6580 df-fv 6581 df-isom 6582 df-riota 7404 df-ov 7451 df-oprab 7452 df-mpo 7453 df-of 7714 df-om 7904 df-1st 8030 df-2nd 8031 df-supp 8202 df-tpos 8267 df-frecs 8322 df-wrecs 8353 df-recs 8427 df-rdg 8466 df-1o 8522 df-2o 8523 df-er 8763 df-map 8886 df-ixp 8956 df-en 9004 df-dom 9005 df-sdom 9006 df-fin 9007 df-fsupp 9432 df-oi 9579 df-card 10008 df-pnf 11326 df-mnf 11327 df-xr 11328 df-ltxr 11329 df-le 11330 df-sub 11522 df-neg 11523 df-nn 12294 df-2 12356 df-n0 12554 df-z 12640 df-uz 12904 df-fz 13568 df-fzo 13712 df-seq 14053 df-hash 14380 df-sets 17211 df-slot 17229 df-ndx 17241 df-base 17259 df-ress 17288 df-plusg 17324 df-0g 17501 df-gsum 17502 df-mre 17644 df-mrc 17645 df-acs 17647 df-mgm 18678 df-sgrp 18757 df-mnd 18773 df-mhm 18818 df-submnd 18819 df-grp 18976 df-minusg 18977 df-sbg 18978 df-mulg 19108 df-subg 19163 df-ghm 19253 df-gim 19299 df-cntz 19357 df-oppg 19386 df-lsm 19678 df-cmn 19824 df-dprd 20039 |
This theorem is referenced by: dmdprdsplit 20091 pgpfaclem1 20125 |
Copyright terms: Public domain | W3C validator |