Theorem dprdgrp 20019

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 20011	. . . . . 6 ⊢ Rel dom DProd
2	1	brrelex2i 5693	. . . . 5 ⊢ (𝐺dom DProd 𝑆 → 𝑆 ∈ V)
3	2	dmexd 7869	. . . 4 ⊢ (𝐺dom DProd 𝑆 → dom 𝑆 ∈ V)
4		eqid 2752	. . . 4 ⊢ dom 𝑆 = dom 𝑆
5		eqid 2752	. . . . 5 ⊢ (Cntz‘𝐺) = (Cntz‘𝐺)
6		eqid 2752	. . . . 5 ⊢ (0g‘𝐺) = (0g‘𝐺)
7		eqid 2752	. . . . 5 ⊢ (mrCls‘(SubGrp‘𝐺)) = (mrCls‘(SubGrp‘𝐺))
8	5, 6, 7	dmdprd 20012	. . . 4 ⊢ ((dom 𝑆 ∈ V ∧ dom 𝑆 = dom 𝑆) → (𝐺dom DProd 𝑆 ↔ (𝐺 ∈ Grp ∧ 𝑆:dom 𝑆⟶(SubGrp‘𝐺) ∧ ∀𝑥 ∈ dom 𝑆(∀𝑦 ∈ (dom 𝑆 ∖ {𝑥})(𝑆‘𝑥) ⊆ ((Cntz‘𝐺)‘(𝑆‘𝑦)) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (dom 𝑆 ∖ {𝑥})))) = {(0g‘𝐺)}))))
9	3, 4, 8	sylancl 594	. . 3 ⊢ (𝐺dom DProd 𝑆 → (𝐺dom DProd 𝑆 ↔ (𝐺 ∈ Grp ∧ 𝑆:dom 𝑆⟶(SubGrp‘𝐺) ∧ ∀𝑥 ∈ dom 𝑆(∀𝑦 ∈ (dom 𝑆 ∖ {𝑥})(𝑆‘𝑥) ⊆ ((Cntz‘𝐺)‘(𝑆‘𝑦)) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (dom 𝑆 ∖ {𝑥})))) = {(0g‘𝐺)}))))
10	9	ibi 269	. 2 ⊢ (𝐺dom DProd 𝑆 → (𝐺 ∈ Grp ∧ 𝑆:dom 𝑆⟶(SubGrp‘𝐺) ∧ ∀𝑥 ∈ dom 𝑆(∀𝑦 ∈ (dom 𝑆 ∖ {𝑥})(𝑆‘𝑥) ⊆ ((Cntz‘𝐺)‘(𝑆‘𝑦)) ∧ ((𝑆‘𝑥) ∩ ((mrCls‘(SubGrp‘𝐺))‘∪ (𝑆 “ (dom 𝑆 ∖ {𝑥})))) = {(0g‘𝐺)})))
11	10	simp1d 1151	1 ⊢ (𝐺dom DProd 𝑆 → 𝐺 ∈ Grp)

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1095   = wceq 1550   ∈ wcel 2132  ∀wral 3066  Vcvv 3444   ∖ cdif 3892   ∩ cin 3894   ⊆ wss 3895  {csn 4572  ∪ cuni 4855   class class class wbr 5090  dom cdm 5636   “ cima 5639  ⟶wf 6502  ‘cfv 6506  0_gc0g 17440  mrClscmrc 17583  Grpcgrp 18947  SubGrpcsubg 19134  Cntzccntz 19327   DProd cdprd 20007

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1805  ax-4 1819  ax-5 1920  ax-6 1977  ax-7 2018  ax-8 2134  ax-9 2142  ax-10 2165  ax-11 2181  ax-12 2202  ax-ext 2724  ax-rep 5217  ax-sep 5236  ax-nul 5246  ax-pow 5312  ax-pr 5380  ax-un 7703

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3an 1097  df-tru 1553  df-fal 1563  df-ex 1790  df-nf 1794  df-sb 2081  df-mo 2556  df-eu 2586  df-clab 2731  df-cleq 2744  df-clel 2827  df-nfc 2901  df-ne 2948  df-ral 3067  df-rex 3077  df-reu 3358  df-rab 3405  df-v 3446  df-sbc 3736  df-csb 3844  df-dif 3898  df-un 3900  df-in 3902  df-ss 3912  df-nul 4277  df-if 4471  df-pw 4547  df-sn 4573  df-pr 4575  df-op 4579  df-uni 4856  df-iun 4941  df-br 5091  df-opab 5153  df-mpt 5172  df-id 5531  df-xp 5642  df-rel 5643  df-cnv 5644  df-co 5645  df-dm 5646  df-rn 5647  df-res 5648  df-ima 5649  df-iota 6462  df-fun 6508  df-fn 6509  df-f 6510  df-f1 6511  df-fo 6512  df-f1o 6513  df-fv 6514  df-oprab 7385  df-mpo 7386  df-1st 7955  df-2nd 7956  df-ixp 8865  df-dprd 20009

This theorem is referenced by:  dprdssv  20030  dprdfid  20031  dprdfinv  20033  dprdfadd  20034  dprdfsub  20035  dprdfeq0  20036  dprdf11  20037  dprdsubg  20038  dprdlub  20040  dprdspan  20041  dprdres  20042  dprdss  20043  dprdf1o  20046  dmdprdsplitlem  20051  dprdcntz2  20052  dprddisj2  20053  dprd2dlem1  20055  dprd2da  20056  dmdprdsplit2lem  20059  dmdprdsplit2  20060  dpjfval  20069  dpjidcl  20072