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

Theorem dprdcntz2 18418
Description: The function 𝑆 is a family of subgroups. (Contributed by Mario Carneiro, 26-Apr-2016.)
Hypotheses
Ref Expression
dprdcntz2.1 (𝜑𝐺dom DProd 𝑆)
dprdcntz2.2 (𝜑 → dom 𝑆 = 𝐼)
dprdcntz2.c (𝜑𝐶𝐼)
dprdcntz2.d (𝜑𝐷𝐼)
dprdcntz2.i (𝜑 → (𝐶𝐷) = ∅)
dprdcntz2.z 𝑍 = (Cntz‘𝐺)
Assertion
Ref Expression
dprdcntz2 (𝜑 → (𝐺 DProd (𝑆𝐶)) ⊆ (𝑍‘(𝐺 DProd (𝑆𝐷))))

Proof of Theorem dprdcntz2
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 dprdcntz2.1 . . . 4 (𝜑𝐺dom DProd 𝑆)
2 dprdcntz2.2 . . . 4 (𝜑 → dom 𝑆 = 𝐼)
3 dprdcntz2.c . . . 4 (𝜑𝐶𝐼)
41, 2, 3dprdres 18408 . . 3 (𝜑 → (𝐺dom DProd (𝑆𝐶) ∧ (𝐺 DProd (𝑆𝐶)) ⊆ (𝐺 DProd 𝑆)))
54simpld 475 . 2 (𝜑𝐺dom DProd (𝑆𝐶))
6 dmres 5407 . . 3 dom (𝑆𝐶) = (𝐶 ∩ dom 𝑆)
73, 2sseqtr4d 3634 . . . 4 (𝜑𝐶 ⊆ dom 𝑆)
8 df-ss 3581 . . . 4 (𝐶 ⊆ dom 𝑆 ↔ (𝐶 ∩ dom 𝑆) = 𝐶)
97, 8sylib 208 . . 3 (𝜑 → (𝐶 ∩ dom 𝑆) = 𝐶)
106, 9syl5eq 2666 . 2 (𝜑 → dom (𝑆𝐶) = 𝐶)
11 dprdgrp 18385 . . . 4 (𝐺dom DProd 𝑆𝐺 ∈ Grp)
121, 11syl 17 . . 3 (𝜑𝐺 ∈ Grp)
13 eqid 2620 . . . 4 (Base‘𝐺) = (Base‘𝐺)
1413dprdssv 18396 . . 3 (𝐺 DProd (𝑆𝐷)) ⊆ (Base‘𝐺)
15 dprdcntz2.z . . . 4 𝑍 = (Cntz‘𝐺)
1613, 15cntzsubg 17750 . . 3 ((𝐺 ∈ Grp ∧ (𝐺 DProd (𝑆𝐷)) ⊆ (Base‘𝐺)) → (𝑍‘(𝐺 DProd (𝑆𝐷))) ∈ (SubGrp‘𝐺))
1712, 14, 16sylancl 693 . 2 (𝜑 → (𝑍‘(𝐺 DProd (𝑆𝐷))) ∈ (SubGrp‘𝐺))
18 fvres 6194 . . . 4 (𝑥𝐶 → ((𝑆𝐶)‘𝑥) = (𝑆𝑥))
1918adantl 482 . . 3 ((𝜑𝑥𝐶) → ((𝑆𝐶)‘𝑥) = (𝑆𝑥))
20 dprdcntz2.d . . . . . . . 8 (𝜑𝐷𝐼)
211, 2, 20dprdres 18408 . . . . . . 7 (𝜑 → (𝐺dom DProd (𝑆𝐷) ∧ (𝐺 DProd (𝑆𝐷)) ⊆ (𝐺 DProd 𝑆)))
2221simpld 475 . . . . . 6 (𝜑𝐺dom DProd (𝑆𝐷))
2322adantr 481 . . . . 5 ((𝜑𝑥𝐶) → 𝐺dom DProd (𝑆𝐷))
24 dprdsubg 18404 . . . . 5 (𝐺dom DProd (𝑆𝐷) → (𝐺 DProd (𝑆𝐷)) ∈ (SubGrp‘𝐺))
2523, 24syl 17 . . . 4 ((𝜑𝑥𝐶) → (𝐺 DProd (𝑆𝐷)) ∈ (SubGrp‘𝐺))
263sselda 3595 . . . . 5 ((𝜑𝑥𝐶) → 𝑥𝐼)
271, 2dprdf2 18387 . . . . . 6 (𝜑𝑆:𝐼⟶(SubGrp‘𝐺))
2827ffvelrnda 6345 . . . . 5 ((𝜑𝑥𝐼) → (𝑆𝑥) ∈ (SubGrp‘𝐺))
2926, 28syldan 487 . . . 4 ((𝜑𝑥𝐶) → (𝑆𝑥) ∈ (SubGrp‘𝐺))
30 dmres 5407 . . . . . . 7 dom (𝑆𝐷) = (𝐷 ∩ dom 𝑆)
3120, 2sseqtr4d 3634 . . . . . . . 8 (𝜑𝐷 ⊆ dom 𝑆)
32 df-ss 3581 . . . . . . . 8 (𝐷 ⊆ dom 𝑆 ↔ (𝐷 ∩ dom 𝑆) = 𝐷)
3331, 32sylib 208 . . . . . . 7 (𝜑 → (𝐷 ∩ dom 𝑆) = 𝐷)
3430, 33syl5eq 2666 . . . . . 6 (𝜑 → dom (𝑆𝐷) = 𝐷)
3534adantr 481 . . . . 5 ((𝜑𝑥𝐶) → dom (𝑆𝐷) = 𝐷)
3612adantr 481 . . . . . 6 ((𝜑𝑥𝐶) → 𝐺 ∈ Grp)
3713subgss 17576 . . . . . . 7 ((𝑆𝑥) ∈ (SubGrp‘𝐺) → (𝑆𝑥) ⊆ (Base‘𝐺))
3829, 37syl 17 . . . . . 6 ((𝜑𝑥𝐶) → (𝑆𝑥) ⊆ (Base‘𝐺))
3913, 15cntzsubg 17750 . . . . . 6 ((𝐺 ∈ Grp ∧ (𝑆𝑥) ⊆ (Base‘𝐺)) → (𝑍‘(𝑆𝑥)) ∈ (SubGrp‘𝐺))
4036, 38, 39syl2anc 692 . . . . 5 ((𝜑𝑥𝐶) → (𝑍‘(𝑆𝑥)) ∈ (SubGrp‘𝐺))
41 fvres 6194 . . . . . . 7 (𝑦𝐷 → ((𝑆𝐷)‘𝑦) = (𝑆𝑦))
4241adantl 482 . . . . . 6 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → ((𝑆𝐷)‘𝑦) = (𝑆𝑦))
431ad2antrr 761 . . . . . . 7 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → 𝐺dom DProd 𝑆)
442ad2antrr 761 . . . . . . 7 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → dom 𝑆 = 𝐼)
4520adantr 481 . . . . . . . 8 ((𝜑𝑥𝐶) → 𝐷𝐼)
4645sselda 3595 . . . . . . 7 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → 𝑦𝐼)
4726adantr 481 . . . . . . 7 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → 𝑥𝐼)
48 simpr 477 . . . . . . . 8 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → 𝑦𝐷)
49 noel 3911 . . . . . . . . . . . 12 ¬ 𝑥 ∈ ∅
50 elin 3788 . . . . . . . . . . . . 13 (𝑥 ∈ (𝐶𝐷) ↔ (𝑥𝐶𝑥𝐷))
51 dprdcntz2.i . . . . . . . . . . . . . 14 (𝜑 → (𝐶𝐷) = ∅)
5251eleq2d 2685 . . . . . . . . . . . . 13 (𝜑 → (𝑥 ∈ (𝐶𝐷) ↔ 𝑥 ∈ ∅))
5350, 52syl5bbr 274 . . . . . . . . . . . 12 (𝜑 → ((𝑥𝐶𝑥𝐷) ↔ 𝑥 ∈ ∅))
5449, 53mtbiri 317 . . . . . . . . . . 11 (𝜑 → ¬ (𝑥𝐶𝑥𝐷))
55 imnan 438 . . . . . . . . . . 11 ((𝑥𝐶 → ¬ 𝑥𝐷) ↔ ¬ (𝑥𝐶𝑥𝐷))
5654, 55sylibr 224 . . . . . . . . . 10 (𝜑 → (𝑥𝐶 → ¬ 𝑥𝐷))
5756imp 445 . . . . . . . . 9 ((𝜑𝑥𝐶) → ¬ 𝑥𝐷)
5857adantr 481 . . . . . . . 8 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → ¬ 𝑥𝐷)
59 nelne2 2888 . . . . . . . 8 ((𝑦𝐷 ∧ ¬ 𝑥𝐷) → 𝑦𝑥)
6048, 58, 59syl2anc 692 . . . . . . 7 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → 𝑦𝑥)
6143, 44, 46, 47, 60, 15dprdcntz 18388 . . . . . 6 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → (𝑆𝑦) ⊆ (𝑍‘(𝑆𝑥)))
6242, 61eqsstrd 3631 . . . . 5 (((𝜑𝑥𝐶) ∧ 𝑦𝐷) → ((𝑆𝐷)‘𝑦) ⊆ (𝑍‘(𝑆𝑥)))
6323, 35, 40, 62dprdlub 18406 . . . 4 ((𝜑𝑥𝐶) → (𝐺 DProd (𝑆𝐷)) ⊆ (𝑍‘(𝑆𝑥)))
6415, 25, 29, 63cntzrecd 18072 . . 3 ((𝜑𝑥𝐶) → (𝑆𝑥) ⊆ (𝑍‘(𝐺 DProd (𝑆𝐷))))
6519, 64eqsstrd 3631 . 2 ((𝜑𝑥𝐶) → ((𝑆𝐶)‘𝑥) ⊆ (𝑍‘(𝐺 DProd (𝑆𝐷))))
665, 10, 17, 65dprdlub 18406 1 (𝜑 → (𝐺 DProd (𝑆𝐶)) ⊆ (𝑍‘(𝐺 DProd (𝑆𝐷))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 384   = wceq 1481  wcel 1988  wne 2791  cin 3566  wss 3567  c0 3907   class class class wbr 4644  dom cdm 5104  cres 5106  cfv 5876  (class class class)co 6635  Basecbs 15838  Grpcgrp 17403  SubGrpcsubg 17569  Cntzccntz 17729   DProd cdprd 18373
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-8 1990  ax-9 1997  ax-10 2017  ax-11 2032  ax-12 2045  ax-13 2244  ax-ext 2600  ax-rep 4762  ax-sep 4772  ax-nul 4780  ax-pow 4834  ax-pr 4897  ax-un 6934  ax-inf2 8523  ax-cnex 9977  ax-resscn 9978  ax-1cn 9979  ax-icn 9980  ax-addcl 9981  ax-addrcl 9982  ax-mulcl 9983  ax-mulrcl 9984  ax-mulcom 9985  ax-addass 9986  ax-mulass 9987  ax-distr 9988  ax-i2m1 9989  ax-1ne0 9990  ax-1rid 9991  ax-rnegex 9992  ax-rrecex 9993  ax-cnre 9994  ax-pre-lttri 9995  ax-pre-lttrn 9996  ax-pre-ltadd 9997  ax-pre-mulgt0 9998
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1484  df-ex 1703  df-nf 1708  df-sb 1879  df-eu 2472  df-mo 2473  df-clab 2607  df-cleq 2613  df-clel 2616  df-nfc 2751  df-ne 2792  df-nel 2895  df-ral 2914  df-rex 2915  df-reu 2916  df-rmo 2917  df-rab 2918  df-v 3197  df-sbc 3430  df-csb 3527  df-dif 3570  df-un 3572  df-in 3574  df-ss 3581  df-pss 3583  df-nul 3908  df-if 4078  df-pw 4151  df-sn 4169  df-pr 4171  df-tp 4173  df-op 4175  df-uni 4428  df-int 4467  df-iun 4513  df-iin 4514  df-br 4645  df-opab 4704  df-mpt 4721  df-tr 4744  df-id 5014  df-eprel 5019  df-po 5025  df-so 5026  df-fr 5063  df-se 5064  df-we 5065  df-xp 5110  df-rel 5111  df-cnv 5112  df-co 5113  df-dm 5114  df-rn 5115  df-res 5116  df-ima 5117  df-pred 5668  df-ord 5714  df-on 5715  df-lim 5716  df-suc 5717  df-iota 5839  df-fun 5878  df-fn 5879  df-f 5880  df-f1 5881  df-fo 5882  df-f1o 5883  df-fv 5884  df-isom 5885  df-riota 6596  df-ov 6638  df-oprab 6639  df-mpt2 6640  df-of 6882  df-om 7051  df-1st 7153  df-2nd 7154  df-supp 7281  df-tpos 7337  df-wrecs 7392  df-recs 7453  df-rdg 7491  df-1o 7545  df-oadd 7549  df-er 7727  df-map 7844  df-ixp 7894  df-en 7941  df-dom 7942  df-sdom 7943  df-fin 7944  df-fsupp 8261  df-oi 8400  df-card 8750  df-pnf 10061  df-mnf 10062  df-xr 10063  df-ltxr 10064  df-le 10065  df-sub 10253  df-neg 10254  df-nn 11006  df-2 11064  df-n0 11278  df-z 11363  df-uz 11673  df-fz 12312  df-fzo 12450  df-seq 12785  df-hash 13101  df-ndx 15841  df-slot 15842  df-base 15844  df-sets 15845  df-ress 15846  df-plusg 15935  df-0g 16083  df-gsum 16084  df-mre 16227  df-mrc 16228  df-acs 16230  df-mgm 17223  df-sgrp 17265  df-mnd 17276  df-mhm 17316  df-submnd 17317  df-grp 17406  df-minusg 17407  df-sbg 17408  df-mulg 17522  df-subg 17572  df-ghm 17639  df-gim 17682  df-cntz 17731  df-oppg 17757  df-cmn 18176  df-dprd 18375
This theorem is referenced by:  dprd2da  18422  dmdprdsplit  18427  ablfac1eulem  18452  ablfac1eu  18453
  Copyright terms: Public domain W3C validator