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

Theorem sylow1 19584
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 2735 . . 3 (+g𝐺) = (+g𝐺)
8 eqid 2735 . . 3 {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} = {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)}
9 oveq2 7413 . . . . . . 7 (𝑠 = 𝑧 → (𝑢(+g𝐺)𝑠) = (𝑢(+g𝐺)𝑧))
109cbvmptv 5225 . . . . . 6 (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)) = (𝑧𝑣 ↦ (𝑢(+g𝐺)𝑧))
11 oveq1 7412 . . . . . . 7 (𝑢 = 𝑥 → (𝑢(+g𝐺)𝑧) = (𝑥(+g𝐺)𝑧))
1211mpteq2dv 5215 . . . . . 6 (𝑢 = 𝑥 → (𝑧𝑣 ↦ (𝑢(+g𝐺)𝑧)) = (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)))
1310, 12eqtrid 2782 . . . . 5 (𝑢 = 𝑥 → (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)) = (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)))
1413rneqd 5918 . . . 4 (𝑢 = 𝑥 → ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)) = ran (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)))
15 mpteq1 5209 . . . . 5 (𝑣 = 𝑦 → (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)) = (𝑧𝑦 ↦ (𝑥(+g𝐺)𝑧)))
1615rneqd 5918 . . . 4 (𝑣 = 𝑦 → ran (𝑧𝑣 ↦ (𝑥(+g𝐺)𝑧)) = ran (𝑧𝑦 ↦ (𝑥(+g𝐺)𝑧)))
1714, 16cbvmpov 7502 . . 3 (𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠))) = (𝑥𝑋, 𝑦 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑧𝑦 ↦ (𝑥(+g𝐺)𝑧)))
18 preq12 4711 . . . . . 6 ((𝑎 = 𝑥𝑏 = 𝑦) → {𝑎, 𝑏} = {𝑥, 𝑦})
1918sseq1d 3990 . . . . 5 ((𝑎 = 𝑥𝑏 = 𝑦) → ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↔ {𝑥, 𝑦} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)}))
20 oveq2 7413 . . . . . . 7 (𝑎 = 𝑥 → (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥))
21 id 22 . . . . . . 7 (𝑏 = 𝑦𝑏 = 𝑦)
2220, 21eqeqan12d 2749 . . . . . 6 ((𝑎 = 𝑥𝑏 = 𝑦) → ((𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏 ↔ (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥) = 𝑦))
2322rexbidv 3164 . . . . 5 ((𝑎 = 𝑥𝑏 = 𝑦) → (∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏 ↔ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥) = 𝑦))
2419, 23anbi12d 632 . . . 4 ((𝑎 = 𝑥𝑏 = 𝑦) → (({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏) ↔ ({𝑥, 𝑦} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥) = 𝑦)))
2524cbvopabv 5192 . . 3 {⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)} = {⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑥) = 𝑦)}
261, 2, 3, 4, 5, 6, 7, 8, 17, 25sylow1lem3 19581 . 2 (𝜑 → ∃ ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))
272adantr 480 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → 𝐺 ∈ Grp)
283adantr 480 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → 𝑋 ∈ Fin)
294adantr 480 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → 𝑃 ∈ ℙ)
305adantr 480 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → 𝑁 ∈ ℕ0)
316adantr 480 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → (𝑃𝑁) ∥ (♯‘𝑋))
32 simprl 770 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)})
33 eqid 2735 . . 3 {𝑡𝑋 ∣ (𝑡(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))) = } = {𝑡𝑋 ∣ (𝑡(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))) = }
34 simprr 772 . . 3 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))
351, 27, 28, 29, 30, 31, 7, 8, 17, 25, 32, 33, 34sylow1lem5 19583 . 2 ((𝜑 ∧ ( ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ (𝑃 pCnt (♯‘[]{⟨𝑎, 𝑏⟩ ∣ ({𝑎, 𝑏} ⊆ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ∧ ∃𝑘𝑋 (𝑘(𝑢𝑋, 𝑣 ∈ {𝑠 ∈ 𝒫 𝑋 ∣ (♯‘𝑠) = (𝑃𝑁)} ↦ ran (𝑠𝑣 ↦ (𝑢(+g𝐺)𝑠)))𝑎) = 𝑏)})) ≤ ((𝑃 pCnt (♯‘𝑋)) − 𝑁))) → ∃𝑔 ∈ (SubGrp‘𝐺)(♯‘𝑔) = (𝑃𝑁))
3626, 35rexlimddv 3147 1 (𝜑 → ∃𝑔 ∈ (SubGrp‘𝐺)(♯‘𝑔) = (𝑃𝑁))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1540  wcel 2108  wrex 3060  {crab 3415  wss 3926  𝒫 cpw 4575  {cpr 4603   class class class wbr 5119  {copab 5181  cmpt 5201  ran crn 5655  cfv 6531  (class class class)co 7405  cmpo 7407  [cec 8717  Fincfn 8959  cle 11270  cmin 11466  0cn0 12501  cexp 14079  chash 14348  cdvds 16272  cprime 16690   pCnt cpc 16856  Basecbs 17228  +gcplusg 17271  Grpcgrp 18916  SubGrpcsubg 19103
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7729  ax-inf2 9655  ax-cnex 11185  ax-resscn 11186  ax-1cn 11187  ax-icn 11188  ax-addcl 11189  ax-addrcl 11190  ax-mulcl 11191  ax-mulrcl 11192  ax-mulcom 11193  ax-addass 11194  ax-mulass 11195  ax-distr 11196  ax-i2m1 11197  ax-1ne0 11198  ax-1rid 11199  ax-rnegex 11200  ax-rrecex 11201  ax-cnre 11202  ax-pre-lttri 11203  ax-pre-lttrn 11204  ax-pre-ltadd 11205  ax-pre-mulgt0 11206  ax-pre-sup 11207
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-disj 5087  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-se 5607  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-isom 6540  df-riota 7362  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7862  df-1st 7988  df-2nd 7989  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-1o 8480  df-2o 8481  df-oadd 8484  df-er 8719  df-ec 8721  df-qs 8725  df-map 8842  df-en 8960  df-dom 8961  df-sdom 8962  df-fin 8963  df-sup 9454  df-inf 9455  df-oi 9524  df-dju 9915  df-card 9953  df-pnf 11271  df-mnf 11272  df-xr 11273  df-ltxr 11274  df-le 11275  df-sub 11468  df-neg 11469  df-div 11895  df-nn 12241  df-2 12303  df-3 12304  df-n0 12502  df-xnn0 12575  df-z 12589  df-uz 12853  df-q 12965  df-rp 13009  df-fz 13525  df-fzo 13672  df-fl 13809  df-mod 13887  df-seq 14020  df-exp 14080  df-fac 14292  df-bc 14321  df-hash 14349  df-cj 15118  df-re 15119  df-im 15120  df-sqrt 15254  df-abs 15255  df-clim 15504  df-sum 15703  df-dvds 16273  df-gcd 16514  df-prm 16691  df-pc 16857  df-sets 17183  df-slot 17201  df-ndx 17213  df-base 17229  df-ress 17252  df-plusg 17284  df-0g 17455  df-mgm 18618  df-sgrp 18697  df-mnd 18713  df-grp 18919  df-minusg 18920  df-subg 19106  df-eqg 19108  df-ga 19273
This theorem is referenced by:  odcau  19585  slwhash  19605
  Copyright terms: Public domain W3C validator