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

Theorem sylow1 18722
Description: Sylow's first theorem. If 𝑃𝑁 is a prime power that divides the cardinality of 𝐺, then 𝐺 has a supgroup with size 𝑃𝑁. This is part of Metamath 100 proof #72. (Contributed by Mario Carneiro, 16-Jan-2015.)
Hypotheses
Ref Expression
sylow1.x 𝑋 = (Base‘𝐺)
sylow1.g (𝜑𝐺 ∈ Grp)
sylow1.f (𝜑𝑋 ∈ Fin)
sylow1.p (𝜑𝑃 ∈ ℙ)
sylow1.n (𝜑𝑁 ∈ ℕ0)
sylow1.d (𝜑 → (𝑃𝑁) ∥ (♯‘𝑋))
Assertion
Ref Expression
sylow1 (𝜑 → ∃𝑔 ∈ (SubGrp‘𝐺)(♯‘𝑔) = (𝑃𝑁))
Distinct variable groups:   𝑔,𝑁   𝑔,𝑋   𝑔,𝐺   𝑃,𝑔   𝜑,𝑔

Proof of Theorem sylow1
Dummy variables 𝑎 𝑏 𝑠 𝑢 𝑥 𝑦 𝑧 𝑘 𝑡 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 sylow1.x . . 3 𝑋 = (Base‘𝐺)
2 sylow1.g . . 3 (𝜑𝐺 ∈ Grp)
3 sylow1.f . . 3 (𝜑𝑋 ∈ Fin)
4 sylow1.p . . 3 (𝜑𝑃 ∈ ℙ)
5 sylow1.n . . 3 (𝜑𝑁 ∈ ℕ0)
6 sylow1.d . . 3 (𝜑 → (𝑃𝑁) ∥ (♯‘𝑋))
7 eqid 2821 . . 3 (+g𝐺) = (+g𝐺)
8 eqid 2821 . . 3 {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} = {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)}
9 oveq2 7158 . . . . . . 7 (𝑠 = 𝑧 → (𝑢(+g𝐺)𝑠) = (𝑢(+g𝐺)𝑧))
109cbvmptv 5161 . . . . . 6 (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)) = (𝑧𝑣 ↦ (𝑢(+g𝐺)𝑧))
11 oveq1 7157 . . . . . . 7 (𝑢 = 𝑥 → (𝑢(+g𝐺)𝑧) = (𝑥(+g𝐺)𝑧))
1211mpteq2dv 5154 . . . . . 6 (𝑢 = 𝑥 → (𝑧𝑣 ↦ (𝑢(+g𝐺)𝑧)) = (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)))
1310, 12syl5eq 2868 . . . . 5 (𝑢 = 𝑥 → (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)) = (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)))
1413rneqd 5802 . . . 4 (𝑢 = 𝑥 → ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)) = ran (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)))
15 mpteq1 5146 . . . . 5 (𝑣 = 𝑦 → (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)) = (𝑧𝑦 ↦ (𝑥(+g𝐺)𝑧)))
1615rneqd 5802 . . . 4 (𝑣 = 𝑦 → ran (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)) = ran (𝑧𝑦 ↦ (𝑥(+g𝐺)𝑧)))
1714, 16cbvmpov 7243 . . 3 (𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠))) = (𝑥𝑋, 𝑦 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑧𝑦 ↦ (𝑥(+g𝐺)𝑧)))
18 preq12 4664 . . . . . 6 ((𝑎 = 𝑥𝑏 = 𝑦) → {𝑎, 𝑏} = {𝑥, 𝑦})
1918sseq1d 3997 . . . . 5 ((𝑎 = 𝑥𝑏 = 𝑦) → ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↔ {𝑥, 𝑦} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)}))
20 oveq2 7158 . . . . . . 7 (𝑎 = 𝑥 → (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥))
21 id 22 . . . . . . 7 (𝑏 = 𝑦𝑏 = 𝑦)
2220, 21eqeqan12d 2838 . . . . . 6 ((𝑎 = 𝑥𝑏 = 𝑦) → ((𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏 ↔ (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥) = 𝑦))
2322rexbidv 3297 . . . . 5 ((𝑎 = 𝑥𝑏 = 𝑦) → (∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏 ↔ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥) = 𝑦))
2419, 23anbi12d 632 . . . 4 ((𝑎 = 𝑥𝑏 = 𝑦) → (({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏) ↔ ({𝑥, 𝑦} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥) = 𝑦)))
2524cbvopabv 5130 . . 3 {⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)} = {⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥) = 𝑦)}
261, 2, 3, 4, 5, 6, 7, 8, 17, 25sylow1lem3 18719 . 2 (𝜑 → ∃ ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))
272adantr 483 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → 𝐺 ∈ Grp)
283adantr 483 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → 𝑋 ∈ Fin)
294adantr 483 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → 𝑃 ∈ ℙ)
305adantr 483 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → 𝑁 ∈ ℕ0)
316adantr 483 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → (𝑃𝑁) ∥ (♯‘𝑋))
32 simprl 769 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)})
33 eqid 2821 . . 3 {𝑡𝑋 ∣ (𝑡(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))) = } = {𝑡𝑋 ∣ (𝑡(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))) = }
34 simprr 771 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))
351, 27, 28, 29, 30, 31, 7, 8, 17, 25, 32, 33, 34sylow1lem5 18721 . 2 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → ∃𝑔 ∈ (SubGrp‘𝐺)(♯‘𝑔) = (𝑃𝑁))
3626, 35rexlimddv 3291 1 (𝜑 → ∃𝑔 ∈ (SubGrp‘𝐺)(♯‘𝑔) = (𝑃𝑁))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 398   = wceq 1533  wcel 2110  wrex 3139  {crab 3142  wss 3935  𝒫 cpw 4538  {cpr 4562   class class class wbr 5058  {copab 5120  cmpt 5138  ran crn 5550  cfv 6349  (class class class)co 7150  cmpo 7152  [cec 8281  Fincfn 8503  cle 10670  cmin 10864  0cn0 11891  cexp 13423  chash 13684  cdvds 15601  cprime 16009   pCnt cpc 16167  Basecbs 16477  +gcplusg 16559  Grpcgrp 18097  SubGrpcsubg 18267
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5182  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455  ax-inf2 9098  ax-cnex 10587  ax-resscn 10588  ax-1cn 10589  ax-icn 10590  ax-addcl 10591  ax-addrcl 10592  ax-mulcl 10593  ax-mulrcl 10594  ax-mulcom 10595  ax-addass 10596  ax-mulass 10597  ax-distr 10598  ax-i2m1 10599  ax-1ne0 10600  ax-1rid 10601  ax-rnegex 10602  ax-rrecex 10603  ax-cnre 10604  ax-pre-lttri 10605  ax-pre-lttrn 10606  ax-pre-ltadd 10607  ax-pre-mulgt0 10608  ax-pre-sup 10609
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-fal 1546  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-tp 4565  df-op 4567  df-uni 4832  df-int 4869  df-iun 4913  df-disj 5024  df-br 5059  df-opab 5121  df-mpt 5139  df-tr 5165  df-id 5454  df-eprel 5459  df-po 5468  df-so 5469  df-fr 5508  df-se 5509  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-pred 6142  df-ord 6188  df-on 6189  df-lim 6190  df-suc 6191  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-isom 6358  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-om 7575  df-1st 7683  df-2nd 7684  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-1o 8096  df-2o 8097  df-oadd 8100  df-er 8283  df-ec 8285  df-qs 8289  df-map 8402  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-sup 8900  df-inf 8901  df-oi 8968  df-dju 9324  df-card 9362  df-pnf 10671  df-mnf 10672  df-xr 10673  df-ltxr 10674  df-le 10675  df-sub 10866  df-neg 10867  df-div 11292  df-nn 11633  df-2 11694  df-3 11695  df-n0 11892  df-xnn0 11962  df-z 11976  df-uz 12238  df-q 12343  df-rp 12384  df-fz 12887  df-fzo 13028  df-fl 13156  df-mod 13232  df-seq 13364  df-exp 13424  df-fac 13628  df-bc 13657  df-hash 13685  df-cj 14452  df-re 14453  df-im 14454  df-sqrt 14588  df-abs 14589  df-clim 14839  df-sum 15037  df-dvds 15602  df-gcd 15838  df-prm 16010  df-pc 16168  df-ndx 16480  df-slot 16481  df-base 16483  df-sets 16484  df-ress 16485  df-plusg 16572  df-0g 16709  df-mgm 17846  df-sgrp 17895  df-mnd 17906  df-grp 18100  df-minusg 18101  df-subg 18270  df-eqg 18272  df-ga 18414
This theorem is referenced by:  odcau  18723  slwhash  18743
  Copyright terms: Public domain W3C validator