Theorem dprdgrp 20065

Description: Reverse closure for the internal direct product. (Contributed by Mario Carneiro, 25-Apr-2016.)

Assertion

Ref	Expression
dprdgrp	⊢ (𝐺dom DProd 𝑆 → 𝐺 ∈ Grp)

Proof of Theorem dprdgrp

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		reldmdprd 20057	. . . . . 6 ⊢ Rel dom DProd
2	1	brrelex2i 5708	. . . . 5 ⊢ (𝐺dom DProd 𝑆 → 𝑆 ∈ V)
3	2	dmexd 7888	. . . 4 ⊢ (𝐺dom DProd 𝑆 → dom 𝑆 ∈ V)
4		eqid 2765	. . . 4 ⊢ dom 𝑆 = dom 𝑆
5		eqid 2765	. . . . 5 ⊢ (Cntz‘𝐺) = (Cntz‘𝐺)
6		eqid 2765	. . . . 5 ⊢ (0g‘𝐺) = (0g‘𝐺)
7		eqid 2765	. . . . 5 ⊢ (mrCls‘(SubGrp‘𝐺)) = (mrCls‘(SubGrp‘𝐺))
8	5, 6, 7	dmdprd 20058	. . . 4 ⊢ ((dom 𝑆 ∈ V ∧ dom 𝑆 = dom 𝑆) → (𝐺dom DProd 𝑆 ↔ (𝐺 ∈ Grp ∧ 𝑆:dom 𝑆⟶(SubGrp‘𝐺) ∧ ∀𝑥 ∈ dom 𝑆(∀𝑦 ∈ (dom 𝑆 ∖ {𝑥})(𝑆‘𝑥) ⊆ ((Cntz‘𝐺)‘(𝑆‘𝑦)) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (dom 𝑆 ∖ {𝑥})))) = {(0g‘𝐺)}))))
9	3, 4, 8	sylancl 597	. . 3 ⊢ (𝐺dom DProd 𝑆 → (𝐺dom DProd 𝑆 ↔ (𝐺 ∈ Grp ∧ 𝑆:dom 𝑆⟶(SubGrp‘𝐺) ∧ ∀𝑥 ∈ dom 𝑆(∀𝑦 ∈ (dom 𝑆 ∖ {𝑥})(𝑆‘𝑥) ⊆ ((Cntz‘𝐺)‘(𝑆‘𝑦)) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (dom 𝑆 ∖ {𝑥})))) = {(0g‘𝐺)}))))
10	9	ibi 270	. 2 ⊢ (𝐺dom DProd 𝑆 → (𝐺 ∈ Grp ∧ 𝑆:dom 𝑆⟶(SubGrp‘𝐺) ∧ ∀𝑥 ∈ dom 𝑆(∀𝑦 ∈ (dom 𝑆 ∖ {𝑥})(𝑆‘𝑥) ⊆ ((Cntz‘𝐺)‘(𝑆‘𝑦)) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (dom 𝑆 ∖ {𝑥})))) = {(0g‘𝐺)})))
11	10	simp1d 1158	1 ⊢ (𝐺dom DProd 𝑆 → 𝐺 ∈ Grp)

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   ∧ w3a 1101   = wceq 1563   ∈ wcel 2145  ∀wral 3079  Vcvv 3457   ∖ cdif 3904   ∩ cin 3906   ⊆ wss 3907  {csn 4585  ∪ cuni 4867   class class class wbr 5104  dom cdm 5651   “ cima 5654  ⟶wf 6521  ‘cfv 6525  0_gc0g 17480  mrClscmrc 17623  Grpcgrp 18988  SubGrpcsubg 19174  Cntzccntz 19373   DProd cdprd 20053

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5231  ax-sep 5250  ax-nul 5260  ax-pow 5326  ax-pr 5394  ax-un 7722

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4868  df-iun 4953  df-br 5105  df-opab 5167  df-mpt 5186  df-id 5546  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-oprab 7404  df-mpo 7405  df-1st 7974  df-2nd 7975  df-ixp 8884  df-dprd 20055

This theorem is referenced by:  dprdssv  20076  dprdfid  20077  dprdfinv  20079  dprdfadd  20080  dprdfsub  20081  dprdfeq0  20082  dprdf11  20083  dprdsubg  20084  dprdlub  20086  dprdspan  20087  dprdres  20088  dprdss  20089  dprdf1o  20092  dmdprdsplitlem  20097  dprdcntz2  20098  dprddisj2  20099  dprd2dlem1  20101  dprd2da  20102  dmdprdsplit2lem  20105  dmdprdsplit2  20106  dpjfval  20115  dpjidcl  20118